> It has taken me this long to get around to playing with David Hiltz's 
> GUI Builder.  Unfortunately, I am having trouble getting it to run.  It 
> seems I get the recurring error:
> 
> Can't locate auto/Win32/GUI/MenuItem/SetMenuItem.al in @INC 
> (@INC contains : C:/Perl/lib C:/Perl/site/lib .) at 
> C:/Perl/site/lib/Win32/GUI.pm line 452

  The email that accompanied the GUI Builder explained how to fix this..

  GUI.pm Change:

     To support Sub-menus, change GUI.pm, line 451 (for build 434)
     --- from -----
      $M->{$parent}->SetMenuItemInfo(
                    -submenu => $M->{$parent."_SubmenuButton"}
                   );
     --- to -------
      $M->{$parent}->Change(
                    -submenu => $M->{$parent."_SubmenuButton"}
                   );
     --------------

  Also, there is a memory leak in the FAKE_Paint subroutine which causes
  the graphics to turn to a thick black line.  I have fixed this in the
  version I'm currently developing, but here is the fix:

  Add these two lines...

     my $Old_SelectObject1 = $DC->SelectObject($NoPen);
     my $Old_SelectObject2 = $DC->SelectObject($ButtonBrush);

  after...

     my $WhiteBrush  = new Win32::GUI::Brush( [255,255,255] );

  And at the very end of the subroutine add these two...

   $DC->SelectObject($Old_SelectObject1);
   $DC->SelectObject($Old_SelectObject2);

  I'm currently waiting for the next release of Win32::GUI before continuing
  on with the further development.

  -dhiltz



Reply via email to