TableStyle: ITabTableStyle;
The TableStyle property determines style of relational data area table.
To execute the example, add links to the Report, Metabase and Tab system assemblies. The example requires a regular report with RR identifier and relational area on the report sheet.
Sub UserProc;
Var
MB: IMetabase;
MObj: IMetabaseObject;
Report: IPrxReport;
TabIs: IPrxTableIslands;
TI: IPrxTableIsland;
Layout: IPrxTableIslandLayout;
Style: ITabTableStyle;
Begin
MB := MetabaseClass.Active;
MObj := MB.ItemById("RR").Edit;
Report := MObj As IPrxReport;
TabIs := Report.TableIslands;
TI := TabIs.Item(0);
TI := TI.Edit;
Layout := TI.Layout;
Style := Layout.TableStyle;
Style.AssignPredefined(TabTablePredefinedStyle.DarkRed);
TI.Save;
MObj.Save;
End Sub UserProc;
After executing the example the specified formatting is applied to the layout.
See also: