Works with me ... I have two windows, one button in the first window brings the other to top. Complete code snippet attached for you to check if it works with you and figure out the differences to yours. Oh, and I only checked on Win2k.
Have fun, Harald > -----Original Message----- > From: Glenn Linderman [mailto:[EMAIL PROTECTED] > Sent: Mittwoch, 6. Juni 2001 18:25 > To: Win32::GUI > Subject: [perl-win32-gui-users] BringWindowToTop doesn't > > > Hi, > > So I've got this code, and it doesn't bring the window to the top. I > can see that each time I click on the notify icon that the code gets > executed, both because the print statement fires, and the window > redraws. But the window stays behind other windows, in spite of the > BringWindowToTop call. It does that with or without the Hide/Show > sequence, and with or with a Disable/Enable sequence wrapped > around the > BringWindowToTop. ActivePerl 5.6.1 build 626, Win32::GUI > 0.0.558. What > trick am I missing? > > I'm quite willing to throw all this away, and use whatever > works... this > is just what sounded like should work from the documentation. > > I should note that $mw is using the "parent window" trick to > avoid being > on the task bar. I further note that sufficient Alt-Tab keystrokes do > eventually raise the window to the top. > > sub notify_icon_Click > { if ( $mw -> IsVisible ()) > { print "Bring Main to Top\n"; > $mw -> Hide (); > $mw -> BringWindowToTop (); > $mw -> Show (); > } > } > > -- > Glenn > ===== > Due to the current economic situation, the light at the > end of the tunnel will be turned off until further notice. > > > > _______________________________________________ > Perl-Win32-GUI-Users mailing list > Perl-Win32-GUI-Users@lists.sourceforge.net > http://lists.sourceforge.net/lists/listinfo/perl-win32-gui-users >
X.PL
Description: Binary data
