Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl --
    use strict;
    use warnings;
    ...
    $demo->show_demo_window;
    $app->MainLoop;
    exit( 0 );
    
  2. or download this
    
    $ perl -MWx -le"print for Wx::Window->new->ClientToScreen( 0,0  )"
    ...
    $ perl -MWx -le"print for Wx::Window->new->ClientToScreen( Wx::Point->
    +new( 0,0 )  )"
    Wx::Point=SCALAR(0xda76e4)
    
  3. or download this
    $ perl -MWx -le"print for grep /clienttoscreen/i, keys %Wx::Window::"
    ClientToScreenPoint
    ClientToScreen
    ClientToScreenXY
    
  4. or download this
    
    $ perl -MWx -le"print for Wx::Window->new->ClientToScreenXY( 0,0  )"
    ...
    
    $ perl -MWx -le"print for Wx::Window->new->ClientToScreenPoint( Wx::Po
    +int->new( 0,0 )  )"
    Wx::Point=SCALAR(0x9cf5c4)