Forum: Win32/Win64 API (native code)
Delphi
by FriFra,
18. Nov 2006
Ich hab jetzt die Lösung gefunden...
Bezeichnung:
function GetMyComputerName(Default: string = ''): string;
function ExpandEnvStr(const szInput: string): string;
begin
SetLength(Result, ExpandEnvironmentStrings(pChar(szInput), nil, 0));
ExpandEnvironmentStrings(pChar(szInput), @Result, Length(Result));
Result := StrPas(@Result);
end;
Forum: Win32/Win64 API (native code)
Delphi
by FriFra,
7. Nov 2006
Hat keiner eine Idee? Irgendwie muss das doch gehen... ich kann doch mit div. Tools das Icon vom Arbeitsplatz verändern, Das möchte ich dann aber auch auslesen können ;)