object Form1: TForm1 Left = 147 Top = 2 Width = 499 Height = 427 Caption = 'March 1997' Font.Color = clWindowText Font.Height = -13 Font.Name = 'System' Font.Style = [] OnCreate = FormCreate PixelsPerInch = 96 TextHeight = 16 object GregCalendar1: TGregCalendar Left = 0 Top = 0 Width = 491 Height = 400 Align = alClient PopupMenu = GregCalendar1. StartOfWeek = 0 TabOrder = 0 CenterDates = False SelectedFGColor = clAqua UseFormCaption = True end end