Hättest du im Forum gesucht, dann hättest du u.a. das hier gefunden:
Delphi-Quellcode:
function ExpandEnvStr(const szInput: string): string;
begin
SetLength(Result, ExpandEnvironmentStrings(pChar(szInput), nil, 0));
ExpandEnvironmentStrings(pChar(szInput), @Result[1], Length(Result));
end;
Aber ich sehe gerade, dass du mit der environment expansion zurecht kommst. Dann fehlt nur noch die
Beschreibung deines eigentlichen Problems.
Grüße vom marabu