Das könnte eine Erklärung für Probleme sein, die ich schon einmal mitbekommen habe.
Vielleicht geht es mit GetModuleFilename korrekt?
Delphi-Quellcode:
function GetModuleFileNameWrapper: string;
var
lpFileName: array[0..MAX_PATH] of Char;
begin
FillChar(lpFileName, SizeOf(lpFileName), #0);
GetModuleFileName(HInstance, lpFileName, MAX_PATH);
Result := lpFileName;
end;