Unit sPickDate

Classes

TsCalendar -
TsCustomCalendar -
TsPopupCalendar -

Functions

PopupCalendar -

Types

TCalendarBevelStyle

Constants

Variables


Functions


function PopupCalendar(AOwner: TWinControl; var ADate: TDateTime; const R: TRect): Boolean;


Types


TCalendarBevelStyle = (ssNone, ssLowered, ssRaised);
This unit implements 2 calendar controls - TsPopupCalendar and TsCalendar. Some code here was taken from dateEdit control, written at the very beginning of the Delphi era. Sorry, I don't remember the author. If he will recognize himself - My apology and thanks. Dimitry Statilko, dstatilko@hotmail.com

Constants


Variables