delphi怎么让它把命令执行完了自动重新起动程序

解决方案 »

  1.   

    执行完后加一句application.Terminate,
    然后调用ShellExecute(Handle, 'open', PChar(你程序的路径), nil, nil, SW_SHOW);
      

  2.   

    procedure TForm1.Button1Click(Sender: TObject);
    begin
      ShowMessage('重启程序');
      WinExec(PChar(ParamStr(0)), SW_SHOW);
      ExitProcess(0);
    end;
      

  3.   

    呵呵,做一个程序,再加一个服务.程序在某处REG(也可以别处目录文件什么的)写一个程序目录及名称,加上一个标识二三个字段吧.程序退出时,在标识中加1,默认为0服务程序一直在查询REG特别目录(也可以一段时间内查询一次),如果REG标识为1时,把前面的信息
    当成参数,启动该程序.记得不要用自带的TIMER(要不用线程,要不用高精定时器)
      

  4.   

    可以另外写一个 2.exe
    主程序1.exe调用那个2.EXE,
    2.exe 用api把1.exe关闭
    再执行命令
    再调用执行1.exe
      

  5.   


    先启动一个bat,它等几秒钟再运行指定的程序
      

  6.   


    这个不错,不需要写另外一个exe