Встроить ActiveX компонент в интерфейс
Добавлено: 18 мар 2009, 20:35
Безуспешно пытаюсь запустить пример, описанный в документации. Код такой:
ocx зарегистрирован, обертки для COM (vih и vip) получил.
Но при запуске получаю:
Код: Выделить всё
#component "Foo"
interface Bar;
embedded scr1 ole;
end;
var pPDF: com_DPdf;
handleEvent
cmInit:
{
pPDF := com_DPdf(new(coPdf));
pPDF.comOptions := ooAllowInPlace + ooAllowDirectPaint;
OleEmbed (pPDF.comHandle, scr1);
pPDF.LoadFile ('c:\1.pdf');
}
end;
end.
Но при запуске получаю:
Куда копать?---------------------------
Предупреждение
---------------------------
Возникло необработанное исключение
ExObjIfcNoLoad (ExRef)
ошибка загрузки объекта из ресурсного файла(coPdf)
"Да" - Продолжить, "Нет" - Отлаживать в окне отладчика
"Отмена" - Не выдавать больше это сообщение
---------------------------
Да Нет Отмена
---------------------------