| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Вопрос по ClientSocket [D7, WinXP]

Luka.rus ©   (2006-04-19 18:04:00) 

мне нужно создавать много ClientSocket одной программе, я создал массив:

clients: array[0..100] of TClientSocket;

и динамически создаю и уничтожаю сокеты:


 for i:= 0 to 100 do
   if clients[i] = Nil then begin
     clients[i]:= TClientSocket.Create(self);
     clients[i].Tag:= iTag;
     clients[i].Address:= Edit1.Text;
     clients[i].Port:= StrToInt(Edit2.Text);
     clients[i].OnRead:= ClientRead;
     clients[i].Active:= True;
     CreateClient:= clients[i];
     Break;
   end;
end;

но когда отправляю данные:
GetByTag(Socket.SocketHandle).Socket.SendBuf(r,a);

функция возвращает 0. r - массив из Byte, a - размер.
более того, проверка
clients[0].Socket.Connected
показывает, что сокет не работает, хотя я его запускаю при создании :( что я упустил?

---

SergP   (2006-04-24 18:41:00) [1]

> Luka.rus   (22.04.06 16:35) [4]
> 2SergP
> программа что-то вроде туннеля, из одной сети в другую.
> она принимает все входящие соединения, создает для каждого
> клиент и подключает его с основному серверу.


А зачем массив создавать?... Т.е. зачем хранить где-то указатели если они либо не нужны, либо в нужный момент нужный указатель и так можно получить... ?
Кроме того используя статический массив количество соединений будет ограничено , а если использовать динамический - код будет большим...

---

Luka.rus   (2006-04-22 16:35:00) [2]

2SergP
программа что-то вроде туннеля, из одной сети в другую. она принимает все входящие соединения, создает для каждого клиент и подключает его с основному серверу.

---

SergP   (2006-04-22 10:43:00) [3]

> Luka.rus   (19.04.06 18:04)  


А зачем такое кол-во соединений с одним и тем-же сервером?

---

Slym   (2006-04-21 15:32:00) [4]

Код напоминает DoSилку... но очень плохую

---

Сергей М.   (2006-04-21 14:24:00) [5]

> что я упустил?


Ты упустил то что в режиме ctNonBlocking успешная установка св-ва Active = True (или эквивалентный по назначению успешный вызов метода Open) не является признаком фактического установления соединения.

Таким признаком является факт возникновения события OnConnect.

Идеальная же логика подразумевает вызов любого метода передачи не раньше чем возникнет самое первое событие OnWrite.

---

Наверх