[perl-win32-gui-users] combobox

[Jacques Choquette XX (QB/EMC)]

I am trying to see the first item in the list that I have built for a
combobox.
When I run the script, the combobox is there but I cannot see the item
like 'info'
What am I doing wrong? I am using Perl 5.8 on Windows 2000

$Window->AddCombobox(
    -name         => "CB",
    -dropdown => 1,
    -left         => 50,
    -top          => 100,
    -height       => 80,
    -width        => 80,
    -hasstring      => 1,
    -onChange => \&GetInfoCB,
    -tabstop      => 1,
#    -uppercase => 1,
#    -sort => 1,
);
$Window->CB->Add('none', 'info', 'warning', 'error');
$Window->CB->SetTopIndex('1');
$Window->CB->TopIndex('1');
$Window->CB->FirstVisibleItem('1');
------------------------------------------------
From: Jacques Choquette
Sun Hardware Admin
Tel: 514-345-7900 x 43463