Unit 'ovctgpns' Package
[Overview][Types][Classes][Index] [#pl_orpheus]

TOvcGridPen

[Properties (by Name)] [Methods (by Name)] [Events (by Name)]

Declaration

Source position: ovctgpns.pas line 47

type TOvcGridPen = class(TPersistent)

protected

  FNormalColor: TColor;

  

  FSecondColor: TColor;

  

  FEffect: TGridEffect;

  

  FStyle: TPenStyle;

  

  FOnCfgChanged: TNotifyEvent;

  

  procedure SetNormalColor();

  

  procedure SetSecondColor();

  

  procedure SetEffect();

  

  procedure SetStyle();

  

  procedure DoCfgChanged;

  

public

  property OnCfgChanged: TNotifyEvent; [rw]

  

  constructor Create;

  

  procedure Assign(); override;

  

published

  property NormalColor: TColor; [rw]

  

  property SecondColor: TColor; [rw]

  

  property Style: TPenStyle; [rw]

  

  property Effect: TGridEffect; [rw]

  

end;

Inheritance

TOvcGridPen

  

|

TObject



CT Web help

CodeTyphon Studio