Report > Report Assembly Interfaces > IPrxCellStyle > IPrxCellStyle.IsDefault
IsDefault: Boolean;
The IsDefault property determines whether style value is used by default.
Executing the example requires a regular report with the REPORT identifier that contains a relational data area.
Add links to the Metabase, Report system assemblies.
Sub UserProc;
Var
mb: IMetabase;
Report: IPrxReport;
TabIs: IPrxTableIslands;
TI: IPrxTableIsland;
Layout: IPrxTableIslandLayout;
LayFormat: IPrxTableIslandFormat;
Style1: IPrxCellStyle;
b: boolean;
Begin
// Get the current repository
mb := MetabaseClass.Active;
// Get regular report
Report := mb.ItemById("REPORT").Edit As IPrxReport;
// Get relational data area
TabIs := Report.TableIslands;
TI := TabIs.Item(0);
TI := TI.Edit;
Layout := TI.Layout;
// Get relational data area formatting parameters
LayFormat := Layout.Format;
Style1 := LayFormat.Style;
b := Style1.IsSet;
If b = False Then
Debug.WriteLine("Default formatting");
Else
Style1.IsDefault := True;
End If;
(Report As IMetabaseObject).Save;
End Sub UserProc;
After executing the example relational data area formatting is set by default.
See also:
