IPrxDataIslandHeader.FitTo

Syntax

FitTo: IPrxDataIsland;

Description

The FitTo property determines the data area, with which rows and columns matching is to be executed.

Example

Sub Main;

Var

MB: IMetabase;

MObj: IMetabaseObject;

Report: IPrxReport;

DIs: IPrxDataIslands;

DI, DI1: IPrxDataIsland;

Prop: IPrxDataIslandProperties;

THead: IPrxDataIslandHeader;

Begin

MB:=MetabaseClass.Active;

MObj:=MB.ItemById("Report").Edit;

Report:=MObj As IPrxReport;

DIs:=Report.DataIslands;

DI1:=DIs.Item(1);

DI:=DIs.Item(0).Edit;

Prop:=DI.Properties;

THead:=Prop.TopHeader;

If THead.CanFitTo(DI1) Then

THead.FitTo:=DI1;

End If;

DI.Save;

End Sub Main;

After executing the example matching columns of the second data area is set for columns of the first data area, if this is possible. The identifier of the regular report - Report.