I started task mgr manually. This worked. w2k.

use Win32::GuiTest qw(FindWindowLike GetWindowText SetForegroundWindow
SendKeys);

$Win32::GuiTest::debug = 0; # Set to "1" to enable verbose mode

my @windows = FindWindowLike(undef, "Windows Task Manager", ".");

#print join "\n", @windows;


for (@windows) {
# print "$_>\t'", GetWindowText($_), "'\n";
 SetForegroundWindow($_);
 SendKeys("%{space}n");

}

> -----Original Message-----
> From: [EMAIL PROTECTED]
> [mailto:[EMAIL PROTECTED]]On Behalf Of
> Dirk Bremer
> Sent: Wednesday, November 28, 2001 4:05 PM
> To: perl-win32-users
> Subject: Minimize Window
>
>
> I have started an instance of the Winnt Task Manager using
> Win32::Process, and once it has started, I would like to minimize it. How
> may I accomplish this in Perl?
>
> Dirk Bremer - Systems Programmer II - AMS Department - NISC
> 636-922-9158 ext. 652 fax 636-447-4471
>
> <mailto:[EMAIL PROTECTED]>
>
>
> _______________________________________________
> Perl-Win32-Users mailing list
> [EMAIL PROTECTED]
> http://listserv.ActiveState.com/mailman/listinfo/perl-win32-users
>
>


_______________________________________________
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
http://listserv.ActiveState.com/mailman/listinfo/perl-win32-users

Reply via email to