TCustomCalendar

type TCustomCalendar = class(TWinControl)

  class procedure WSRegisterClass; override;

WSRegisterClass - Register this Class for the current Widget Set

protected

  procedure LMChanged(); message;

LMChanged - LCL Message method to deal with changes in the control

  procedure LMMonthChanged(); message;

LMMonthChanged - LCL Message method for change in Month

  procedure LMYearChanged(); message;

LMYearChanged - LCL Message method for change in Year

  procedure LMDayChanged(); message;

LMDayChanged - LCL Message method for change in Day

protected

  class function GetControlClassDefaultSize; override;

Find the default size for this class of controls (by reference to parents)

protected

  procedure Loaded; override;

  procedure InitializeWnd; override;

InitializeWnd - initialise the window for this control

  procedure DestroyWnd; override;

public

  constructor Create(); override;

Create - constructor for TCustomCalendar: calls inherited Create and sets style, initial bounds, display settings; sets date and time to Now

  function HitTest();

  property Date: String; [rws]

The value of Date returned by the control

  property DateTime: TDateTime; [rw]

The composite DateTime value returned by the control

  property DisplaySettings: TDisplaySettings; [rw]

DisplaySettings - various options governing the appearance of the display

  property OnChange: TNotifyEvent; [rw]

OnChange - event handler for any change in Calendar

  property OnDayChanged: TNotifyEvent; [rw]

OnDayChanged - event handler for a change in Day selected

  property OnMonthChanged: TNotifyEvent; [rw]

OnMonthChanged - event handler for a change in month selected

  property OnYearChanged: TNotifyEvent; [rw]

OnYearChanged - event handler for a change in the year selected

end;

TCustomCalendar

TCustomCalendar - base class for TCalendar, a graphic for selecting a date

TWinControl

TControl

TLCLComponent

TLCLComponent - base class for LCL components

TComponent,IUnknown,IInterfaceComponentReference

TPersistent

TObject