ActivePointColor: IGxColor;
The ActivePointColor property determines the point color of the last selected object.
Executing the example requires that repository contains a workspace with the WSP identifier.
Add links to the Andy, Drawing, Metabase, Workspace system assemblies.
Sub UserProc;
Var
MB: IMetabase;
Wsp: IWxWorkspace;
View: IWxView;
SStyle: IWxSelectionStyle;
Begin
MB := MetabaseClass.Active;
// Get workspace
Wsp := MB.ItemById("WSP").Edit As IWxWorkspace;
view := Wsp.CreateView;
SStyle := View.SelectionStyle;
SStyle.ActivePointColor := GxColor.FromName("Blue");
// Save changes
(Wsp As IMetabaseObject).Save;
End Sub UserProc;
After executing the example the point color for the last selected object is set.
See also: