home *** CD-ROM | disk | FTP | other *** search
/ DOS/V Power Report 1997 August / VPR9708A.ISO / D3TRIAL / INSTALL / DATA.Z / PICKDATE.DFM / PICKDATE.txt
Text File  |  1997-05-13  |  3KB  |  101 lines
  1. object BrDateForm: TBrDateForm
  2.   Left = 221
  3.   Top = 143
  4.   BorderStyle = bsDialog
  5.   Caption = 'Select a Date'
  6.   ClientHeight = 220
  7.   ClientWidth = 362
  8.   Font.Color = clBlack
  9.   Font.Height = -11
  10.   Font.Style = []
  11.   Position = poScreenCenter
  12.   PixelsPerInch = 96
  13.   TextHeight = 13
  14.   object Bevel1: TBevel
  15.     Left = 16
  16.     Top = 8
  17.     Width = 330
  18.     Height = 177
  19.     Shape = bsFrame
  20.   end
  21.   object TitleLabel: TLabel
  22.     Left = 54
  23.     Top = 18
  24.     Width = 257
  25.     Height = 13
  26.     Alignment = taCenter
  27.     AutoSize = False
  28.     Caption = 'February, 1995'
  29.     Font.Color = clBlack
  30.     Font.Height = -11
  31.     Font.Style = [fsBold]
  32.     ParentFont = False
  33.   end
  34.   object PrevMonthBtn: TSpeedButton
  35.     Left = 22
  36.     Top = 16
  37.     Width = 20
  38.     Height = 20
  39.     Glyph.Data = {
  40.       E6000000424DE60000000000000076000000280000000E0000000E0000000100
  41.       0400000000007000000000000000000000000000000010000000000000000000
  42.       BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
  43.       FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
  44.       3300333333333333330033333300033333003333330003333300333333000333
  45.       3300333333000333330033333300033333003333330003333300333333000333
  46.       3300333300000003330033333000003333003333330003333300333333303333
  47.       33003333333333333300}
  48.     OnClick = PrevMonthBtnClick
  49.   end
  50.   object NextMonthBtn: TSpeedButton
  51.     Left = 320
  52.     Top = 16
  53.     Width = 20
  54.     Height = 20
  55.     Glyph.Data = {
  56.       E6000000424DE60000000000000076000000280000000E0000000E0000000100
  57.       0400000000007000000000000000000000000000000010000000000000000000
  58.       BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
  59.       FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
  60.       3300333333303333330033333300033333003333300000333300333300000003
  61.       3300333333000333330033333300033333003333330003333300333333000333
  62.       3300333333000333330033333300033333003333330003333300333333000333
  63.       33003333333333333300}
  64.     OnClick = NextMonthBtnClick
  65.   end
  66.   object Calendar1: TCalendar
  67.     Left = 22
  68.     Top = 41
  69.     Width = 318
  70.     Height = 136
  71.     Color = clInfoBk
  72.     Font.Color = clBlack
  73.     Font.Height = -11
  74.     Font.Style = [fsBold]
  75.     ParentFont = False
  76.     StartOfWeek = 0
  77.     TabOrder = 0
  78.     UseCurrentDate = False
  79.     OnChange = Calendar1Change
  80.   end
  81.   object OkBtn: TButton
  82.     Left = 204
  83.     Top = 189
  84.     Width = 73
  85.     Height = 25
  86.     Caption = '&OK'
  87.     Default = True
  88.     ModalResult = 1
  89.     TabOrder = 1
  90.   end
  91.   object CancelBtn: TButton
  92.     Left = 284
  93.     Top = 189
  94.     Width = 73
  95.     Height = 25
  96.     Caption = '&Cancel'
  97.     ModalResult = 2
  98.     TabOrder = 2
  99.   end
  100. end
  101.