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

[Johan L. <jo...@ba...>]

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", "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) {
     $AnimateWindow->Call( ... );    #To fade
} else {
     $winApp->Hide();
}

As in web development, it's often better to check for capabilities than for 
software versions (you don't check if it's IE, you check for the 
document.all array).


/J

-------- ------ ---- --- -- --  --  -    -     -      -         -
Johan Lindström    Sourcerer @ Boss Casinos     jo...@ba...

Latest bookmark: "Burningbird The Parable of the Languages"
http://weblog.burningbird.net/archives/000581.php
dmoz (1 of 7): /Computers/Programming/Languages/Scripting/ 55