Ps: Für Dein Delphi 5 musst Du Char mit WideChar und String mit WideString ersetzen (ich kann es nicht prüfen da ich version 5 nicht habe)
Das reicht leider nicht aus. Wenn man explizit
Ansi oder Wide haben möchte, dann muss man auch ganz explizit die A oder W Variante der
API aufrufen.
Och, ich dachte das ich das mache mit dem GetProcAddress(GetModuleHandle('kernel32'), 'QueryFullProcessImageName
W'); Befehl.