Ok, below is another example of issues between a Ming built 671 and VC built
671 (via the sourceforge PPM). This one is  more worrying since it is
effecting NEM/OEM. The Ming built 671 works correctly.

The example creates a main window, with a child window contained with in it.
The child window has two NEM events, scroll and resize. The main window has
code for the OEM event Resize.

Under VC: The only event that works is the NEM scroll event in the child
window.
Under Ming: All events work (the OEM parent window resize, and the child NEM
resize and NEM scroll)

Both examples were run under perl 5.6.

Very strange.

jez.

===========================
use Win32::GUI;
use strict;

my  $mainwin = new Win32::GUI::Window(
   -name => 'Main',
   -text => 'Main',
   -width  => 686,
   -height => 566,
  );

my  $win = new Win32::GUI::Window (
   -parent => $mainwin,
   -name => "TabWindow",
   -height => 200,
   -width => 200,
   -top => 0,
   -left => 0,
   -popstyle => WS_CAPTION | WS_SIZEBOX,
   -pushstyle => WS_CHILD,
   -pushexstyle => WS_EX_CLIENTEDGE,
   -hscroll => 1,
   -onResize => sub {print "NEM TabWindow resize \n"},
   -onScroll => sub {print "NEM TabWindow scroll \n"},
);

$mainwin->Show();
$win->Show();
Win32::GUI::Dialog;

sub ::Main_Resize {
  my ($width, $height) = ($mainwin->GetClientRect)[2..3];
  print "main resize \n";
  $win->Resize($width,$height);
  return 1;
}


----- Original Message ----- 
From: "Laurent ROCHER" <[EMAIL PROTECTED]>
To: "Jeremy White" <[EMAIL PROTECTED]>; <[EMAIL PROTECTED]>;
<perl-win32-gui-hackers@lists.sourceforge.net>
Sent: Tuesday, March 23, 2004 9:23 PM
Subject: Re: [perl-win32-gui-hackers] Odd problem with 671


>
> I have the backgound paint problem only in perl 5.6 with VC.
> But, work nice in perl5.005 (VC), perl56 (MinGW) and perl 5.8 (VC &
MINGW).
>
> I don't know what wrong.
>
> Laurent.
>
> > Today has been one of those days - if it can go wrong, it has!
> >
> > Anyway, I've retested - and there is a problem - although I'm having
> > difficult in getting a small enough example working (I'll try again in
the
> > morning). However, I came across another issue with PPM 671 and 671
built
> > with ming. The issue is with the -flicker option.
> >
> > I'm on XP, with 5.6.1 (I'll do testing on win98 boxes tomorrow).
> >
> > The example below (created by Steve a couple of months back) runs fine
on
> > ming 671, but with the PPM version the background of the window isn't
> > painted, causing a mess in the window.
> >
> > Very strange.
> >
> > Cheers,
> >
> > jez.
>


Reply via email to