摘要：
classprocedureTVTUpgrader.UpdateSelf(constFileName:TVTString);varLBatchFile:TextFile;LBatchFileName:TVTString;LProcessInfo:TProcessInformation;LStartUpInfo:TStartupInfo;begin//批处理文件名LBatchFileName:=ExtractFilePath(ParamStr(0))+'_deleteme.bat';//打开文件，设置覆盖模式AssignFile(LBatchFile,LBatchFileName 阅读全文
