ResetSelectionColors;
The ResetSelectionColors method resets report formatting settings and sets default settings values.
Add links to the Fore, Metabase system assemblies.
Sub UserProc;
Var
Mb: IMetabase;
SP: ISharedParams;
DB: IDefaultBehaviour;
Begin
// Current repository
Mb := MetabaseClass.Active;
SP := Mb.SpecialObject(MetabaseSpecialObject.SharedParams).Edit As ISharedParams;
// Default settings
DB := SP.DefaultBehaviour;
// If report formatting settings have been changed, reset these settings
If Not DB.IsSelectionColorDefault Then
DB.ResetSelectionColors;
End If;
// Save changes
(SP As IMetabaseObject).Save;
End Sub UserProc;
After executing the example, it is checked if there are changes in the formatting settings specified in default repository settings. If the settings were changed, they will be reset.
See also: