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

Проблема с постом сообщений по TTcpSocket в D7   Найти похожие ветки 

← →
empty ©   (2004-05-24 16:05) [0]

Пояснение к проблемме:

Создано тестовое приложение для передачи данных по сети для проверки передачи данных. Со свойством в TTcpServer и TTcpClient (BlockMode=bmNonBlocking) "асинхронная передача данных". При передачи данных возникают события которые свойственны для данных компонентов в часности у серверного компонента OnAccept, в нём необходимо выполнить операцию чтения из клиента информации. Т.е. кодом вышлядит примерно так :

procedure Form1.TcpServerAccept( Sender : TObject, ClentSocket : TTcpClient);

Var Mes : String;

begin
While MSG<>"" do
  begin
   Mes:=ClientSocket.ReadLn;
  end;  
end;

При этом в переменную постоянно присваивается значения которые в такой же последовательности были присланы от слиента к серверу. Так вот это событие возникает без проблем, но, !когда форма активна! в переменную не присваивается значение текста посланого от клиента и при изменения активности формы, сразу начинают приходить все сообщения которые были посланы. Тоесть при разнице свойства Active на форме с компонентом (а точнее приложении) чувствуется разница в доставке сообщения. Тоесть событие происходит а буфер сообщений постоянно пустой, и только при незначительных изменениях он начинает заполнятся, при каких мне сложно отследить и в принципе не представляется возможным... Прошу подсказать в чём может быть причина при изменении этого свойства.

С уважением Денис. (empty)


← →
tesseract   (2004-05-25 09:23) [1]

Используй idTcpServer, стандартные дельфёвые компоненты глючат сильно. Заманаешься. Там вообще сложно понять что и когда ты получаешь.


← →
nomshar   (2004-05-26 15:48) [2]

Слушай, ты во-первых, зачем в обработчике OnAccept заводишь цикл? У тебя же вся программа нафиг встанет.
А во-вторых. Дай код. Хотя там ничего сложного и можно в принципе обойтись и дельфишными компонентами.



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

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



Память: 0.45 MB
Время: 0.024 c
3-1088335340
Vemer
2004-06-27 15:22
2004.07.25
Подгонка высоты ячеек в QReport...


1-1089358029
Sur
2004-07-09 11:27
2004.07.25
JPG+EOF+SomeText


14-1088169388
Jeer
2004-06-25 17:16
2004.07.25
Пятничный блуд:))


3-1088578752
Zlod3y
2004-06-30 10:59
2004.07.25
ODBC


14-1088939043
Nick Denry
2004-07-04 15:04
2004.07.25
Windows .VBS (WSH) как альтернатива Linux .SH




   Наверх