IDefaultBehaviour.SelectionBorderColor

Copy example

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;
    // Report formatting settings
    DB.SelectionBorderColor := GxColor.FromKnownColor(GxKnownColor.OliveDrab);
    DB.SelectionColor := New GxColor.CreateARGB(65, 50, 88, 201);
    // Save changes
    (SP As IMetabaseObject).Save;
End Sub UserProc;