Johannes,
Try, maybe this:
# Create window
my $window = new GUI::Window( # __options___
);
# Add some controls to window
#Grab DOS window handle
my $DOS = Win32::GUI::GetPerlWindow();
# Hide DOS window
Win32::GUI::Hide($DOS);
# Show window
$window->Show();
Win32::GUI::Dialog();
#__more_code__
# Remeber to show the dos window
# when your script is finished
Win32::GUI::Show($DOS)
Regards,
[ erick ]
On Tue, 7 Jan 2003 21:57:26 +0100
[EMAIL PROTECTED] (johannes huettemeister) wrote:
> HI,
>
> im totally newbie to Win32::GUI. So maybe one very foolish question: when i
> execute one of the sample skripts included, I always get the command.exe
> window (msdos-box formerly i guess).
> Is there a way to avoid this?
> Im really no windows expert, but since I got to use it at work, I need to run
> perl with windows.
> cheers Johannes.
>
