Add: IPrxTableIslandLayoutCell;
The Add method adds a cell to a layout row.
Sub Main;
Var
MB: IMetabase;
MObj : IMetabaseObject;
Report : IPrxReport;
TabIs : IPrxTableIslands;
TI : IPrxTableIsland;
Layout : IPrxTableIslandLayout;
Row : IPrxTableIslandLayoutRow;
Cell : IPrxTableIslandLayoutCell;
SourceFields : IDalCursorFields;
Begin
MB := MetabaseClass.Active;
MObj := MB.ItemById("Report").Edit;
Report := MObj As IPrxReport;
TabIs := Report.TableIslands;
TI := TabIs.Item(0);
TI := TI.Edit;
Layout := TI.Layout;
Row := Layout.Add;
Cell := Row.Add;
SourceFields := Report.TableSources.Item(0).Execute.Fields;
Cell.Field.FieldName := SourceFields.Item(0).Name;
Cell.Style.BackgroundColor := New GxColor.CreateRGB(250,0,0);
TI.Save;
MObj.Save;
End Sub Main;
After executing the example the layout structure is created: a single row containing a single column. Report - identifier of a regular report.
See also: