Как получить имя текущего пользователя?
01.01.2007
function GetCurrentUser: string;
var
pwrec: PPasswordRecord;
begin
pwrec := getpwuid(getuid);
Result := pwrec.pw_name;
end;
Delphi Russian Knowledge Base
DRKB - база знаний по Дельфи в рунете, составленная Виталием Невзоровым