Всем доброго дня. Как получить имя текущего пользователя в Linux аналогично Windows.GetUserName
Спасибо
Модератор: Модераторы
user:string;
S:=TProcess.Create(Nil);
S.Commandline:='whoami';
S.Options:=[poUsePipes,poNoConsole];
S.execute;
Repeat
Count:=s.output.read(buf,BufSize);
// reverse print for fun.
For I:=1 to count do
user:=user + buf[i];
until Count=0;
function GetEnvironmentVariable(
const EnvVar: String
):String;
Вернуться в Free Pascal Compiler
Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 4