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

Вниз

gethostbyaddr возвращает ошибку...   Найти похожие ветки 

 
tovSuhov ©   (2002-03-21 10:47) [0]

... WSANO_DATA. Но я так и не понял, что это значит...
Разъясните пожалуйста, что она означает.
Вот код:
AnsiString GetHost(AnsiString IPAdress)
{
TWSAData * WSAData;
PHostEnt HostEntPtr;

WSAStartup( 0x101, WSAData );//init winsock
if (IPAdress.Length() == 0)
Application->MessageBox("Host not entered", "Error!", MB_OK+MB_ICONERROR);


in_addr ia;
ia.S_un.S_addr = inet_addr(IPAdress.c_str());

HostEntPtr = gethostbyaddr(inet_ntoa(ia),4,AF_INET);
.....


 
Song ©   (2002-03-21 11:18) [1]


Function TForm1.GetHstName:String; {Получение имени хоста}
Var WSAData : TWSAData;
Name:array [0..$FF] of Char;
begin
WSAStartup($0101, WSAData);
GetHostName(Name,$FF);
SetString(Result,Name,$FF); // Копируем буфер в строку
Result:=Copy(Result,1,StrLen(PChar(Result))); // Обрезаем строку по нулевому символу
WSACleanup;
end;


 
Anatoly Podgoretsky ©   (2002-03-21 21:49) [2]

Result := PChar(Result);
Делает тоже самое


 
Song ©   (2002-03-21 21:52) [3]

2Anatoly Podgoretsky © (21.03.02 21:49)
Мы лёгких путей не ищем :)))
Да нет шутка. Просто на тот момент, как-то не подумал.


 
Anatoly Podgoretsky ©   (2002-03-21 21:56) [4]

Я просто предположил, что ты скопировал старый текст.



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

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

Наверх




Память: 0.47 MB
Время: 0.014 c
1-6986
Крутой ниндзя
2002-05-21 14:09
2002.06.03
Как определить, какие *.bpl взять с собой?


14-7198
XEL
2002-04-25 16:21
2002.06.03
ПРОГРАММА ПОД ДОС ДЛЯ УМЕНЬШЕНИЯ СКОРОСТИ CDROM


1-6957
фл
2002-05-22 14:25
2002.06.03
значения TShiftState?


14-7159
mio
2002-04-22 17:02
2002.06.03
Длина шнурков


3-6890
Sergeyy
2002-05-08 12:06
2002.06.03
Lookup fields ADOQuery error