[AIMor]

Написал программу по сбору данных с DDE-сервера RSLinx Gateway фирмы Rockwell Software, все работает.

Код:

Uses
   DdeMan;

Var
   DDEClients  : Array Of TDDEClientConv;
   Topics      : TStrings;

procedure TForm1.FormCreate(Sender: TObject);
Var
   I : Integer;

begin
    Topics:=TStringList.Create;

   ...
   //Заполнение данными Topics
   ...

   SetLength(DDEClients,Topics.Count);
   For I:=0 To Topics.Count-1 Do
      begin
         DDEClients[i]:=TDDEClientConv.Create(Self);
         DDEClients[i].SetLink('rslinx',Topic.Strings[i]);
      end;
end;

Переделал приложение в Service Application, перестала устанавливаться связь с топиками. Из-за чего это может быть?