Delphi操作windows的相关方法工具类

【例子介绍】

windows操作方法，如取文件版本信息，相关服务操作，进程操作，文件操作和窗体消息等等

【相关图片】

【源码结构】

function KillTask(ExeFileName: string): Integer;
function CheckTask(ExeFileName: string): boolean;
function GetApplicationInf(FilePath: string): string;
function GetFileVersion(AFileName: string): string;
function CopyDirAll(sDirName: string; sToDirName: string): Boolean;
function CopyDirExceptIni(sDirName: string; sToDirName: string; iniFile: string): Boolean;
function IsFileInUse(AName: string): boolean;
{---------------  服务操作  -----------------}
function ServiceStart(const ServiceName: string; const Computer: PChar = nil): Boolean;
function ServiceStop(const ServiceName: string; const Computer: PChar = nil): Boolean;
function ServiceGetStatus(sService: string; const sMachine: PChar = nil): DWord;
function UnInstallService(sService: string; const sMachine: PChar = nil): Boolean;