Zitat von
marabu:
Delphi-Quellcode:
function ExpandEnvStr(const szInput: string): string;
begin
SetLength(Result, ExpandEnvironmentStrings(pChar(szInput), nil, 0));
ExpandEnvironmentStrings(pChar(szInput), @Result[1], Length(Result));
end;
Danke! So gehts beinahe perfekt. Ein Problem hab ich noch. Wenn ich '%programfiles%\a' übergebe, wird mir
C:\Program Files\a l zurückgegeben. Wo kommt das l her?!
Grüße
Faux
Faux Manuel
Wer weiß, dass er nichts weiß, weiß mehr, als der der nicht weiß, dass er nichts weiß.
GoTrillian