jhth1_unit.dfm

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

          Font.Style = []
          ParentFont = False
        end
        object Label9: TLabel
          Left = 242
          Top = 21
          Width = 48
          Height = 12
          Caption = #21830#21697#32534#21495
          Font.Charset = GB2312_CHARSET
          Font.Color = clBlue
          Font.Height = -12
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
        end
        object Label10: TLabel
          Left = 454
          Top = 19
          Width = 48
          Height = 12
          Caption = #21830#21697#21517#31216
          Font.Charset = GB2312_CHARSET
          Font.Color = clBlue
          Font.Height = -12
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
        end
        object Label11: TLabel
          Left = 266
          Top = 50
          Width = 24
          Height = 12
          Caption = #35268#26684
          Font.Charset = GB2312_CHARSET
          Font.Color = clBlue
          Font.Height = -12
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
        end
        object Label12: TLabel
          Left = 479
          Top = 48
          Width = 24
          Height = 12
          Caption = #22411#21495
          Font.Charset = GB2312_CHARSET
          Font.Color = clBlue
          Font.Height = -12
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
        end
        object Label13: TLabel
          Left = 48
          Top = 51
          Width = 24
          Height = 12
          Caption = #31867#22411
          Font.Charset = GB2312_CHARSET
          Font.Color = clBlue
          Font.Height = -12
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
        end
        object Label14: TLabel
          Left = 49
          Top = 81
          Width = 24
          Height = 12
          Caption = #21333#20301
          Font.Charset = GB2312_CHARSET
          Font.Color = clBlue
          Font.Height = -12
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
        end
        object Label15: TLabel
          Left = 243
          Top = 80
          Width = 48
          Height = 12
          Caption = #21442#32771#21333#20215
          Font.Charset = GB2312_CHARSET
          Font.Color = clBlue
          Font.Height = -12
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
        end
        object Label16: TLabel
          Left = 479
          Top = 77
          Width = 24
          Height = 12
          Caption = #25968#37327
          Font.Charset = GB2312_CHARSET
          Font.Color = clBlue
          Font.Height = -12
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
        end
        object SpeedButton1: TSpeedButton
          Left = 191
          Top = 18
          Width = 20
          Height = 18
          Caption = '...'
          Flat = True
        end
        object SpeedButton2: TSpeedButton
          Left = 409
          Top = 18
          Width = 20
          Height = 18
          Caption = '...'
          Flat = True
        end
        object Edit8: TEdit
          Left = 73
          Top = 17
          Width = 117
          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 = 'Edit8'
        end
        object Edit9: TEdit
          Left = 291
          Top = 17
          Width = 117
          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 = 1
          Text = 'Edit9'
        end
        object Edit10: TEdit
          Left = 504
          Top = 15
          Width = 139
          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 = 2
          Text = 'Edit10'
        end
        object Edit11: TEdit
          Left = 292
          Top = 47
          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 = 3
          Text = 'Edit11'
        end
        object Edit12: TEdit
          Left = 505
          Top = 45
          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 = 4
          Text = 'Edit12'
        end
        object Edit13: TEdit
          Left = 292
          Top = 77
          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 = 5
          Text = 'Edit13'
        end
        object ComboBox1: TComboBox
          Left = 73
          Top = 47
          Width = 140
          Height = 20
          BevelKind = bkFlat
          Ctl3D = False
          Font.Charset = GB2312_CHARSET
          Font.Color = clBlue
          Font.Height = -12
          Font.Name = #23435#20307
          Font.Style = []
          ItemHeight = 12
          ParentCtl3D = False
          ParentFont = False
          TabOrder = 6
          Text = 'ComboBox1'
        end
        object ComboBox2: TComboBox
          Left = 73
          Top = 77
          Width = 140
          Height = 20
          BevelKind = bkFlat
          Ctl3D = False
          Font.Charset = GB2312_CHARSET
          Font.Color = clBlue
          Font.Height = -12
          Font.Name = #23435#20307
          Font.Style = []
          ItemHeight = 12
          ParentCtl3D = False
          ParentFont = False
          TabOrder = 7
          Text = 'ComboBox2'
        end
        object Edit14: TEdit
          Left = 505
          Top = 73
          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 = 8
          Text = 'Edit14'
        end
      end
      object DBGrid1: TDBGrid
        Left = 0
        Top = 270
        Width = 764
        Height = 151
        Align = alClient
        TabOrder = 2
        TitleFont.Charset = GB2312_CHARSET
        TitleFont.Color = clBlue
        TitleFont.Height = -12
        TitleFont.Name = #23435#20307
        TitleFont.Style = []
      end
      object GroupBox6: TGroupBox
        Left = 0
        Top = 0
        Width = 764
        Height = 33