- or download this
#!/usr/bin/perl --
use strict;
use warnings;
...
$demo->show_demo_window;
$app->MainLoop;
exit( 0 );
- 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)
- or download this
$ perl -MWx -le"print for grep /clienttoscreen/i, keys %Wx::Window::"
ClientToScreenPoint
ClientToScreen
ClientToScreenXY
- 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)