• Добро пожаловать на Форум пользователей ПО АСКОН. Пожалуйста, авторизуйтесь.
 

Уважаемые пользователи,

Хотим проинформировать вас о режиме работы регистрации на нашем сайте.

Зарегистрироваться возможно в рабочие дни, с 8:00 до 20:00 (мск).

Если у вас возникнут вопросы или потребуется дополнительная информация, не стесняйтесь обращаться к нашей службе поддержки. Вы можете связаться с нами по указанным контактным данным на нашем сайте.

Благодарим вас за понимание и сотрудничество. Мы ценим ваше терпение и стремимся предоставить вам лучший опыт использования нашего сервиса.

С уважением,
Команда Ascon

Использование TClientDataSet

Автор podshibyakinea, 28.03.18, 17:22:38

« назад - далее »

0 Пользователи и 1 гость просматривают эту тему.

podshibyakinea

Вылетает с ошибкой при использовании. Не могу понять что не так.  Во вложении скрин.

procedure TSignObjectsDialog.Button12Click(Sender: TObject);
[size=1]var
  stTypeName: string;
  stProductName: string;
  stVersionNumber: string;
  stIdVersion: string;

  retcode: integer;
  errmessage: string;
  DataSet: IDataSet;
  ClientDataSet: TClientDataSet;
begin

  stTypeName := PluginCall.stType;
  stProductName := PluginCall.stProduct;
  stVersionNumber := PluginCall.stVersion;
  stIdVersion := '530440';

  ClientDataSet := TClientDataSet.Create(nil);
  try
   ClientDataSet.Data :=
FPluginCall.RunMethod('GetInfoAboutVersion',VarArrayOf([stTypeName,stProductName,stVersionNumber, stIdVersion,15]));
  finally
    ClientDataSet.Free;
  end;[/size]

end;

Chaa

Нажмите Break, отладчик покажет где ошибка.
Возможно из-за того, что у вас в одном месте PluginCall, в другом FPluginCall и они разные.