Hallo,
beim Umstieg auf Delphi 10.x finde ich immer noch Fehler. Ich benutze FindExecutable, um aus meinem Programm heraus das Standartprogramm für JPG usw. auf zurufen. Bei Tif klappt das es gibt PhotoViewer.dll zurück bei Jpg Errorcode 31 nichts zugeordnet.
Sieht so aus:
Delphi-Quellcode:
Prog:=StrAlloc(255);
Er:=FindExecutable(PWideChar(ExtractFileName(fs)),PWideChar(ExtractFilePath(fs)), PWideChar(Prog));
case Er of
31: Result:='';
0,
ERROR_FILE_NOT_FOUND,
ERROR_PATH_NOT_FOUND: Result:='Fehler';
else
Result:=Prog
end;
Wenn es bei Tif geht, kann mein Funktionsaufruf nicht falsch sein. Willie.