Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Имя компа [D6, Win95/98, WinXP]


serko ©   (2005-02-04 21:18:00) 

Мастера помогите! Как можно определить сетевое имя компьютера?


Sour Smile   (2005-02-07 10:48:00) [1]

В скобках:
lpBuffer - указатель на буфер в которую функция поместит результат
nSize - размер этого буфера, а после возврата из функции в этой переменной будет реальная длина имени.
Вот паскалевская надстройка над API-функцией:

functionComputerName: String;
var
 buf: PChar;
 k: Cardinal;
begin
 k:=MAX_COMPUTERNAME_LENGTH+1;
 GetMem(buf, k);
 GetComputerName(buf, k);
 SetString(Result, buf, k);
 FreeMem(buf);
end;


serko   (2005-02-04 22:49:00) [2]

А что там в скобках надо писать?


GanibalLector   (2005-02-04 21:59:00) [3]

GetComputerName ?


serko   (2005-02-04 21:44:00) [4]

Своего!


Vit@ly   (2005-02-04 21:38:00) [5]

Какого компьютера? Своего? Или компьютера в сети по IP?


Наверх

Титульная страница Поиск, карта сайта Написать письмо