ShellExecute klappt nicht

[Asfaloth]

Hi,
ich habe mit ein programm gebastelt, welches ein anderes aufrufen soll.

Delphi-Quellcode:

shellexecute(Application.Handle, 'open', 'updater.exe', nil, nil, SW_ShowNormal);

Das ist der Code. Die exe dateien befinden sich im selben verzeichnis.

Die Update.exe wird allerding nicht aufgerufen. wenn ich sie im exploerer starte klappt alles wunderbar.

Weiß einer woran das liegt? danke :)

Asfaloth

PS: Uses ShellAPI ist drinne ;)

[Balu der Bär]

Versuch mal:

Delphi-Quellcode:

Shellexecute(Application.Handle, 'open', ExtractFilePath(ParamStr(0)) + 'updater.exe', nil, nil, SW_ShowNormal);

Oder alternativ CreateProcess.

[mkinzler]

Versuch mal den Pfad mitanzugeben.

[Asfaloth]

der pfad kann ja variabel sein...je nach dem wo mans hinmacht....

[Balu der Bär]

Zitat:

Zitat von Asfaloth

der pfad kann ja variabel sein...je nach dem wo mans hinmacht....

Delphi-Quellcode:

ExtractFilePath(ParamStr(0))

Liest den aktuellen Pfad aus, wo es liegt. Hast du meinen Code mal ausprobiert? :roll:

P.S.: Eventuell kann es auch folgendes sein, habs nicht getestet:

Delphi-Quellcode:

Shellexecute(Application.Handle, 'open', PChar(ExtractFilePath(ParamStr(0)) + 'updater.exe'), nil, nil, SW_ShowNormal);

[Asfaloth]

klappt immernoch nicht -.-

ist im mom so:

Delphi-Quellcode:

shellexecute(Application.Handle, 'open', PChar(ExtractFilePath(ParamStr(0)) + 'updater.exe'), 'FTP PicUpper.exe', nil, SW_ShowNormal);

[Balu der Bär]

Guck mal was GetLastError sagt.

:gruebel:

[Asfaloth]

GetLastError sagt 2 ;)

LOL??
ich habe jetz einfach mal die 2 exe dateien in en anderes verzeichnis geschoben und es klappt...komisch

nunja...vielen dank an alle die mir geholfen haben :)

einen guten rutsch wünsch ich euch und dem rest auch ^^

[Christian Seehase]

Moin Asfaloth,

Fehler 2 = FILE_NOT_FOUND

Wenn Du es so abfragst:

Delphi-Quellcode:

ShowMessage(SysErrorMessage(GetLastError));

bekommst Du auch den Klartext.