Shellexecute - Pfad und Dateiname übergeben

[Andy]

Hallo,

hab zwar zu Shellexecute hier schon einiges gelesen, aber leider nicht die richtige Lösung gefunden.

Mein Problem:
Ich möchte aus einer DLL heraus eine Exe starten, wobei sich DLL und EXE im gleichen Verzeichnis befinden. Dazu verwende ich ShellExecute, das auch wie im Beispiel dargestellt tadellos funktioniert.

Delphi-Quellcode:

var 
sExePath, sFileName : string

begin
    sExePath:= 'C:\Program Files\Borland\Delphi5\Projects\Test\';
    sFilename:= 'TestDatei.exe';
    ShellExecute(Application.Handle, 'open', PChar( sFileName ),nil,
                 pChar( sExePath),sw_ShowNormal);
end;

Wenn ich aber

Delphi-Quellcode:

sExePath:= ExtractFilePath( Application.ExeName );

verwende, dann passiert gar nichts, obwohl sExePath in beiden Fällen gleich ist.
Weiß da jemand Rat? :roll:

Danke
Andy

[edit=Luckie] Mfg, Luckie[/edit]

[Luckie]

Application.Exename funktioniert eben, wie man eigentlich schon vermuten könnte nur bei Anwendungen. Um den Pfad deiner DLL rauszufinden, musst du GetModuleFileName nehmen.

[FriFra]

Das liegt an der Leerstelle im Pfad... das zerlegt den vermeintlich einen Parameter in 2:

ParamStr(1) = 'C:\Program'
ParamStr(2) = 'Files\Borland\Delphi5\Projects\Test\TestDatei.exe '

Du kannst das Problem lösen, indem Du den Parameter in Hochkommata einschliest. also:

'"C:\Program Files\Borland\Delphi5\Projects\Test\TestDatei.exe" '

...dann wird der Wert als ein Parameter übergeben ;)

[Andy]

Hallo,

herzlichen Dank für die schnelle Hilfe.
Hab die zwei Vorschläge ausprobiert und es klappt mit Beiden.

Bis Bald
Andy