when you create your DialogBox, use option:

-topmost => 1,



-----Original Message-----
From: Steven Swenson [mailto:[EMAIL PROTECTED]
Sent: Monday, February 03, 2003 7:39 PM
To: Win32GUI
Subject: [perl-win32-gui-users] Topmost Windows?


How does one get a window to sit on top?

I tried the following but it did not seem to work.

use strict;
use constant WS_EX_TOPMOST => 8;
use constant WS_DLGFRAME   => 0x400000;
use constant GWL_EXSTYLE   => -20;


my $main = Win32::GUI::DialogBox->new(
   -name    => "Main",
   -title   => "AD Migration",
   -left    => 100,
   -top     => 100,
   -width   => 260,
   -height  => 180,
   -style   => main::WS_DLGFRAME,
   -background => [255,255,255]
);

$main->SetWindowLong ( main::GWL_EXSTYLE, main::WS_EX_TOPMOST);



-------------------------------------------------------
This SF.NET email is sponsored by:
SourceForge Enterprise Edition + IBM + LinuxWorld = Something 2 See!
http://www.vasoftware.com
_______________________________________________
Perl-Win32-GUI-Users mailing list
Perl-Win32-GUI-Users@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/perl-win32-gui-users

Reply via email to