Форум: "Основная";
Текущий архив: 2002.04.08;
Скачать: [xml.tar.bz2];
ВнизКак узнать имя компьютера и логин пользователя?? Найти похожие ветки
← →
DikobraZ (2002-03-27 10:29) [0]Ну вот собственно и все...
← →
Виктор Щербаков (2002-03-27 10:31) [1]GetComputerName
GetUserName
← →
Glonia Zbanov (2002-03-27 12:44) [2]function DGetUserName:string;
var
s :string;
i :integer;
begin
i := 255;
s := Repl( " ", i);
GetUserName( PChar(s), i);
Result := Trim(s);
end;
← →
@andrew (2002-03-27 14:18) [3]А также, если есть замечательные компонентики от LMD, то там есть некий LMDInformationLabel, который может не только это, но и всякое другое сообщить полезное.
← →
Glonia Zbanov (2002-03-27 15:04) [4]то было для Delphi3 это для Delphi6:
var
i :Dword;
s :AnsiString;
begin
i := 255;
SetLength(s,255);
GetUserName(PChar(s),i);
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2002.04.08;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.005 c