Forum: Programmieren allgemein
by RWarnecke,
8. Okt 2007
Mit dieser Funktion liest Du Systemvariablen aus :
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
Forum: Programmieren allgemein
by RWarnecke,
8. Okt 2007
Warum so umständlich, man nehme einfach die Systemvariable %APPDATA% ist seit Windows 2000 immer der gleiche Pfad. Auch bei anderen Sprachen.