HiAsm

Форумы Делаем компоненты Компонент для доступа к 1С бухгалтерии ← Ctrl12 3 4Ctrl →

Ответов: 542

Рейтинг: 12

#1: 2009-02-02 17:01:40 ЛС | профиль | цитата

Извини Вячеслав,
Version=1.0
Author=Nic

Это же ты писал?
[i]KOL не может напрямую работать с OLE.
Вообщем для работы с OLE объектом надо в коде прописать,
инициализацию OLE объекта.
Как это сделать можешь посмотреть в кодах компонентов для работы с
Вордом.[/i](набор моих компонентов)
------------ Дoбавленo:

nesco писал(а):

Используй преобразование VarToStr, больше ты не во что у нас не преобразуешь

Это в исходном компоненте:


#pas
   private
    Ole1C : OleVariant;
    r:string;

procedure THIRun_1C_OLE._var_ParamConnect;
begin
   r:= VarToStr(Ole1C);
   dtString(_data, r);
end;

такое конвертирования проходит без ошибки RunTime

Это во втором InlineCode:


#pas
type
 THiAsmClass = class(TDebug)
   private

   public
    Ole1C : OleVariant;
    OleFizLica : OleVariant;
    ID :THI_Event;
     procedure doProcess(var _Data:TData; Index:Word);
 end;

procedure THiAsmClass.doProcess(var _Data:TData; Index:Word);
Var 
   s : string;
   t : Variant;
begin
 s:= ReadString(_data,ID,');
end;

А воб обратное преобразование с помощью присваивания не проходит, сообщается ошибка RunTime

карма: 0

Форумы Делаем компоненты Компонент для доступа к 1С бухгалтерии ← Ctrl12 3 4Ctrl →