Einzelnen Beitrag anzeigen

hoika

Registriert seit: 5. Jul 2006
Ort: Magdeburg
8.270 Beiträge
 
Delphi 10.4 Sydney
 
#1

ShellExecute 42, GetLastError 126

  Alt 8. Jun 2017, 08:13
Hallo,

folgender Code funktioniert plötzlich nicht mehr,
d.h. der für Txt hinterlegte Editor (notepad.exe) wird nicht gestartet.

Delphi-Quellcode:
var
  sDateiName: String;
  hInst: Integer;
  iError: Integer;
begin
  sDateiName:= 'C:\Temp\Log.txt'; // nur zum Testen
  
  if FileExists(sDateiName) then
  begin
    hInst := ShellExecute(0, nil, PChar(sDateiName), '', nil, 0);
    iError := GetLastError;
  end;
hInst=42
iError=126


Was ist das denn?
Heiko

Geändert von hoika ( 8. Jun 2017 um 09:12 Uhr)
  Mit Zitat antworten Zitat