Главная страница
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.071 c
6-1102328286
DelphiN!
2004-12-06 13:18
2005.02.20
Получение исход. вход. трафика из компонента TidMappedPortTCP


8-1099917444
Змей
2004-11-08 15:37
2005.02.20
конец файла


11-1091774698
Ricko
2004-08-06 10:44
2005.02.20
7 битная кодировка


3-1106556894
sergeymist
2005-01-24 11:54
2005.02.20
как подставить данные полученные из query в список combobox


14-1106519766
Pat
2005-01-24 01:36
2005.02.20
Права категории "B" хотят разбить на 2 подкатегори