Скачать Turbo Calendar - Calendar Unit

17.09.1990
Скачать файл (5,38 Кб)




Turbo Calendar
Copyright (c) 1990 by Borland International, Inc.

  This unit provide a objects for creating a simple calendar.
  Common usage in a aplication would be:

Procedure ShowCalendar;
    Var
      CalendarWindow: PCalendarWindow;
    Begin
      CalendarWindow := New(PCalendarWindow, Init(New(PDayDialog,Init)));
      DeskTop^.Insert(CalendarWindow);
    End;
 The DayDialog object has four virtual methods that me wish to be change
 to fit the needs of a specific users application.

Function IsSpecial(Day, Month, Year: Word): Boolean;
    Procedure GetActiveDays;
    Function ReadDay: PCollection;
    Procedure WriteDay(Collection: PCollection);