Unit Cal

-------------------------------------------------------------------------} {UNIT: Calendar.Pas - Adds navigation bar to Delphi calendar sample. } {TARGET: Delphi 1 only. } {AUTHOR: George L. Roberts } {EMAIL: robertsg@nettally.com } {-------------------------------------------------------------------------} {WARNING! This software is provided as is. No warranty is given by the } { author, expressed or implied. Use this software at your own } { risk. The author assumes no responsibility for any damage from } { the use of this software. } {NOTE: This software is freeware which means that it is free for use } { and distribution. Please do not remove/mask the about property.} {-------------------------------------------------------------------------

Classes

TAboutCalendar -
TgCalendar -

Functions

register -

Types

TBtnImage
TDayOfWeek

Constants

__OBJNAME
__OBJVER

Variables


Functions


procedure register;


Types


TBtnImage = (biFBck, biBck, biToday, biFFwd, biFwd);

TDayOfWeek = 0..6

Constants

__OBJNAME = 'gCalendar'

__OBJVER = 'v1.0'


Variables