Вниз
Скачать: CL | DM;

Вопрос по ClientSocket   Найти похожие ветки 

← →
Luka.rus   (2006-04-19 18:04) [0]

мне нужно создавать много 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
показывает, что сокет не работает, хотя я его запускаю при создании :( что я упустил?


← →
Сергей М. ©   (2006-04-21 14:24) [1]


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


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

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

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


← →
Slym ©   (2006-04-21 15:32) [2]

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


← →
SergP ©   (2006-04-22 10:43) [3]


> Luka.rus   (19.04.06 18:04)  


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


← →
Luka.rus   (2006-04-22 16:35) [4]

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


← →
SergP ©   (2006-04-24 18:41) [5]


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


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



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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.027 c
3-1142621927
Megabyte
2006-03-17 21:58
2006.05.14
Как мне узнать, есть ли у юзера права на данную роль


2-1145695411
tickler
2006-04-22 12:43
2006.05.14
Задержка, которая не вешает прогу


1-1144049500
DelphiLexx
2006-04-03 11:31
2006.05.14
FindDialog и Delphi2005 проблема с русскмим буквами


15-1145572073
Труп Васи Доброго
2006-04-21 02:27
2006.05.14
Esperanto


2-1145728865
html
2006-04-22 22:01
2006.05.14
чем отобразить?




   Наверх