当前位置:编程学习 > Delphi >>

一段Delphi代码,求解释

var

ProcessInfo:TProcessInformation;
StartUp:TStartupInfo;

 

FillChar(StartUp,SizeOf(StartUp),$00);
  StartUp.wShowWindow:=SW_HIDE;
  if CreateProcess(nil,PChar(BatFileName),nil,nil,False,IDLE_PRIORITY_CLASS,nil,nil
  ,StartUp,ProcessInfo) then
    begin
      CloseHandle(ProcessInfo.hProcess);
      CloseHandle(ProcessInfo.hThread);
    end;
    Application.Terminate;

 

麻烦了。详细点谢谢。

答案:

var                          //定义

ProcessInfo:TProcessInformation;               //进程类
StartUp:TStartupInfo;

 

FillChar(StartUp,SizeOf(StartUp),$00);                    //初始化字符数据
  StartUp.wShowWindow:=SW_HIDE;                             //窗体隐藏
  if CreateProcess(nil,PChar(BatFileName),nil,nil,False,IDLE_PRIORITY_CLASS,nil,nil
  ,StartUp,ProcessInfo) then                                       //判断进程是否已经被创建,如已创建则
    begin
      CloseHandle(ProcessInfo.hProcess);                  //关闭进程
      CloseHandle(ProcessInfo.hThread);                 //关闭线程
    end;
    Application.Terminate;                              //结束程序




不知道有没有达到要求

判断进程是否创建,如果创建了就关闭这个进程

上一个:谁能帮我解决这个问题Delphi7 ?
下一个:求用Delphi做的考勤统计窗口的代码

CopyRight © 2012 站长网 编程知识问答 www.zzzyk.com All Rights Reserved
部份技术文章来自网络,