Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Socket Connect в домашних условиях :)

Змей © (2005-03-28 02:19:00)
ДОбрый вечер Мастера!
вот посмотрел свой IP
у клиента указываю адрес: мой IP
порт допустим 1001
и в серваке 1001
две формы серверная и клиентская
запускаю на своем компе обе компоненты все конектится
попробовали с товарищем:
скинул ему клиента! запуск! выдает ошибку(сервак не находит)
Asynchronous soccet error 10061
че нельзя законектиться никак?

вот в клиенте делаю:
procedure TForm1.FormCreate(Sender: TObject);
begin
if ClientSocket1.Active then
ClientSocket1.Close;
clientsocket1.Open;
Flash := False;
edit1.Text:=ClientSocket1.Socket.LocalAddress;
edit2.Text:=ClientSocket1.Socket.LocalHost;
end;
procedure TForm1.ClientSocket1Connect(Sender: TObject;
Socket: TCustomWinSocket);
begin
ClientSocket1.Socket.SendText('con'+edit1.Text+':'+edit2.Text);
end;
памахите плз.
СПАСИБО!

Hawkie (2005-04-07 01:08:00) [1]
1001 - это не служебный порт.
Змей, если ты о TClientSocket и TServerSocket, то ошибка которая у тебя возникла появляется в сетях, где встречаются динамическое и статическое назначение IP. Поэтому попробуй вариант, чтоб в локальной сетке Клиент и Сервер находились либо оба в статике либо оба в динамике.

Толян (2005-03-29 11:21:00) [2]
Попробуй порты с 2000 это не стандартные порты

Змей (2005-03-28 14:05:00) [3]
в локалке все пашет
а какой тгда можно ииспользовать?

TankMan (2005-03-28 06:33:00) [4]
Все может быть из за 1001 порта - это служебный порт (вроде бы...)

Наверх

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