RE: [perl-win32-gui-users] Animated windows [working demo]

2002-10-09 Thread Frazier, Joe Jr
> my $AnimateWindow = new Win32::API("user32", "AnimateWindow", > [ 'N', 'N', > 'N' ], 'N') or $reg{'UI'}{'Fading'} = 0; > > So taking that into account when doing stuff is easy. There > even is no need > for a special var, $AnimateWindow itself can be used, like so: > > if($AnimateWindow) {

RE: [perl-win32-gui-users] Animated windows [working demo]

2002-10-09 Thread Johan Lindstrom
At 19:00 2002-10-09 -0400, Frazier, Joe Jr wrote: What happens if you try to call a API that does not exist? Does Win32::API trap the error or do you get an exception? In any event, you could have a config page/menu/window From Luiginos demo: my $AnimateWindow = new Win32::API("user32", "An

RE: [perl-win32-gui-users] Animated windows [working demo]

2002-10-09 Thread Frazier, Joe Jr
What happens if you try to call a API that does not exist? Does Win32::API trap the error or do you get an exception? In any event, you could have a config page/menu/window with this setting disabled(non updateable) and turned off by default, then verify the OS version is x or higher (using W

RE: [perl-win32-gui-users] Animated windows [working demo]

2002-10-09 Thread Johan Lindstrom
At 17:40 2002-10-09 -0400, Lihn, Steve wrote: It does not work on Win NT !? The original post said Windows XP. That figures. If you keep it as a "cool ting", and not use it to carry an actual feature (that breaks if this doesn't work), it could be a good thing. /J -- ---

RE: [perl-win32-gui-users] Animated windows [working demo]

2002-10-09 Thread Lihn, Steve
It does not work on Win NT !? Does it? Steve Lihn -Original Message- From: Luigino Masarati [mailto:[EMAIL PROTECTED] Sent: Tuesday, October 08, 2002 12:12 PM To: perl-win32-gui-users@lists.sourceforge.net Subject: [perl-win32-gui-users] Animated windows [working demo] This is a wor