Что такое @Localname[1]??? в GetHostByName???

← →
-=[SDA]=- © (2004-02-27 07:01) [0]

Хочу узнать IP машины с которой запускается программа... Нашел в форуме след. процедурку...

var
WSAData : TWSAData;
SockAddrIn : TSockAddrIn;
Host : PHostEnt;
LocalIp : string;
begin
if WSAStartup($101, WSAData) = 0 then begin
Host := GetHostByName(@Localname[1]);
SockAddrIn.sin_addr.S_addr:= longint(plongint(Host^.h_addr_list^)^);
LocalIP := inet_ntoa(SockAddrIn.sin_addr);
WSACleanUp;

... все хорошо, НО @Localname[1] - говорит, неизвестная переменная...
Итак, уважаемые дамы и господа, внимание вопрос: Что такое @Localname[1] и почему "Error: Undeclared identifier Localname???"
Заранее большое спасибо.... :))

← →
Dr.Null (2004-02-27 07:50) [1]

var WSAData : TWSAData; SockAddrIn : TSockAddrIn; Host : PHostEnt; LocalIp : string; Localname : array[0..31] of Char; begin if WSAStartup($101, WSAData) = 0 then begin GetHostName(Localname, 32); Host := GetHostByName(Localname); SockAddrIn.sin_addr.S_addr:= longint(plongint(Host^.h_addr_list^)^); LocalIP := inet_ntoa(SockAddrIn.sin_addr); WSACleanUp;

Ваааууууу!!!..... Dr.Null
Дальнейших успехов и процветания тебе....
..... Спасибо!!! Все заработало со страшной силой!

Что такое @Localname[1]??? в GetHostByName??? Найти похожие ветки