|
Registriert seit: 29. Mai 2002
37.621 Beiträge
Delphi 2006 Professional
|
Re: BUffer leeren.
5. Mär 2007, 11:46
Und hier die Kurzform:
Delphi-Quellcode:
function GetLoggedinUser: String;
var
Buffer: PChar;
len: Cardinal;
begin
if GetUserName(Buffer, len) then
SetString(Result, Buffer, len);
end;
Michael
Ein Teil meines Codes würde euch verunsichern.
|