unit1.dfm

利用Delphi进行简单的数据查询,数据库是利用Delphi本身自带的数据库!

            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -11
            Font.Name = 'MS Sans Serif'
            Font.Style = []
            ParentFont = False
          end
          object Edit2: TEdit
            Left = 72
            Top = 8
            Width = 121
            Height = 21
            ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
            TabOrder = 0
          end
          object Edit3: TEdit
            Left = 72
            Top = 32
            Width = 121
            Height = 21
            ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
            TabOrder = 1
          end
          object Edit4: TEdit
            Left = 72
            Top = 56
            Width = 121
            Height = 21
            ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
            TabOrder = 2
          end
          object Edit5: TEdit
            Left = 72
            Top = 88
            Width = 121
            Height = 21
            ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
            TabOrder = 3
          end
          object Button2: TButton
            Left = 442
            Top = 22
            Width = 75
            Height = 33
            Caption = #27169#31946#26597#25214
            TabOrder = 4
            OnClick = Button2Click
          end
          object Button3: TButton
            Left = 444
            Top = 75
            Width = 75
            Height = 33
            Caption = #31934#30830#26597#25214
            TabOrder = 5
            OnClick = Button3Click
          end
          object BitBtn1: TBitBtn
            Left = 208
            Top = 24
            Width = 81
            Height = 33
            Caption = #25171#24320#25968#25454
            TabOrder = 6
            OnClick = BitBtn1Click
            Kind = bkIgnore
          end
          object Edit6: TEdit
            Left = 300
            Top = 24
            Width = 121
            Height = 21
            ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
            TabOrder = 7
          end
          object Edit7: TEdit
            Left = 307
            Top = 80
            Width = 121
            Height = 21
            ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
            TabOrder = 8
          end
        end
        object Panel5: TPanel
          Left = 0
          Top = 0
          Width = 526
          Height = 234
          Align = alClient
          TabOrder = 1
          object DBGrid2: TDBGrid
            Left = 1
            Top = 1
            Width = 524
            Height = 232
            Align = alClient
            DataSource = DataSource1
            ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
            TabOrder = 0
            TitleFont.Charset = DEFAULT_CHARSET
            TitleFont.Color = clWindowText
            TitleFont.Height = -11
            TitleFont.Name = 'MS Sans Serif'
            TitleFont.Style = []
          end
        end
      end
      object TabSheet3: TTabSheet
        Caption = #28155#21152#35760#24405
        ImageIndex = 2
        object Panel6: TPanel
          Left = 0
          Top = 234
          Width = 526
          Height = 126
          Align = alBottom
          TabOrder = 0
          object Label12: TLabel
            Left = 17
            Top = 8
            Width = 38
            Height = 13
            Caption = 'CustNo:'
          end
          object Label13: TLabel
            Left = 8
            Top = 40
            Width = 47
            Height = 13
            Caption = 'Company:'
          end
          object Label14: TLabel
            Left = 24
            Top = 64
            Width = 31
            Height = 13
            Caption = 'Addr1:'
          end
          object Label15: TLabel
            Left = 21
            Top = 96
            Width = 34
            Height = 13
            Caption = 'Phone:'
          end
          object Edit8: TEdit
            Left = 75
            Top = 6
            Width = 121
            Height = 21
            ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
            TabOrder = 0
          end
          object Edit9: TEdit
            Left = 75
            Top = 34
            Width = 121
            Height = 21
            ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
            TabOrder = 1
          end
          object Edit11: TEdit
            Left = 75
            Top = 90
            Width = 121
            Height = 21
            ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
            TabOrder = 2
          end
          object Button4: TButton
            Left = 328
            Top = 16
            Width = 75
            Height = 33
            Caption = #28155#21152#35760#24405
            TabOrder = 3
            OnClick = Button4Click
          end
          object BitBtn3: TBitBtn
            Left = 216
            Top = 32
            Width = 81
            Height = 33
            Caption = #25171#24320#25968#25454
            TabOrder = 4
            OnClick = BitBtn3Click
            Kind = bkIgnore
          end
          object BitBtn4: TBitBtn
            Left = 328
            Top = 72
            Width = 75
            Height = 33
            Caption = #20445#23384#25968#25454
            TabOrder = 5
            OnClick = BitBtn4Click
            Kind = bkAll
          end
          object Edit10: TEdit
            Left = 75
            Top = 56
            Width = 121
            Height = 21
            TabOrder = 6
          end
        end
        object Panel7: TPanel
          Left = 0
          Top = 0
          Width = 526
          Height = 234
          Align = alClient
          TabOrder = 1
          object DBGrid3: TDBGrid
            Left = 1
            Top = 1
            Width = 524
            Height = 232
            Align = alClient
            DataSource = DataSource1
            ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
            TabOrder = 0
            TitleFont.Charset = DEFAULT_CHARSET
            TitleFont.Color = clWindowText
            TitleFont.Height = -11
            TitleFont.Name = 'MS Sans Serif'
            TitleFont.Style = []
          end
        end
      end
      object TabSheet4: TTabSheet
        Caption = #20462#25913#35760#24405
        ImageIndex = 3
        object Panel8: TPanel
          Left = 0
          Top = 234
          Width = 526
          Height = 126
          Align = alBottom
          TabOrder = 0
          object Label16: TLabel
            Left = 16
            Top = 16
            Width = 38
            Height = 13
            Caption = 'CustNo:'
          end
          object Label17: TLabel
            Left = 7
            Top = 40
            Width = 47
            Height = 13
            Caption = 'Company:'
          end
          object Label18: TLabel
            Left = 23
            Top = 64
            Width = 31
            Height = 13
            Caption = 'Addr1:'
          end
          object Label19: TLabel
            Left = 20
            Top = 88
            Width = 34
            Height = 13
            Caption = 'Phone:'
          end
          object Edit12: TEdit
            Left = 72
            Top = 8
            Width = 121
            Height = 21
            TabOrder = 0
            Text = 'Edit12'
          end
          object Edit13: TEdit
            Left = 72
            Top = 35
            Width = 121