Geöffnete Fenster auf dem Desktop erkennen.. - #113620 (Graphische Oberflächen)

MatthiasW

2008-08-17 20:43

User since
2008-01-27
367 Artikel
BenutzerIn
[default_avatar]

Den genannten Funktionen nach gehe ich mal von Windows aus.
Da solltest du folgendermaßen die sichtbaren Fenster bekommen:

Code (perl): (dl )

my $starthwnd = $GetDesktopWindow->Call(); # get desktop window, all other windows are childs of this one

my $hwnd = $GetWindow->Call( $starthwnd, 5 ); # get first child window

while ($hwnd)
{
        my $is_visible = $IsWindowVisible( $hwnd );

        print "$hwnd ", ( $is_visible ? 'is' : 'is not' ), " visible\n";

        $hwnd = $GetWindow->Call( $hwnd, 2 ); # get next window
} # while

Vorher musste natürlich noch die Funktionen über Win32::API holen.

MfG

perl -E'*==*",s;;%ENV=~m,..$,,$&+42;e,$==f;$"++for+ab..an;@"=qw,u t,,print+chr;sub f{split}say"@{=} me"'