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

[Alexander (S. S. <sas...@gm...>]

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} =~ /Firefox/) {
        $hwnd = $_->{hwnd};
        last;
    }
}
Win32::GUI::SetForegroundWindow($hwnd);
my $x = Win32::GUI::ScrollPos($hwnd, 0);
printf("Scroll pos: " . $x . "\n");

Win32::GUI::Scroll($hwnd, 1, SB_PAGEDOWN);

ScrollPos() returns the same value no matter what is the scroll position and
scroll() does nothing...