Страница 1 из 1

Объектные интерфейсы и word

Добавлено: 20 мар 2008, 14:06
Sytin
Можно ли при написании отчета формата rtf использовать объектные интерфейсы? И если можно, то как?

Добавлено: 20 мар 2008, 14:15
Алексей

Добавлено: 20 мар 2008, 14:27
Nikos
Кусочек отчета с объектными интерфейсами:
.LinkForm ’PRNMOVNAK_10_OBJ_RTF’ Prototype is ’PRINTINMOVNAK’
.Group ’Vnut’
.declare
#include mtrfuncs.vih
.enddeclare
.NameInList ’12. Накладная на внутреннее перемещение с объектами (rtf)’
.DEFP PA4
.var
object : string;
ObjectKod : string;
ob : mtrfuncs;
ckatstr : comp;
.endvar
.Create View ObjView
As Select *
from KATSTROY
Where ((ckatstr == KATSTROY.nRec));
.fields
....
.begin
object := ’’;
LoadVipInterface(ob);

Ckatstr := ob.GetObjUKS(1110,НРЕКПОЗИЦИИ);

if ObjView.GetFirst KATSTROY = tsOk
{
Object := KATSTROY.NAME;
ObjectKod := KATSTROY.CODE;
}
else
{
Object := ’’;
ObjectKod := ’’;
}
end.

...

Добавлено: 20 мар 2008, 14:41
Sytin
Спасибо разобрался