Canvas - Wo ist der Mauszeiger? - #43411 (Graphische Oberflächen)

jemand

2005-04-12 17:34

User since
2004-05-14
231 Artikel
BenutzerIn
[default_avatar]

ja ich hab näch längerem suchen dann nochmal was anderes gefunden das ging auch.
Falls wer mal den code braucht:

Code: (dl )

1
2

$canv->CanvasBind('<3>' => sub {
    my ($x, $y) = ($Tk::event->x, $Tk::event->y);

print uc 'i',chr(29*4).q+'s +.++($_=q-m-),++$_;
print chr for 116,$_[0],97,$_[0],98;
print 'ug,',chr(), scalar reverse qq?!erutaef a s'ti?;