Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.02.20;
Скачать: CL | DM;

Вниз

помогите разобраться с NetBios   Найти похожие ветки 

 
PIF   (2005-02-01 18:38) [0]

Пожалуйста помогите кто может!!!У меня такая проблема: нужно, что-бы при
первом запуске моя программа считывала имя компьютера и пользователя
(а можно и (или) какие-нибудь еще данные) и записывала их в файл.
При последующих же запусках, оно их считывала из файла и сверяла
с данными машины.
Есле не трудно приведите пример программы, если можно, то полное соответствие с моим вопросом!  
Заранее премного благодарен!!


 
DSKalugin ©   (2005-02-01 18:48) [1]

procedure TdmRead.DataModuleCreate(Sender: TObject);
var P: array [0..MAX_COMPUTERNAME_LENGTH+1] of AnsiChar;
   n: DWord;
begin
 StartDir:=ExtractFileDir(ParamStr(0));
 GetComputerNameA(P,n);
 Manager.ManagerName:=StrPas(P);
end;

Для юзера соответственно GetUserName


 
Kerk ©   (2005-02-01 18:51) [2]

А где тут про нетбиос?



Страницы: 1 вся ветка

Текущий архив: 2005.02.20;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.057 c
8-1098004175
focor
2004-10-17 13:09
2005.02.20
MicroPhonoClack


1-1107740278
TReader
2005-02-07 04:37
2005.02.20
Как правильно использовать ReadInteger в TReader ?


1-1107732875
woman
2005-02-07 02:34
2005.02.20
TGrid


1-1107506133
Jay1982
2005-02-04 11:35
2005.02.20
Handle контрола чужого окна


14-1106953426
Narik
2005-01-29 02:03
2005.02.20
Скачайте Demo Delphi 2005