[perl-win32-gui-users] Scroll functions not working

2008-12-13 Thread Alexander (Sasha) Sirotkin
For some reason functions like ScrollRange, ScrollPos, etc do not work for me. Is there any trick (or limitation) on using these functions on windows not created using Perl code ? Here is the problematic code, in case anybody cares to take a look: for ( ListWindows( ) ) { if ($_->{title} =~

Re: [perl-win32-gui-users] Drawing transparently.

2008-12-13 Thread Giuseppe Crisafulli
Jeremy, first off thank you for the reply. The example you've given works visually, but it is not what I intended to do obtain. :-) I think I should have given more details at the beginning. :-) The project I am currently working on will "repaint" ca 30 times per second. It will be a full-scree

Re: [perl-win32-gui-users] Drawing transparently.

2008-12-13 Thread Jeremy White
Hi, I think you are mixing drawing styles - try the below: cheers, jez. use strict; use warnings; use Win32::GUI(); use Win32::GUI::DIBitmap; use FindBin(); $|++; my $interval = 1000; my $dib = newFromFile Win32::GUI::DIBitmap("Zapotec.bmp") or die "newFromFile"; my $main = Win32::GUI::Wi