ShellExecute - funktioniert nicht.

[skyquaker]

Ich möchte mit ShellExecute ein externes Programm aufrufen. Diese Programm ist ein compiliertes (gepacktes) PERL Script (PerlAPP).

Delphi-Quellcode:

ShellExecute(Application.Handle, nil, PChar('.\bin\programm.exe'),'','',SW_SHOW);

Wenn ich es so mache, wird das Programm nicht einmal angezeigt.

Delphi-Quellcode:

Batch:

.\bin\programm.exe
pause

Delphi-Quellcode:

ShellExecute(Application.Handle, nil, PChar('.\bin\test.exe'),'','',SW_SHOW);

Auf diese Weise startet das Programm trotzdem nicht. Ich kriege einen Fehler angezeit, der mit Ressourcen des PERL Scripts zu tun hat.

Wenn ich die Batch Datei oder die Exe manuell aufrufe, funktioniert sie einwandrei.


mfg skyquaker

[lbccaleb]

kontrolliere mal, ob er die datei überhaupt findet, das kannst du mit fileexists('deine datei') machen..

[Bbommel]

Moin,

wieso gibst du als zweiten Parameter "nil" mit? Das ist ja die Operation, die er machen soll und ich hab da immer 'open' stehen.

Also:

Delphi-Quellcode:

ShellExecute(Application.Handle, 'open', PChar('.\bin\programm.exe'),'','',SW_SHOW);

Bis denn
Bommel

[skyquaker]

Zitat:

Zitat von lbccaleb

kontrolliere mal, ob er die datei überhaupt findet, das kannst du mit fileexists('deine datei') machen..

FileExists meldet "TRUE"

[skyquaker]

Zitat:

Zitat von Bbommel

Moin,

wieso gibst du als zweiten Parameter "nil" mit? Das ist ja die Operation, die er machen soll und ich hab da immer 'open' stehen.

Also:

Delphi-Quellcode:

ShellExecute(Application.Handle, 'open', PChar('.\bin\programm.exe'),'','',SW_SHOW);

Bis denn
Bommel

'open' habe ich auch schon ausprobiert, selber Effekt.

Das Problem scheint mit der EXE zu tun zu haben. Sie sucht eine Ressource, die sie nicht finden kann. Wenn ich sie manuell aufrufe läuft sie jedoch einwandfrei.

[Bbommel]

Ach so, noch eine Idee: ShellExecute gibt einen Wert zurück, den du abfangen und z.B. per MessageDlg ausgeben kannst. Laut Hilfe sollte er größer als 32 sein, damit der Aufruf erfolgreich war, der Rest unter 32 ist dann ein Ferhlercode.

Bis denn
Bommel

[Luckie]

Gib mal in Arbeitsverzeichnis an und/oder versuch es mal mit einem absoluten Pfad, wer weiß zu was dein relativer Pfad relativ ist.

Aber erst Maßnahme ist immer, den Rückgabewert auszuwerten, dann spart man sich das rumgerate, auch hier im Forum. :?

[jmit]

Hast Du Dir schon einmal folgenden Link angeschaut:

ShellExecute vom Delphi-Treff

Gruß Jörg

[skyquaker]

Ich hab die Exe Datei (und ihre Ressourcen) probehalber ins Anwendungsverzeichniss verschoben und siehe da: Es geht ohne Probleme. Die Andwendung kann also im Verzeichniss "BIN" ihre Ressourcen nicht finden und sucht sie im Anwendungsverzeichniss "..\BIN". Kann ich das irgendwie beheben oder muss ich alles einfach aus dem Anwendungsverzeichniss heraus aufrufen?

[Bbommel]

Der fünfte Parameter gibt das Arbeitsverzeichnis an. Hast du denn schon mal

Delphi-Quellcode:

ShellExecute(Application.Handle, nil, PChar('.\bin\programm.exe'),'',PChar('.\bin'),SW_SHOW);

versucht?

Wahlweise auch mal an beiden Stellen mit absoluten Pfad-Angaben testen...

Bis denn
Bommel

[skyquaker]

So, das ist zwar nicht unbedingt wie ich es mir vorgestellt habe, es scheint jedoch zu funktionieren.

Delphi-Quellcode:

ShellExecute(Application.Handle, 'open',PChar(ExtractFilepath(ParamStr(0))+'bin\test.bat'),'.\',PChar(ExtractFilepath(ParamStr(0))+'bin'),SW_NORMAL);

Das seltsame daran ist, dass es nur absolute Pfadangaben akzeptiert (das Problem hatte ich mit ShellExecute noch nie) und das sich das Programm ausschließlich über die Batch Datei aufrufen lässt (ohne Batch startet es garnicht erst).

Das mit der Pfadangabe hatte ich vorher schon einmal probiert, ich hatte jedoch ein "\" am Ende stehen, weshalb auch das nicht funktioniert hat.

[Luckie]

Das ist genau so, wie es funktioniert. Wer weiß wo der relative Pfad hinzeigt bei dir. Und den Rückgabewert hast du immer nboch nicht ausgewertet. Beim nächsten Fehler raten wir hier wieder rum, wie die Blöden.

[Fussball-Robby]

Zitat:

Zitat von skyquaker

So, das ist zwar nicht unbedingt wie ich es mir vorgestellt habe, es scheint jedoch zu funktionieren.

Delphi-Quellcode:

ShellExecute(Application.Handle, 'open',PChar(ExtractFilepath(ParamStr(0))+'bin\test.bat'),'.\',PChar(ExtractFilepath(ParamStr(0))+'bin'),SW_NORMAL);

ShellExecute mit ExtractFilePath(ParamStr(0)) zu verwenden, ist doch das einzig Richtige :roll: Wie Michael jetzt schon (mehrmals glaube ich) gesagt hat, beim relativen Pfad ohne ParamStr(0) weißt du jenach dem, wie dein Programm gestartet wurde, nie wo der hinzeigt.

[FGD]

Ich möchte keinen neuen Thread aufmachen.

Wie kann man ein Programm mit Parametern starten.

In einer Verknüpfung würde es so aussehen:

Code:

...\ROClientGame.exe" Benutzname MD5-Hash

[DeddyH]

Schau Dir mal den 4. Parameter von ShellExecute an.