ugetdateone.dfm

制衣管理系统程序+源码,编译通过还不错啊,可以

object frmGetDateOne: TfrmGetDateOne
  Left = 193
  Top = 134
  ActiveControl = dt_Picker1
  BorderStyle = bsDialog
  BorderWidth = 6
  ClientHeight = 228
  ClientWidth = 377
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -14
  Font.Name = #23435#20307
  Font.Style = []
  KeyPreview = True
  OldCreateOrder = False
  Position = poMainFormCenter
  OnKeyDown = FormKeyDown
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 14
  object Label1: TLabel
    Left = 0
    Top = 140
    Width = 134
    Height = 14
    Alignment = taRightJustify
    AutoSize = False
    Caption = 'Label1'
  end
  object Bevel1: TBevel
    Left = 2
    Top = 194
    Width = 373
    Height = 2
  end
  object SpeedButton1: TSpeedButton
    Left = 185
    Top = 202
    Width = 92
    Height = 25
    Caption = #30830#23450
    OnClick = SpeedButton1Click
  end
  object SpeedButton2: TSpeedButton
    Left = 283
    Top = 202
    Width = 92
    Height = 25
    Caption = #21462#28040'/'#36820#22238
    OnClick = SpeedButton2Click
  end
  object Memo1: TMemo
    Left = 0
    Top = 0
    Width = 377
    Height = 126
    Align = alTop
    ReadOnly = True
    TabOrder = 0
  end
  object dt_Picker1: TDateTimePicker
    Left = 136
    Top = 135
    Width = 186
    Height = 22
    Date = 37965.648992939800000000
    Time = 37965.648992939800000000
    DateFormat = dfLong
    TabOrder = 1
    OnKeyDown = dt_Picker1KeyDown
  end
  object LabeledEdit1: TLabeledEdit
    Left = 136
    Top = 164
    Width = 186
    Height = 22
    EditLabel.Width = 84
    EditLabel.Height = 14
    EditLabel.Caption = 'LabeledEdit1'
    LabelPosition = lpLeft
    TabOrder = 2
  end
end