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


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


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





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

Взято с сайта



Начало  Назад  Вперед



Книжный магазин