请问我想编一个程序，类似于批处理文件，功能是在c;\建一个temp目录，再把c:\windows\a.ini文件剪切到temp的目录下，再运行c:\aa.exe,怎

Question

谢谢！

Answer 1

1. if not DirectoryExists('c:\TEMP') then
    begin
       if not CreateDir('c:\TEMP') then
         raise Exception.Create('未能创建' + c:\TEMP 请手动创建');
    end;

Answer 2

procedure TForm1.Button1Click(Sender: TObject);
var f: textFile;
begin
AssignFile(f,'delete.bat');   //建立文件
Rewrite(f);
Writeln(f,'md '+ 'c:\temp');
Writeln(f,'move '+'c:\windows\a.ini c:\temp');
Writeln(f,'c:\aa.exe');
CloseFile(f);
WinExec('delete.bat',SW_HIDE);    //执行bat文件
end;