当exe文件启动时,如何按照配置的ini来控制该程序执行或切换以及立即终止?
比如我在双击1.exe时,1.exe所配置的ini文件没有满足,须立即切换至2.exe,并且不运行1.exe。或者说在ini文件没有满足的情况下,运行的实际上是另一个文件,而不是两个文件一起运行。如何做到?
希望看到帖子的大侠帮帮忙,最好能有书写的程序。我在线等待,谢谢!

解决方案 »

  1.   

    一个exe程序a.exe做启动程序,用户用这个,
    a.exe根据ini条件启动不同的程序后,自己停止运行(application.terminate)
      

  2.   

    在dpr文件里面写检验程序,
    符合则继续,不符合则退出或执行另一个程序.用winexec()执行其它.
      

  3.   

    smilelhh(blue) 、happyzsl(学习) 
    如何具体实现呢?希望能有书写的程序。
      

  4.   

    //簡單的例子,你自己再修改一下
    procedure TForm1.FormCreate(Sender: TObject);
    var
      iniRead: TIniFile;     //uses inifiles
      sExeRun: string;
    begin
      iniRead := TINIFile.Create(ExtractFilePath(Application.Exename) + '1.ini');
      try
        sExeRun :=iniRead.ReadString('Exe', 'IsRun', 'N');
      finally
        iniRead.Free;
      end;  if sExeRun = 'N' then
      begin
        WinExec(PChar('notepad.exe'), SW_SHOWNORMAL);
        //你可以把notepad.exe修改成自己的第二個程序
        Application.Terminate
      end;
    end;//1.ini文件里的內容
    [Exe]
    IsRun=N
    //IsRun<>N就運行自己
    //IsRun=N就不運行自己,運行別的程序