home *** CD-ROM | disk | FTP | other *** search
/ PC Format Collection 48 / SENT14D.ISO / tech / delphi / disk15 / format.pak / DATES.DFM / DATES.txt
Encoding:
Text File  |  1995-08-24  |  1.7 KB  |  99 lines

  1. object DateForm: TDateForm
  2.   Left = 180
  3.   Top = 115
  4.   AutoScroll = False
  5.   ActiveControl = ValueEdit
  6.   BorderIcons = [biSystemMenu, biMinimize]
  7.   BorderStyle = bsSingle
  8.   Caption = 'Date Formatting'
  9.   ClientHeight = 162
  10.   ClientWidth = 399
  11.   Font.Color = clBlack
  12.   Font.Height = -11
  13.   Font.Name = 'MS Sans Serif'
  14.   Font.Style = []
  15.   PixelsPerInch = 96
  16.   Visible = True
  17.   OnCreate = FormCreate
  18.   TextHeight = 13
  19.   object Label1: TLabel
  20.     Left = 44
  21.     Top = 12
  22.     Width = 27
  23.     Height = 13
  24.     Caption = 'Value'
  25.   end
  26.   object Label2: TLabel
  27.     Left = 5
  28.     Top = 51
  29.     Width = 66
  30.     Height = 13
  31.     Caption = 'DisplayFormat'
  32.   end
  33.   object Label3: TLabel
  34.     Left = 41
  35.     Top = 90
  36.     Width = 30
  37.     Height = 13
  38.     Caption = 'Result'
  39.   end
  40.   object ValueEdit: TComboBox
  41.     Left = 80
  42.     Top = 8
  43.     Width = 305
  44.     Height = 20
  45.     ItemHeight = 13
  46.     TabOrder = 0
  47.     Text = '11/7/83 12:31pm'
  48.     OnClick = Button1Click
  49.   end
  50.   object FormatEdit: TComboBox
  51.     Left = 80
  52.     Top = 47
  53.     Width = 305
  54.     Height = 20
  55.     ItemHeight = 13
  56.     Items.Strings = (
  57.       'c'
  58.       't'
  59.       'tt'
  60.       'd'
  61.       'dd'
  62.       'ddd'
  63.       'dddd'
  64.       'ddddd'
  65.       'dddddd'
  66.       'm'
  67.       'mm'
  68.       'mmm'
  69.       'mmmm'
  70.       'yy'
  71.       'yyyy'
  72.       'mm/dd/yy'
  73.       'hh:mm'
  74.       'h:mm:ss ampm'
  75.       'hh:mm:ss a/p'
  76.       'dddd, mmmm d, yyyy'
  77.       #39'Meeting on'#39' dddddd '#39'at'#39' tt')
  78.     TabOrder = 1
  79.     OnClick = Button1Click
  80.   end
  81.   object ResultEdit: TEdit
  82.     Left = 80
  83.     Top = 86
  84.     Width = 305
  85.     Height = 20
  86.     TabOrder = 2
  87.   end
  88.   object Button1: TButton
  89.     Left = 159
  90.     Top = 116
  91.     Width = 89
  92.     Height = 33
  93.     Caption = '&Format'
  94.     Default = True
  95.     TabOrder = 3
  96.     OnClick = Button1Click
  97.   end
  98. end
  99.