проблемы с winsock

[helpprogramh]

я написал клиент и сервер с использованием winsock.
клиент:

WSAStartup($101,D);
client:=socket(AF_INET,SOCK_STREAM,0);
if (client=INVALID_SOCKET) then
begin
  showmessage('socket error');
  form1.Close;
end;
addr.sin_family:= AF_INET;
addr.sin_addr.s_addr:=inet_addr('192.168.0.128');

addr.sin_port:= htons(3000);
err:=connect(client,addr,sizeof(addr));

если на одном компе запускать и клиент и сервак товсе нормально работает, хотя после

addr.sin_addr.s_addr:=inet_addr('192.168.0.128');

addr.sin_addr.s_addr=-2147440448,но все соединяется нормально.Если пробовать сервер и клиент на разных компах, соединенных через роутер, подсоединиться то err=-1.telnet подсоединяется к моему серваку.Кто может сказать в чем проблема

[veniside]

адрес сервера за роутером задаётся доменным именем или айпишником?

[helpprogramh]

ip,ip брал из ipconfig

[veniside]

> ip брал из ipconfig

а вот это зря. Нужен ip роутера, а не локальный ip серверной машины. Хотя, как у вас при этом telnet соединялся с кем-то, загадка.

[helpprogramh]

я запускал серв на одном компе, и через телнет коннектился на него. Непонятно почему inet_addr отрицательное значение выдает, или это нормально?

[veniside]

в общем на роутере нужно пробросить порт на серверный комп, и должно работать.

> или это нормально?

128 = $80, старший бит установлен, так что так и должно быть.