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

Вниз

Имя компьютера.   Найти похожие ветки 

 
Flex ©   (2004-11-06 19:26) [0]

Как узнать имя компьютера(не IP, а имя(название))?


 
Piter ©   (2004-11-06 19:38) [1]

Какого блин компьютера?

P.S. Ну надо так вопросы формулировать...


 
Flex ©   (2004-11-06 19:55) [2]

на котором прга запущена.


 
Anatoly Podgoretsky ©   (2004-11-06 19:57) [3]

Не поверишь, но это GetComputerName


 
Flex ©   (2004-11-06 20:31) [4]

Ни за что бы не догадался!!!!


 
Intruder ©   (2004-11-10 12:56) [5]

Интересный вопрос, а вот интереснее было бы узнать по NetBios имени IP, MAC адрес, через консоль это делатся очень лечко, а вот как вытащить это в делфи...


 
Digitman ©   (2004-11-10 13:55) [6]


> Flex ©   (06.11.04 20:31) [4]
> Ни за что бы не догадался!!!!


шишек еще много, знать, набъешь ..

ибо дотумкать, что в станд. Справке следует искать нечто в виде Get(получить, узнать нечто)Computer(компьютер)Name(bvz) - это чрезвычайно сложно.


 
Sicilla   (2004-11-12 19:19) [7]

function GetIPName(Add: string): string;
begin
    addr := inet_addr( pchar(add) ); // Эта ф-ция преобразует IP из текстового вида в cardinal сразу в сетевом порядке байт
    Host := gethostbyaddr(@addr,SizeOf(Addr),AF_inet);
    if Host <> nil then
            Result := Host.h_name
     else
            Result := "<unknown>";
end;

Удачи, и не обращай внимания, здесь любят потрепаться



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

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

Наверх




Память: 0.48 MB
Время: 0.025 c
14-1102509878
}|{yk
2004-12-08 15:44
2004.12.26
UPI: Ким Чен Ир, возможно, умер


1-1102647545
Relaxxx
2004-12-10 05:59
2004.12.26
Отрезание конца строки, как так сделать?


14-1102570620
uny
2004-12-09 08:37
2004.12.26
Mcafee 9 pro?


1-1102709098
Lelik
2004-12-10 23:04
2004.12.26
Обращение с QReport


14-1102335915
by
2004-12-06 15:25
2004.12.26
Соединяющие запросы в .Net и Delphi