ImageDocument: IDocumentBase;
Свойство ImageDocument определяет объект репозитория «Документ» для части заголовка/колонтитула.
Для выполнения примера предполагается наличие в репозитории регламентного отчёта с идентификатором REPORT и документа, содержащего изображение, с идентификатором DOC_OBJ.
Добавьте ссылки на системные сборки: Fore, Metabase, Report.
Sub UserProc;
Var
MB: IMetabase;
MObj: IMetabaseObject;
Report: IPrxReport;
Sheet: IPrxSheet;
HeadersFooters: IPrxSheetHeaders;
Header: IPrxSheetHeaderBase;
HeaderPart: IPrxSheetHeaderPart;
Doc: IDocumentBase;
Begin
MB := MetabaseClass.Active;
// Получим регламентный отчёт
MObj := MB.ItemById("REPORT").Edit;
Report := MObj As IPrxReport;
// Получим первый лист
Sheet := Report.Sheets.Item(0);
// Получим колонтитулы
HeadersFooters := Sheet.HeadersFooters;
// Получим верхний колонтитул
Header := HeadersFooters.Header;
// Настроим колонтитул для первого листа
HeaderPart := Header.Center;
HeaderPart.Text := "&[Picture]";
Doc := MB.ItemById("DOC_OBJ").Edit As IDocumentBase;
HeaderPart.ImageDocument := Doc;
HeaderPart.ImageHeight := 10;
HeaderPart.ImageWidth := 10;
// Сохраним изменения
MObj.Save;
End Sub UserProc;
После выполнения примера в центральной части верхнего колонтитула будет вставлено изображение из указанного документа.
См. также: