[Gelöst] Relativen Pfad in absoluten umwandeln

[ringli]

Wie wäre es damit?

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
  ShortName,
  LongName: string;
begin
  ShortName:= 'system32\dateiname.exe';
  LongName := FileSearch(ShortName, GetEnvironmentVariable('Path'));
  showmessage(LongName);
end;