Zitat von
Luckie:
So ein Mist. So geht es jetzt:
Delphi-Quellcode:
result := CreateProcessWithLogonW(PWideChar(User), nil, PWideChar(PW),
LOGON_WITH_PROFILE, nil, PWideChar(Application+' "'+CmdLine+'"'),
CREATE_DEFAULT_ERROR_MODE, nil, nil, @si, @pif);
if not result then
MessageBox(hApp, PChar(SysErrorMessage(GetLastError)), APPNAME, MB_ICONSTOP);
Ja, so hatte ich es ja auch ausprobiert.
Zitat von
Luckie:
Aber das ist Mist, weil dann die aufrufende Routine die Fehlerbehandlung nicht machen kann.
Du könntest als Rückgabewert den Wert von GetLastError zurückgeben:
Delphi-Quellcode:
CreateProcessBlubb(...);
result := GetLastError;
So würde zumindest ich es machen
Wenn CreateProcessWithLogonW() True zurückgegeben hat, müsste GetLastError() ja 0 sein. Und andernfalls hat es halt einen bestimmten Fehlerwert. In der Aufruffunktion überprüfst du dann das Ergebnis auf 0 und gibst entsprechend die Fehlermeldung passend zum Fehlercode aus, sofern die Funktion nicht 0 zurückliefert. Erfordert zwar eine weitere Variable, aber der Compiler sollte sie in ein Register packen können (
wäre glaub' ich sogar schneller, weil nur ein Wert geladen wird Schwachsinn, stattdessen wird er vorher geladen, macht absolut keinen Unterschied, wenn der Compiler die Variable in ein Register packt).
Zitat von
Luckie:
Hier übrigens dein feuchter Händedruck:
Der trieft ja schon fast