Тема: DDE-клиент
Показать сообщение отдельно
  #1  
Старый 13.02.2011, 13:50
Alexig Alexig вне форума
Прохожий
 
Регистрация: 25.12.2010
Сообщения: 1
Репутация: 10
По умолчанию DDE-клиент

Создаю DDE-клиент с несколькими DDEClientItem. Данные считываются со стороннего приложения Lectus Modbus OPC DDE Server. Проблема: при работе программы-клиента почему-то считываются не все передаваемые данные В логах сервера все в порядке; видно, что передаются все из запрашиваемых данных. В то время как в клиенте фактически отображается явно меньшее их количество, остальные поля остаются пустыми. В чем может заключаться причина?

Код:

Код:
procedure TForm1.Button3Click(Sender: TObject);
begin

   DDEClientConv1.SetLink('ServOPC','smh');

       DDEClientItem1.DdeItem:='Pt1000_1';
       DDEClientItem5.DdeItem:='Pt1000_2';
       
       DDEClientItem2.DdeItem:='Counter';
       Ddeclientitem3.ddeitem:='Relay';
       Ddeclientitem4.ddeitem:='Task';


       DDEClientItem6.DdeItem:='Counter_2';
       Ddeclientitem7.ddeitem:='Relay_2';
       Ddeclientitem8.ddeitem:='Task_2';

   if ddeclientconv1.OpenLink then
          Label4.Caption:='Connection [OK]'
   else
          Label4.Caption:='Connection [Fail]';

end;

Скриншоты:

Серверное приложение:


Приложение-клиент:


Полный код программы и приложение-сервер можно скачать здесь:
http://fayloobmennik.net/387573

Заранее спасибо
Ответить с цитированием