"Externer Prozess nicht möglich" bei ShellExecuteEx, Win11

[hoika]

Hallo,

toll, Fehlermeldung wurde von uns "erfunden"

Delphi-Quellcode:

if CreateProcess then
begin
end
else
begin
  MessageBox(.. "externer Prozess nicht möglich");
end;

Und nein, nat. wird GetLastError nicht ausgewertet und angezeigt oder geloggt ...

[DeddyH]

Normalerweise schreibt man dann aber „Es ist ein Fehler aufgetreten“, so dass man gleich weiß, dass man an der Stelle geschlampt hat <sarcasm off>.

[Bernhard Geyer]

Zitat von DeddyH:

Normalerweise schreibt man dann aber „Es ist ein Fehler aufgetreten“, so dass man gleich weiß, dass man an der Stelle geschlampt hat <sarcasm off>.

Ach komm. So genau will es doch keiner Wissen.

GetLastErrorCode schon ausgewertet?
Das ist bei sowas zwingend abzufragen.
Am besten im Programm in Logdatei schreiben lassen, falls man die Nummer dem Anwender nicht zumutet.

[himitsu]

Ist das nun der Fehlercode von ShellExecute, oder kommt der Fehler in der Batch?
OK, sowas macht man natürlich nicht.
GetLastError, SysErrorMessage, RaiseLastOSError und dann Fehlercode mit Nummer, Text und einem Zusatztext, damit man weiß wo im Programm (wenn man nicht schon Fehlerdialog mit Debuginfos hat)

Fehlerbehandlung mit MessageBoxen ist eh total krank, da man dort nicht mit TryFinally arbeiten kann.



Statt .BAT ein .CMD probiert?

CreateProcess statt ShellExecute.

....



Ist das Programm unsigniert
oder hat "böse" Wörter im Namen (setup usw.),
bzw. wie heißt die Batch?


Echt mal, warum kommt niemand auf die Idee den ErrorCode mit auszugeben?
Oder schaut selber nach, welcher Fehler das ist und gibt eine suchbare Bezeichnung an?
Der engliche Text oder den Name der Konstante, so ala ERROR_NO_PROC_SLOTS.




"geht nicht" oder einfach ein TerminateProcess als Reaktion, reicht vollkommen aus, wenn man sowieso zu nix Lust hat. (Letzteres macht Eurekalog und Co. auch gern, wenn ihnen was nicht gefällt)

[hoika]

Hallo,
nat. ist die Exe signiert (extended val.). pah

GetLastError, und der ganze andere Kram, pah

OK, mein Vorgänger kannte das nicht wirklich ...

Zitat:

warum kommt niemand auf die Idee den ErrorCode

Weil es auf dem eigenem Rechner und keinem Testrechner der Firma auftritt, Herr Naseweis

Nein, im Ernst, es zeigt wieder.
Aufruf fremden Codes komplett kapseln.

jaja, olle Besserwisser

[himitsu]

Och, kapseln ist nicht unbedingt nötig, aber eine gute Fehlerbehandlung (ordentliche Auswertung aller Rückgabewerte) ist Gold wert.

Hätte man aber vorher die Fehlerbehandlung halbwegs richtig gemacht, dann hätte man jetzt mehr Infos ... gerade weil es ein Kundensystem ist und ihr in dem Moment nicht davor sitzt.

[himitsu]

Delphi-Quellcode:

if not CreateProcess(...) then
  RaiseLastOSError;  // das Minimum, was man nach Belieben ausbauen kann
...

Delphi-Quellcode:

if not CreateProcess(...) then begin
  Err := GetLastError;
  //raise Exception.CreateFmt('irgendwas: %d %s', [Err, SysErrorMessage(Err)]);
  E := EOSError.Create('irgendwas: ' + SysErrorMessage(Err));
  E.ErrorCode := Err;  // ja, ist irgendwie total krank, dass Borland/Codegear/Embarcadero seit Jahrzehnten die passenden überladenen Contructoren vergessen hat.
  raise E;
end;
...