您所在位置：主题：运行以下代码，未能杀掉进程conime.exe,错在哪里呢?
powerprefectsoftwate
[专家分：180] 发布于 2009-09-23 10:13:00
在主程序中声明API、添加timer
Declare Integer WinExec in kernel32 string, integer &&声明API
_screen.AddObject('mykill','mytimer') &&向主窗口添加一个自定义类
DEFINE CLASS mytimer as Timer &&定义类，时间为1/2秒。
interval = 500
PROCEDURE timer
MyCommand="TASKKILL /F /PID conime.exe" &&这是一条DOS命令。也可直接运行。但如果
= WinExec (MyCommand,0) &&直接运行会出现讨厌的黑屏，所以用API
ENDPROC
ENDDEFINE
Declare Integer WinExec in kernel32 string, integer &&声明API
_screen.AddObject('mykill','mytimer') &&向主窗口添加一个自定义类
DEFINE CLASS mytimer as Timer &&定义类，时间为1/2秒。
interval = 500
PROCEDURE timer
MyCommand="TASKKILL /F /PID conime.exe" &&这是一条DOS命令。也可直接运行。但如果
= WinExec (MyCommand,0) &&直接运行会出现讨厌的黑屏，所以用API
ENDPROC
ENDDEFINE
