//*********************************************************
// подключаем сгенерированный файл
#include pdflib.vih
//*********************************************************
interface Test;
//---------------------------------------------------------
// в этом окне будет показан PDF файл
embedded scr1 'Пример использования Acrobat Reader' OLE;
show at (,,,12)
end;
//---------------------------------------------------------
// объявляем ссылку на COM объект
var pPDF: com_DPdf;
//---------------------------------------------------------
handleEvent
cmInit:
{
pPDF := com_DPdf(new(coPdf)); // инициализируем
pPDF.comOptions := ooAllowInPlace + ooAllowDirectPaint;
OleEmbed (pPDF.comHandle, scr1); // связываем
pPDF.LoadFile ('gLSB.pdf'); // загружаем файл
}
end;
end.