HatchStyle: GxHatchStyle;
Свойство HatchStyle определяет тип штриховки фона легенды.
Данное свойство актуально, если свойство IMapBackground.Type использует тип заливки MapBackgroundType.Hatch.
Для выполнения примера предполагается наличие на форме компонентов ReportBox, UiReport с наименованиями ReportBox1 и UiReport1 соответственно. UiReport1 является источником данных для ReportBox1. Также необходимо наличие регламентного отчета, содержащего карту с включенной легендой, и который является источником данных для «UiReport1».
Добавьте ссылки на системные сборки: Map, Report, Tab.
Sub UserProc;
Var
regrep: IPrxReport;
sheet: IPrxSheet;
table: IPrxTable;
objects: ITabObjects;
map: IMap;
legend: IMapLegend;
background: IMapBackground;
Begin
// Получим регламентный отчет
regrep := UiReport1.Report;
// Получим карту из регламентного отчета
sheet := regrep.Activesheet;
table := sheet As IPrxTable;
objects := table.TabSheet.Objects;
map := objects.Item(0).Extension As IMap;
// Получим легенду карты
legend := map.View.Legend;
// Получим фон легенды на карте
background := legend.Background;
// Установим тип фона легенды - штриховка
background.Type := MapBackgroundType.Hatch;
// Установим новый тип штриховки фона легенды
background.HatchStyle := hatchstyle.Sphere;
// Обновим карту
map.Refresh;
End Sub UserProc;
После выполнения примера фон легенды станет заштрихованным кружками.
См. также: