Модераторы: Poseidon, Snowy, bems, MetalFan
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> indy, проблема в передаче данных 
:(
    Опции темы
Dapo
Дата 5.3.2003, 13:43 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 417
Регистрация: 18.4.2002

Репутация: нет
Всего: 1



Извиняюсь за тупую формулировку темы, но как-то сформулировать не могу. А вопрос вот в чем:
Делаю приложение которое собирает данные с контроллера. Обмен с контроллером налажен и реализован в отдельном потоке. Там же (в потоке) формирую строку (собственно собранные данные) для передачи ее клиентам подключенным по TCP посредством компонента Indy TTcpServer. Строка передается посредством св-ва моего потока:
property OutStr:string read FOutString;
В OnExecute TCPServer-а пишу:
Код

procedure TMainFrm.TCPSvrExecute(AThread:TIdPeerThread);
var TempThr:TCommThread;
      s:string;
begin
  s:=AThread.Connection.readln;
  TempThr:=GetThreadByPort('COM1');//моя процедура
  if  TempThr<>nil then
  begin
      if s<>'' then
      AThread.Connection.Writeln(TmpThread.OutStr);
  end;
end;

Где конкретно ошибка сказать не могу, прога просто виснет после того как клиент пытается прочесть данные с сервера. Может проблема в синхронизации (ведь для каждого TCP-клиента создается отдельный поток). Хотя, если где-то в проге присваиваю значение TmpThread.OutStr, например, Caption-у главной формы (передаю в основной поток), то все работает нормально и не виснет. В чем может быть дело?
Понимаю, что вопрос абстрактный, но может есть какие-то соображения?
PS. Пробовал передавать в DdeServerItem, тоже все работает. Но DDE не подходит по ряду причин.
PM MAIL   Вверх
SmaLL
Дата 6.3.2003, 01:09 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник Клуба
Сообщений: 557
Регистрация: 17.12.2002
Где: Voronezh

Репутация: 1
Всего: 2



Я бы так сказал: Indy - сырые и кривые компоненты. Может быть дело именно в этом !


--------------------
Что ни делается - всЁ к лучшему! SmallWeb
Мой адрес не дом и не улица, мой адрес родной пивзавод!
PM MAIL WWW ICQ   Вверх
Dapo
Дата 6.3.2003, 14:46 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 417
Регистрация: 18.4.2002

Репутация: нет
Всего: 1



Не кривее NetMaster (Почему борланды их заменили?). Я уже писал проги на основе Indy и все работало замечательно. Просто не сталкивался с подобным, хотя конечно дело может быть и в их глюкавости.
PM MAIL   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Общие вопросы"
SnowyMetalFan
bemsPoseidon
Rrader

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по Дельфи обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи


Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, MetalFan, bems, Poseidon, Rrader.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Общие вопросы | Следующая тема »


 




[ Время генерации скрипта: 0.0399 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.