PerlApp GUI發生問題

lokchungk

UID: 6618
帖子: 74
积分: 170
在线时间: 7 小时

1^# lokchungk 发表于 2007-09-19 19:48

PerlApp GUI發生問題

高手;
你好
我用perl做了一個調用cmd shell的程式

system ('net user baggio /add')

我用PerlApp把它轉為.exe
並加了-gui
但是運行時還彈出了cmd shell
請問有什麼可以隱藏那些CMD Shell?

Lonki

UID: 21498
帖子: 1
积分: 2
在线时间: 10 分钟

2^# Lonki 发表于 2007-09-19 20:30

--gui

确定会跳?

flw

UID: 21204
帖子: 144
积分: 331
在线时间: 1 天 4 小时

3^# flw 发表于 2007-09-19 22:06

[Copy to clipboard] [ - ]

CODE:

Win32::SetChildShowWindow(SHOWWINDOW)
[CORE] Sets the *ShowMode* of child processes started by system().
By default system() will create a new console window for child
processes if Perl itself is not running from a console. Calling
SetChildShowWindow(0) will make these new console windows invisible.
Calling SetChildShowWindow() without arguments reverts system() to
the default behavior. The return value of SetChildShowWindow() is
the previous setting or "undef".

或者用 Win32::API 调 WinExec