Opened by Probo at 2011-04-09 13:14
User since
2010-09-11
6 Artikel
BenutzerIn
![[default_avatar]](/battie/theme/default/default_avatar.gif)
2010-09-11
6 Artikel
BenutzerIn
Hallo liebes Forum,
ich bin etwas durcheinander und evtl. fehlt mir auch etwas Hintergrundwissen was Referenzen angeht, aber das hier ist schon recht merkwürdig.
$suchbeggriff ist ein EntryWidget und $scrl eine ScrollListBox.
Der Button übergibt $suchbegriff und $scrl an die Subroutine datenbank_suche wo ich dann mittels $suchbeggriff->get; den Eintrag hole und in
$scrl die Ergebnisse reinschreibe.
Das klappt sogar recht gut.
Mein Problem ist das hier:
$scrl scheint beim <Enter> Event einfach nicht bei datenbank_suche anzukommen.
Warum nur klappt es beim Button?
Grüße Probo
ich bin etwas durcheinander und evtl. fehlt mir auch etwas Hintergrundwissen was Referenzen angeht, aber das hier ist schon recht merkwürdig.
Code: (dl
)
my $button1 = $frame4 -> Button(-text => "Suchen", -command =>[\&datenbank_suche, $scrl,$suchbegriff], -width=>'20' )
$suchbeggriff ist ein EntryWidget und $scrl eine ScrollListBox.
Der Button übergibt $suchbegriff und $scrl an die Subroutine datenbank_suche wo ich dann mittels $suchbeggriff->get; den Eintrag hole und in
$scrl die Ergebnisse reinschreibe.
Das klappt sogar recht gut.
Mein Problem ist das hier:
Code: (dl
)
my $enter=$suchbegriff->bind('<Return>',[\&datenbank, $scrl,$suchbegriff]);Code: (dl
)
1
2
3
4
5
6
7
8
9
###
sub datenbank_suche {
###
my $scrl = shift;
my $hash = shift;
my $sucher = $hash->get;
....
}
$scrl scheint beim <Enter> Event einfach nicht bei datenbank_suche anzukommen.
Warum nur klappt es beim Button?
Grüße Probo