Einzelnen Beitrag anzeigen

Benutzerbild von Spezi1980
Spezi1980

Registriert seit: 11. Aug 2003
Ort: Dresden OT Cossebaude
71 Beiträge
 
Delphi 2005 Personal
 
#15

Re: Progamm im ersten Programm starten

  Alt 23. Jul 2004, 12:50
Hallo ne etwas andere Idee:

Delphi-Quellcode:
procedure Starte Programm;
 var Strings : TStrings;
begin
    //wir nehmen eine Batchdatei,
    //da kannst du soviel reinpacken mit nochsoviel
    //Parametern wie du willst
    Strings := TStringlist.create;
    try
        Strings.add('@echo off'); //schaltet die Anzeige ab
        Strings.add('test.exe /bla /bla /blabla'); //Dein Programm mit Parametern
        Strings.add('del %0'); //löscht die batchdatei nach der ausführung
        //Datei speichern (Ich hasse es, wenn ein Programm etwas irgendwohin speichert.)
        Strings.savetofile(IncludetrailingBackslash(extractfilepath(Paramstr(0)))+'Test.bat');
    finally
       Strings .free;
    end;
    //Batchdatei starten
    ShellExecute(Application.Handle, 'open',
                 IncludetrailingBackslash(extractfilepath(Paramstr(0)))+'Test.bat',
                 nil, nil, SW_SHOW);
end;
Kann das leider nicht so testen weil ich hier kein Delphi hab. Müsste aber funktionieren.
Robert
Codito, ergo sum.
>>I code, therefore I am<<
  Mit Zitat antworten Zitat