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

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> TIdSocketHandle 
:(
    Опции темы
Darkmaster
Дата 28.12.2005, 22:51 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


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

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



Вообщем пишу чат для локальной сети при помощи компонентов IdUdpClient и IdUdpServer. Проблема такая делаю вывод данных в memo:
Код

procedure TForm1.IdUDPServer1UDPRead(Sender: TObject; AData: TStream;
  ABinding: TIdSocketHandle);
  var
  SFS:TStringStream;
  s:string;
  begin
   SFS:=TStringStram.Create('');
   SFS.CopyFrom(AData,AData.Size);
   Memo1.Lines.Add(ABinding.PeerIP+' '+SFS.DataString);
   ABinding.SendTo(ABinding.PeerIP,ABinding.PeerPort,s[1],Length(s));
   SFS.FRee;
end;

Так вот он выдает там где обьявлена процедура что TIdSocketHandle UndeclareIdentifier. Как решить проблему?
--------------------
GeekTV - интернет-телевидение для гиков
PM MAIL   Вверх
Snowy
Дата 28.12.2005, 23:10 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Модератор
Сообщений: 11363
Регистрация: 13.10.2004
Где: Питер

Репутация: 53
Всего: 484



В uses добавь IdSocketHandle;
PM MAIL   Вверх
Darkmaster
Дата 28.12.2005, 23:32 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


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

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



теперь проблема с вот этой строкой:
Код

 ABinding.SendTo(ABinding.PeerIP,ABinding.PeerPort,s[1],Length(s));

выдает что [Pascal Error] Unit1.pas(69): E2010 Incompatible types: 'TBytes' and 'Char'
--------------------
GeekTV - интернет-телевидение для гиков
PM MAIL   Вверх
Snowy
Дата 29.12.2005, 00:07 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Модератор
Сообщений: 11363
Регистрация: 13.10.2004
Где: Питер

Репутация: 53
Всего: 484



Это что за дельфи и что за версия Indy?
Delphi7 со стандартной Indy9 компилится нормально.
В Delphi7 вообще нет никакого TBytes.
PM MAIL   Вверх
Darkmaster
Дата 29.12.2005, 16:25 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


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

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



это BorlandDeveloperStudio2006, попробовал в 7 и действительно скомпилировалось! Спасибо!
--------------------
GeekTV - интернет-телевидение для гиков
PM MAIL   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Сети"
Snowy
Poseidon
MetalFan

Запрещено:

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

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

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

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

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


 




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


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

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