Im gleichen Ordner Exe öffnen

[HW764]

Ich will, dass mein Programm Start.exe ausführt. Die Start.exe ist immer im gleichen Verzeichniss wie mein Programm. Also soll mein Programm ein "Ausführ-Tool" sein.

Wer kann mir helfen?

Gruss HW764

[Sprint]

CreateProcess, ShellExecute, ShellExecuteEx und noch einige mehr.

[Pseudemys Nelsoni]

und guck auch nach "ExtractFilePath(Application.exename)"

[HW764]

Zitat:

und guck auch nach "ExtractFilePath(Application.exename)"

Aber dann kommt der Exename vom Programm, das ich benutze um ein anderes zu starten!

Gruss HW764

[S2B]

ExtractFilePath schneidet den Dateinamen aber ab! :wink:

[Meflin]

nein, durch das extractfilepath erhälts du den pfad in dem sich die exe befindet!

[HW764]

Ich habe keine Ahnung, wie ich das Coden soll!
Kann mir niemand helfen?

Gruss HW764

[SirThornberry]

wurde doch eigentlich schon gepostet, nur noch nicht aufm Silbertablet presentiert

Delphi-Quellcode:

  Shellexecute(..., PChar(ExtractFilePath(Application.exename) + 'Start.exe'),...);

[Sharky]

Delphi-Quellcode:

uses
 ShellApi;

procedure TForm1.Button1Click(Sender: TObject);
var
  myExePath : String;
  myApplication : String;
begin
  myExePath := ExtractFilePath(Application.ExeName); // Der Pfad zur eigenen Exe
  myApplication := myExePath + 'start.exe';  // Startpfad für 2. Exe
  ShellExecute(0, 'open',PChar(myApplication), NIL, NIL, SW_SHOW)  // und los
end;

Stand aber eigentlich schon alles in den Antworten ;-)

[Edit]Zu langsam :cry:

[freak4fun]

hallo,

kann ich den Pfad von ExtractFilePath auch ausgeben zB auf nen Label?

wenn ja bitte mit Quellcode

thx

mfg
freak

:coder: + :gruebel: = :wall: