Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 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);




Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.04.08;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.71 MB
Время: 0.016 c
1-22674           Юрий Федоров          2002-03-28 14:30  2002.04.08  
Как скрыть заголовок MDI-Child а?


1-22726           Yaro                  2002-03-26 09:44  2002.04.08  
TPasScript


1-22621           Dimedrol              2002-03-27 17:37  2002.04.08  
TreeView - каждый TNode со своим хинтом...


7-22869           АндрейФ.              2002-01-10 18:40  2002.04.08  
Чтение секторов на дисках


3-22552           Revo                  2002-03-15 15:18  2002.04.08  
Как из данные из текстовика перенести в IB5.0