jhth1_unit.dfm

这是我照着书做的一个销售管理系统,内容不难,很简单,但是对于我这个菜鸟来说已经很不错了

          Layout = blGlyphBottom
        end
      end
    end
    object TabSheet2: TTabSheet
      Caption = #36827#36135#20184#27454
      ImageIndex = 1
      object GroupBox3: TGroupBox
        Left = 0
        Top = 33
        Width = 764
        Height = 163
        Align = alTop
        Font.Charset = GB2312_CHARSET
        Font.Color = clBlue
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 0
        object Label17: TLabel
          Left = 22
          Top = 22
          Width = 48
          Height = 12
          Caption = #20184#27454#26085#26399
          Font.Charset = GB2312_CHARSET
          Font.Color = clBlue
          Font.Height = -12
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
        end
        object Label18: TLabel
          Left = 246
          Top = 20
          Width = 48
          Height = 12
          Caption = #20184#27454#21333#21495
          Font.Charset = GB2312_CHARSET
          Font.Color = clBlue
          Font.Height = -12
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
        end
        object Label26: TLabel
          Left = 10
          Top = 50
          Width = 60
          Height = 12
          Caption = #20379#36135#21830#31616#30721
        end
        object Label27: TLabel
          Left = 234
          Top = 50
          Width = 60
          Height = 12
          Caption = #20379#36135#21830#32534#30721
        end
        object Label28: TLabel
          Left = 465
          Top = 50
          Width = 60
          Height = 12
          Caption = #20379#36135#21830#21517#31216
        end
        object Label29: TLabel
          Left = 36
          Top = 78
          Width = 36
          Height = 12
          Caption = #32463#25163#20154
        end
        object Label30: TLabel
          Left = 45
          Top = 140
          Width = 24
          Height = 12
          Caption = #22791#27880
        end
        object Label19: TLabel
          Left = 247
          Top = 80
          Width = 48
          Height = 12
          Caption = #21457#31080#31867#22411
        end
        object Label20: TLabel
          Left = 497
          Top = 109
          Width = 24
          Height = 12
          Caption = #31080#21495
        end
        object Label21: TLabel
          Left = 245
          Top = 108
          Width = 48
          Height = 12
          Caption = #26412#27425#20184#27454
        end
        object Label22: TLabel
          Left = 476
          Top = 79
          Width = 48
          Height = 12
          Caption = #20184#27454#26041#24335
        end
        object SpeedButton5: TSpeedButton
          Left = 192
          Top = 46
          Width = 20
          Height = 18
          Caption = '...'
          Flat = True
        end
        object SpeedButton6: TSpeedButton
          Left = 416
          Top = 46
          Width = 20
          Height = 18
          Caption = '...'
          Flat = True
        end
        object SpeedButton8: TSpeedButton
          Left = 192
          Top = 76
          Width = 20
          Height = 18
          Caption = '...'
          Flat = True
        end
        object SpeedButton9: TSpeedButton
          Left = 628
          Top = 76
          Width = 19
          Height = 18
          Caption = '...'
          Flat = True
        end
        object Label34: TLabel
          Left = 23
          Top = 110
          Width = 48
          Height = 12
          Caption = #36827#36135#21333#21495
        end
        object SpeedButton4: TSpeedButton
          Left = 191
          Top = 106
          Width = 20
          Height = 18
          Caption = '...'
          Flat = True
        end
        object Edit15: TEdit
          Left = 296
          Top = 16
          Width = 140
          Height = 18
          Ctl3D = False
          Font.Charset = GB2312_CHARSET
          Font.Color = clBlue
          Font.Height = -12
          Font.Name = #23435#20307
          Font.Style = []
          ParentCtl3D = False
          ParentFont = False
          TabOrder = 0
          Text = 'Edit15'
        end
        object Edit16: TEdit
          Left = 72
          Top = 46
          Width = 119
          Height = 18
          Ctl3D = False
          ParentCtl3D = False
          TabOrder = 1
          Text = 'Edit16'
        end
        object Edit17: TEdit
          Left = 296
          Top = 46
          Width = 119
          Height = 18
          Ctl3D = False
          ParentCtl3D = False
          TabOrder = 2
          Text = 'Edit17'
        end
        object Edit18: TEdit
          Left = 525
          Top = 46
          Width = 119
          Height = 18
          Ctl3D = False
          ParentCtl3D = False
          TabOrder = 3
          Text = 'Edit18'
        end
        object Edit19: TEdit
          Left = 72
          Top = 76
          Width = 119
          Height = 18
          Ctl3D = False
          ParentCtl3D = False
          TabOrder = 4
          Text = 'Edit19'
        end
        object Edit20: TEdit
          Left = 524
          Top = 76
          Width = 104
          Height = 18
          Ctl3D = False
          ParentCtl3D = False
          TabOrder = 5
          Text = 'Edit20'
        end
        object DateTimePicker2: TDateTimePicker
          Left = 72
          Top = 16
          Width = 140
          Height = 20
          CalAlignment = dtaLeft
          Date = 37587.6296475694
          Time = 37587.6296475694
          DateFormat = dfShort
          DateMode = dmComboBox
          Font.Charset = GB2312_CHARSET
          Font.Color = clBlue
          Font.Height = -12
          Font.Name = #23435#20307
          Font.Style = []
          Kind = dtkDate
          ParseInput = False
          ParentFont = False
          TabOrder = 6
        end
        object ComboBox3: TComboBox
          Left = 296
          Top = 76
          Width = 140
          Height = 20
          BevelKind = bkFlat
          Ctl3D = False
          ItemHeight = 12
          ParentCtl3D = False
          TabOrder = 7
          Text = 'ComboBox3'
        end
        object Edit21: TEdit
          Left = 72
          Top = 106
          Width = 119
          Height = 18
          Ctl3D = False
          ParentCtl3D = False
          TabOrder = 8
          Text = 'Edit21'
        end
        object Edit22: TEdit
          Left = 296
          Top = 106
          Width = 140
          Height = 18
          Ctl3D = False
          ParentCtl3D = False
          TabOrder = 9
          Text = 'Edit22'
        end
        object Edit23: TEdit
          Left = 523
          Top = 106
          Width = 121
          Height = 18
          Ctl3D = False
          ParentCtl3D = False
          TabOrder = 10
          Text = 'Edit23'
        end
        object Edit24: TEdit
          Le