000
28.07.2006, 03:39 Uhr
J-jayz-Z
Perl Crack ala Carte (Operator)
|
Hi,
Ich hab in meiner Anwendung haufenweise Graphics.drawString(String,int,int) und benötige jetzt einen MouseListener dafür,weil etwas neues irgendwohin gezeichnet werden soll, wenn die Maus über eines dieser Strings fährt.Allerdings weiß ich grad mal gar nicht,wie ich dasmachen soll,ich kann ja schlecht Graphics mit einem MausListener belegen ... Jemand ne Idee ? -- perl -Mstrict -Mwarnings -e 'package blub; sub new { bless {} } sub bar {my $self=shift; $self->{bla}="66756e2d736f66742e6465"; return $self->{bla};} my $foo=blub->new();print "Hallo ";print pack("H*",$foo->bar()); print "\n"' |