object frmDate: TfrmDate
  Left = 393
  Top = 626
  BorderStyle = bsToolWindow
  Caption = 'Select Expiration Date'
  ClientHeight = 190
  ClientWidth = 209
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Position = poScreenCenter
  PixelsPerInch = 96
  TextHeight = 13
  object btnOk: TButton
    Left = 126
    Top = 160
    Width = 75
    Height = 25
    Caption = 'Ok'
    Default = True
    ModalResult = 1
    TabOrder = 0
  end
  object spnYear: TSpinEdit
    Left = 112
    Top = 8
    Width = 89
    Height = 22
    EditorEnabled = False
    MaxValue = 35000
    MinValue = 1900
    TabOrder = 1
    Value = 1900
    OnChange = spnYearChange
  end
  object cmbMonth: TComboBox
    Left = 8
    Top = 8
    Width = 97
    Height = 21
    Style = csDropDownList
    DropDownCount = 12
    ItemHeight = 13
    Items.Strings = (
      'January'
      'Feburary'
      'March'
      'April'
      'May'
      'June'
      'July'
      'August'
      'September'
      'October'
      'November'
      'December')
    TabOrder = 2
    OnChange = cmbMonthChange
  end
  object btnCancel: TButton
    Left = 44
    Top = 160
    Width = 75
    Height = 25
    Caption = 'Cancel'
    ModalResult = 2
    TabOrder = 3
  end
  object cal: TCalendar
    Left = 8
    Top = 34
    Width = 192
    Height = 120
    StartOfWeek = 0
    TabOrder = 4
    OnChange = calChange
    OnDblClick = calDblClick
  end
end