home *** CD-ROM | disk | FTP | other *** search
/ QBasic & Borland Pascal & C / Delphi5.iso / Runimage / Delphi50 / Demos / Cpl / Date / UFRMDT.DFM < prev    next >
Encoding:
Text File  |  1999-08-11  |  1.8 KB  |  93 lines
  1. object frmDateTime: TfrmDateTime
  2.   Left = 192
  3.   Top = 103
  4.   BorderIcons = [biSystemMenu]
  5.   BorderStyle = bsDialog
  6.   Caption = 'Date Config'
  7.   ClientHeight = 218
  8.   ClientWidth = 216
  9.   Color = clBtnFace
  10.   ParentFont = True
  11.   OldCreateOrder = False
  12.   OnCreate = frmDateTimeCreate
  13.   PixelsPerInch = 96
  14.   TextHeight = 13
  15.   object Panel: TPanel
  16.     Left = 0
  17.     Top = 177
  18.     Width = 216
  19.     Height = 41
  20.     Align = alBottom
  21.     BevelOuter = bvNone
  22.     TabOrder = 0
  23.     object btnCancel: TButton
  24.       Left = 24
  25.       Top = 8
  26.       Width = 75
  27.       Height = 25
  28.       Caption = '&Cancel'
  29.       ModalResult = 2
  30.       TabOrder = 0
  31.     end
  32.     object btnOK: TButton
  33.       Left = 120
  34.       Top = 8
  35.       Width = 75
  36.       Height = 25
  37.       Caption = '&Ok'
  38.       ModalResult = 1
  39.       TabOrder = 1
  40.     end
  41.   end
  42.   object grpboxDate: TGroupBox
  43.     Left = 0
  44.     Top = 0
  45.     Width = 216
  46.     Height = 177
  47.     Align = alClient
  48.     Caption = 'Date:'
  49.     TabOrder = 1
  50.     object Calendar: TCalendar
  51.       Left = 8
  52.       Top = 56
  53.       Width = 201
  54.       Height = 113
  55.       StartOfWeek = 0
  56.       TabOrder = 0
  57.     end
  58.     object cmboBoxMonth: TComboBox
  59.       Left = 8
  60.       Top = 24
  61.       Width = 89
  62.       Height = 21
  63.       Style = csDropDownList
  64.       ItemHeight = 13
  65.       TabOrder = 1
  66.       OnChange = cmboBoxMonthChange
  67.     end
  68.     object udYear: TUpDown
  69.       Left = 193
  70.       Top = 24
  71.       Width = 15
  72.       Height = 21
  73.       Associate = edtYear
  74.       Min = 0
  75.       Max = 2050
  76.       Position = 0
  77.       TabOrder = 2
  78.       Thousands = False
  79.       Wrap = False
  80.     end
  81.     object edtYear: TEdit
  82.       Left = 128
  83.       Top = 24
  84.       Width = 65
  85.       Height = 21
  86.       TabOrder = 3
  87.       Text = '0'
  88.       OnChange = edtYearChange
  89.       OnKeyPress = edtYearKeyPress
  90.     end
  91.   end
  92. end
  93.