Forum: Programmieren allgemein
Delphi
by KodeZwerg,
6. Mai 2018
Ich bin der Meinung EnvironmentStrings unterliegen nicht diesem Limit, ein Test kann ja nicht Schaden.
Forum: Programmieren allgemein
Delphi
by KodeZwerg,
6. Mai 2018
ExpandEnvironmentStrings(PWideChar(Filename), lpDest, Length(lpDest)) sicher das Length(lpDest) ausreicht? in meinem Beispiel wird von einem maximal wert ausgegangen und dann mit trim() gekürzt.
Forum: Programmieren allgemein
Delphi
by KodeZwerg,
6. Mai 2018
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);
Forum: Programmieren allgemein
Delphi
by KodeZwerg,
6. Mai 2018
Im anderen Thread ist Source, da ich mir dachte das Du ihn verabscheust hab ich hier das Binary geladen.
Ok ich halt mich raus.
Forum: Programmieren allgemein
Delphi
by KodeZwerg,
5. Mai 2018
Hi, nur um was klarzustellen, Display Name muss keinen Inhalt haben.
Im Anhang ist ein mini Konsolen Programm zum Auslesen aktueller Werte.
Damit kannst Du gut Gegenprüfen ob Du auf dem Richtigen Weg bist.
Falls es Dir gefällt hier ist ein Link der Dich zum Source führt. (CPP!)
Forum: Programmieren allgemein
Delphi
by KodeZwerg,
3. Mai 2018
Ich gab Dir hier eine Funktion, wenn Du die mit Deiner ermittelten PID aufrufst, was kommt da raus, das was bei Dir auch rauskommen sollte?