Help for this page

Select Code to Download

Select or download this

    $image = $mw->Photo(-format => 'Window',
        -data => oct($JTADisplay->id));
    $filename = 'myimage.jpg';
    $image->write($filename, -format => 'JPEG');

Select or download this

$mw = MainWindow->new(-background => 'black');
$mw->geometry('+0+0');
...
    $filename = 'myimage.jpg';
    $image->write($filename, -format => 'JPEG');
}