From: DanielMS <dan...@ya...> - 2006-09-12 21:25:03
|
Hi Mark, thank you for your answer. In the meantime I changed my code to somthing like this for each button: #----------------------------------------------------------- EVT_BUTTON($panel, $panel->{button}{"pl_button"}, sub {=20 =20 my $anzahl =3D $rightchecklistbox->GetCount(); my @items; =20 for (0..$anzahl) { #der gr=C3=B6=C3=9Fte Index zuerst, damit das l=C3= =B6schen funktioniert unshift(@items,$_) if $rightchecklistbox->IsChecked($_);=20 } =20 foreach (@items) { $rightchecklistbox->Delete($_) } =20 $self -> SetStatusText("Pakete wurden aus der Liste gel=C3=B6scht!"); =20 } ); #----------------------------------------------------------- Therefore I had to create the buttons like that: #----------------------------------------------------------- $panel->{button}{"pl_button"} =3D Wx::Button->new( $panel, # parent window .... #----------------------------------------------------------- I'm not sure of what exactly means $panel->{button}{"pl_button"} but it works fine! I found this in another sample programm. PW-Dialog works! But as far as I understand the wxwindows doc, the common dialogs have only one text entry field, is that right? So if I need a dialo= g for username and pw, I have to create it on my own?=20 The other thing with the icon I will try later. best regards Daniel --=20 View this message in context: http://www.nabble.com/Some-more-Questions-tf2= 248962.html#a6274707 Sent from the wxperl-users forum at Nabble.com. |