Zitat von
DJ-SPM:
Der funzt prima.
Nö, er erzeugt einen String mit vielen #0 am Ende.
Es sollte eher so aussehen:
Delphi-Quellcode:
function GetWinDir():
string;
begin
// Reserviere direkt im Ergebnis den Speicherplatz für die Ausgabe der API-Funktion
SetLength(Result, MAX_PATH);
// Die API-Funktion füllt das Ergebnis und gibt die Länge zurück
SetLength(Result, GetWindowsDirectory(PChar(Result), Length(Result)));
end;