怎么去掉cmd黑框框?

ggglw

system("help.chm");帮助文件运行了,可是伴随者一个黑框框.如何去掉黑框框.Win32::GUI编程.

wxlfh

用wperl.exe解释你的Perl脚本程序。

ggglw

用wperl.exe解释你的Perl脚本程序。

我试了,还是不行.

xti9er

原帖由 ggglw 于 2009-12-13 23:00 发表
system("help.chm");帮助文件运行了,可是伴随者一个黑框框.如何去掉黑框框.Win32::GUI编程.

flw

得用 ShellExecute 代替 system 才行。

1. use Win32::API;
   
2. 
   
3. sub ShellExecute {
   
4.     my $file = shift;
   
5. 
   
6.     my $ShellExecute = new Win32::API( 'shell32', 'ShellExecute', 'IPPPPI', 'I' ) or return;
   
7.     $ShellExecute->Call( 0, 'open', $file, 0, 0, 3 );
   
8. }

复制代码

ggglw

see,thanks, flw BZ.

wxlfh

system("hh.exe help.chm");

sithui

wperl有效啊。
这两天在看Tkx的例程，运行的时候总是有黑框，很不爽。这下解决了，多谢楼上各位。！

ggglw

风云使者的system("hh.exe help.chm"); 也行,但不知做如何解释?