Delphi - база знаний

       

Как получить имя текущего пользователя?


Как получить имя текущего пользователя?





function GetCurrentUser: string
var 
  pwrec: PPasswordRecord; 
begin 
  pwrec := getpwuid(getuid); 
  Result := pwrec.pw_name
end

Взято с сайта



Содержание раздела