我在一个子线程中创建一个进程
var
lpStartupInfo: TStartupInfo;
lpProcessInformation: TProcessInformation;
ProcessHandle: cardinal;
begin
FillChar(lpStartupInfo, SizeOf(TStartupInfo), 0);
FillChar(lpProcessInformation, SizeOf(TProcessInformation), 0);
ProcessHandle:= CreateProcess(nil,PChar(C:\Program Files\Windows Media Player\wmplayer.exe'),nil,nil,False,
CREATE_NEW_PROCESS_GROUP or NORMAL_PRIORITY_CLASS,
nil,nil,lpStartupInfo,lpProcessInformation);
if ProcessHandle > 0 then
WaitForSingleObject(ProcessHandle, INFINITE);我想请教下,当子线程在wait single的时候,我结束主程序。那么子线程仍旧在wait,是否有方法让wait中断。
貌似setevent(ProcessHandle)没用。555
var
lpStartupInfo: TStartupInfo;
lpProcessInformation: TProcessInformation;
ProcessHandle: cardinal;
begin
FillChar(lpStartupInfo, SizeOf(TStartupInfo), 0);
FillChar(lpProcessInformation, SizeOf(TProcessInformation), 0);
ProcessHandle:= CreateProcess(nil,PChar(C:\Program Files\Windows Media Player\wmplayer.exe'),nil,nil,False,
CREATE_NEW_PROCESS_GROUP or NORMAL_PRIORITY_CLASS,
nil,nil,lpStartupInfo,lpProcessInformation);
if ProcessHandle > 0 then
WaitForSingleObject(ProcessHandle, INFINITE);我想请教下,当子线程在wait single的时候,我结束主程序。那么子线程仍旧在wait,是否有方法让wait中断。
貌似setevent(ProcessHandle)没用。555
TerminateThread