hey danke ..die pdf ist echt cool. also der fehler war mir schon bekannt ich frage mich nur wieso der zustande kommt...
es kommt mir so vor als würde er diese funktion nicht ausführen bzw kennen wenn ich das mit ausführen als öffnen will:
Delphi-Quellcode:
function GetEnvVarValue(const VarName: string): string;
var
BufSize: Integer; // buffer size required for value
begin
// Get required buffer size (inc. terminal #0)
BufSize := GetEnvironmentVariable(PChar(VarName), nil, 0);
if BufSize > 0 then
begin
// Read env var value into result string
SetLength(Result, BufSize - 1);
GetEnvironmentVariable(PChar(VarName),
PChar(Result), BufSize);
end
else
// No such environment variable
Result := '';
end;
GetEnvVarValue('APPDATA')