[perl-win32-gui-users] combobox making me crazy

[Peter Eisengrein]

Hi all,

This is making me nuts. I have a combobox dropdown that shows on my window
but it does not show the data when I click on it. I copied this same exact
code into the comboxbox.pl sample and it works. Aaaaaaaarrgggghhhh!

Any help would be greatly appreciated. I'll just bang my head on the wall
'til then...

-Pete

#################################################################

my @months = ('',Jan,Feb,Mar,Apr,May,Jun,Jul,Aug,Sep,Oct,Nov,Dec);

my $fromMonth = $Window->AddCombobox( 
        -name   => "fromMonth",
        -left   => 65, 
        -top    => 440,
        -width  => 60, 
        -height => 150,
        -style  => WS_VISIBLE | 2 # | WS_NOTIFY,
);

foreach (@months)
{
        $fromMonth->InsertItem("$_");
}

sub fromMonth_Change 
{
        my $selection=$fromMonth->SelectedItem();
        my $fromMonthSelection=$months[$selection];
        print "fromMonthSelection=$fromMonthSelection $selection\n";
        return 0;
}