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

Как получить данные из TIdMappedPortTCP ?   Найти похожие ветки 

← →
MegaVolt ©   (2004-11-10 17:49) [0]

Нужно получить входные данные из TIdMappedPortTCP изменить их и отправить дальше. А так же нужно знать от кого эти данные пришли. Как это возможно реализовать? Я пробовал разобратся с хелпом самостоятельно но так ничего и не понял. Нужно исспользовать IdConnectionIntercept если я правильно понимаю. Но как с этим Штексузе работать я не понимаю :( Пробовал искать примеры в инете тоже бесполещно :( Выручайте.


← →
MegaVolt ©   (2004-11-10 18:21) [1]

В результате раздумий сделал так:

procedure TForm1.IdMappedPortTCP1Connect(AThread: TIdMappedPortThread);
begin
 AThread.Connection.Intercept:=TIdConnectionIntercept.Create(Form1);
 AThread.Connection.Intercept.OnReceive:=IdConnectionIntercept1Receive;
end;

procedure TForm1.IdMappedPortTCP1Disconnect(AThread: TIdMappedPortThread);
var
 ind:integer;
begin
 AThread.Connection.Intercept.Free;
end;

в IdConnectionIntercept1Receive принимаю информацию. Пользователей различаю по AThread.Connection.Intercept
Такой подход правильный? Так и нужно создавать на каждого пользователя свой Intercept?


← →
MegaVolt ©   (2004-11-11 15:04) [2]

Сделал запустил. Теперь она закрывается вообще без ругани. Как такое возможно? Какой класс ошибок может вызвать такой эффект?


← →
Digitman ©   (2004-11-11 15:12) [3]

ты же в

http://delphimaster.net/view/6-1100011528/

сказал что это именно то что тебе нужно ?!

значит, надо понимать, разобрался в логике и функциональности !

какого ж тогда рожна вопросы продолжаешь сыпать ? причем те же самые по сути, что и при использовании TServer/ClientSocket ?


← →
MegaVolt ©   (2004-11-11 15:24) [4]

Само перенаправление пашет на ура :) А вот когда я добавил обработку приложение на большой нагрузке просто закрывается без слов :( Вот меня и инетересует как такое возможно. Или должна быть ошибка или винда например ругнулась бы. А так молча без слов оп и закрылась. Отлаживать на боевом серваке не могу :( Следовательно остаётся гадать в чём может быть дело.



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

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



Память: 0.46 MB
Время: 0.022 c
3-1103790797
Russko
2004-12-23 11:33
2005.01.30
"Поломка базы данных"


14-1104685028
Hypercube
2005-01-02 19:57
2005.01.30
Филосовия Equilibrium


1-1106202977
pavel_guzhanov
2005-01-20 09:36
2005.01.30
Утечка памяти


14-1105613497
koshak
2005-01-13 13:51
2005.01.30
Delphi


14-1105358106
snake_r
2005-01-10 14:55
2005.01.30
RX для D7




   Наверх