try this.
 
darrik

> > use Win32::GUI;
> > $Main = Win32::GUI::Window->new(
> >     -name   => 'Main',
> >     -width  => 350,
> >     -height => 200,
> >     -text   => 'Pick a name'
> >             );
> > $NameList = Win32::GUI::Combobox->new(
> >     $Main,
 
        -name   =>      "NameList",                     <~~~~~~~~~~~ ***!***
 
> >     -top    => 40,
> >     -left   => 15,
> >     -style  => WS_VISIBLE | 3 | WS_VSCROLL | WS_TABSTOP,
> >     -width  => 300,
> >     -height => 160,
> >     );
> > 
> > $NameList->Add("Billy","David","Kevin","Ross");
> > 
> > sub NameList_GotFocus {
> >     print STDOUT "GotFocus Event...\n";
> > }
> > sub NameList_LostFocus {
> >     print STDOUT "LostFocus Event...\n";
> > }
> > sub NameList_Change {
> >     print STDOUT "Change Event...\n";
> > }
> > $Main->Show();
> > Win32::GUI::Dialog();
> > sub Main_Terminate {
> >         -1;
> > }
> 


Reply via email to