I just uninstalled my old build of both ActivePerl and Win32-GUI and installed 
the latest releases. Rebooted and everything.  Win32-GUI is not working right 
anymore????   I ran a small program (with a ListView, see below code) that ran 
fine with older releases of Perl and Win32-GUI, but runs like garbage with the 
new installs. The ListView looks like hell.  I can't see the control at all, no 
borders, no column headers.  All I see are the words "Apples  Pears  Oran..."   
all on the same row?????    What I should see is a column header "FRUIT" and 
underneath that I should see Apples on the first row, Pears on the second row, 
and Oranges on the third row.  Anybody tried the latest Perl build with latest 
Win32-GUI build and experienced any problems???

Thanks,
Eric
Dallas, TX USA

use Win32::GUI;

$W = new Win32::GUI::DialogBox(
    -name => "Window",
    -text => "ListView Test",
    -width => 275,
    -height => 250,
    -left => 50,
    -top => 50
);

$LV = $W->AddListView(
         -name => "ListView",
         -left => 12,
         -top => 10,
         -height => 200,
         -width  => 225, 
);
$LV->View(1);       # detailed listing, i.e. columns and rows

$W->Show();
$W->BringWindowToTop();
Load_ListView();

Win32::GUI::Dialog();

sub Load_ListView {
   $LV->InsertColumn(-index => 1, -width => 200, -text => "FRUIT");  
   
   $LV->InsertItem(-item => 0, -text => "Apples");
   $LV->InsertItem(-item => 1, -text => "Pears");
   $LV->InsertItem(-item => 2, -text => "Oranges");
}  

sub Window_Terminate {
   return -1;
}

#-- END SCRIPT


Reply via email to