Unit 'ovccal'	Package
[Overview][Constants][Types][Classes][Index]	[#pl_orpheus]

TOvcCalColors

Declaration

Source position: ovccal.pas line 74

`type TOvcCalColors = class(TPersistent)`
`protected`
`FUpdating: Boolean;`
`FOnChange: TNotifyEvent;`
`SettingScheme: Boolean;`
`function GetColor();`
`procedure SetColor();`
`procedure SetColorScheme();`
`procedure DoOnChange;`
`public`
`FCalColors: TOvcCalColorArray;`
`FColorScheme: TOvcCalColorScheme;`
`procedure Assign(); override;`
`procedure BeginUpdate;`
`procedure EndUpdate;`
`property OnChange: TNotifyEvent; [rw]`
`published`
`property ActiveDay: TColor; [rw]`
`property ColorScheme: TOvcCalColorScheme; [rw]`
`property DayNames: TColor; [rw]`
`property Days: TColor; [rw]`
`property InactiveDays: TColor; [rw]`
`property MonthAndYear: TColor; [rw]`
`property Weekend: TColor; [rw]`
`end;`