Task beenden

[DeddyH]

Das würde ich ein wenig anders schreiben:

Delphi-Quellcode:

procedure TForm1.Timer1Timer(Sender: TObject);
begin
  if world and not ExeCheck(path+'world.exe') then  
    MyShellExecute('world.exe');

  if realm and not ExeCheck(path+'realmserver.exe') then 
    MyShellExecute('realmserver.exe') ;

  if login and not ExeCheck(path+'loginserver.exe') then 
    MyShellExecute('logonserver.exe');

end;