machinetest.dfm

主要是介绍DELPHI三层应用以及分布式数据库的应用

          object DBEdit40: TDBEdit
            Left = 691
            Top = 35
            Width = 78
            Height = 19
            Color = clInfoBk
            DataField = #27169#28201
            DataSource = DataSource1
            TabOrder = 9
          end
          object DBEdit41: TDBEdit
            Left = 157
            Top = 57
            Width = 99
            Height = 19
            Color = clInfoBk
            DataField = #23556#33014
            DataSource = DataSource1
            TabOrder = 10
          end
          object DBEdit42: TDBEdit
            Left = 321
            Top = 57
            Width = 98
            Height = 19
            Color = clInfoBk
            DataField = #38145#27169
            DataSource = DataSource1
            TabOrder = 11
          end
          object DBEdit43: TDBEdit
            Left = 497
            Top = 57
            Width = 85
            Height = 19
            Color = clInfoBk
            DataField = #29076#33014
            DataSource = DataSource1
            TabOrder = 12
          end
          object DBEdit44: TDBEdit
            Left = 664
            Top = 57
            Width = 105
            Height = 19
            Color = clInfoBk
            DataField = #36895#24230
            DataSource = DataSource1
            TabOrder = 13
          end
          object DBEdit45: TDBEdit
            Left = 157
            Top = 79
            Width = 99
            Height = 19
            Color = clInfoBk
            DataField = #23556#22609#26102#38388
            DataSource = DataSource1
            TabOrder = 14
          end
          object DBEdit46: TDBEdit
            Left = 322
            Top = 79
            Width = 97
            Height = 19
            Color = clInfoBk
            DataField = #20919#21364#26102#38388
            DataSource = DataSource1
            TabOrder = 15
          end
          object DBEdit47: TDBEdit
            Left = 497
            Top = 79
            Width = 85
            Height = 19
            Color = clInfoBk
            DataField = #21608#26399#26102#38388
            DataSource = DataSource1
            TabOrder = 16
          end
          object DBEdit48: TDBEdit
            Left = 665
            Top = 79
            Width = 104
            Height = 19
            Color = clInfoBk
            DataField = #27599#20998#21860#25968
            DataSource = DataSource1
            TabOrder = 17
          end
          object DBCheckBox18: TDBCheckBox
            Left = 170
            Top = 102
            Width = 119
            Height = 17
            Caption = '('#26377#26080#32553#27700#24773#20917')'
            Color = clBtnFace
            DataField = #32553#27700#24773#20917
            DataSource = DataSource1
            ParentColor = False
            TabOrder = 19
            ValueChecked = '1'
            ValueUnchecked = '0'
          end
          object DBCheckBox20: TDBCheckBox
            Left = 319
            Top = 102
            Width = 95
            Height = 17
            Caption = '('#26377#26080#25259#38155')'
            Color = clBtnFace
            DataField = #25259#38155
            DataSource = DataSource1
            ParentColor = False
            TabOrder = 20
            ValueChecked = '1'
            ValueUnchecked = '0'
          end
          object DBCheckBox21: TDBCheckBox
            Left = 443
            Top = 102
            Width = 92
            Height = 17
            Caption = '('#26377#26080#21464#24418')'
            Color = clBtnFace
            DataField = #21464#24418
            DataSource = DataSource1
            ParentColor = False
            TabOrder = 21
            ValueChecked = '1'
            ValueUnchecked = '0'
          end
          object DBCheckBox19: TDBCheckBox
            Left = 564
            Top = 102
            Width = 89
            Height = 17
            Caption = '('#26377#26080#23556#32441')'
            Color = clBtnFace
            DataField = #23556#32441
            DataSource = DataSource1
            ParentColor = False
            TabOrder = 22
            ValueChecked = '1'
            ValueUnchecked = '0'
          end
          object DBCheckBox22: TDBCheckBox
            Left = 679
            Top = 102
            Width = 89
            Height = 18
            Caption = '('#26159#21542#21512#26684')'
            Color = clBtnFace
            DataField = #26159#21542#21512#26684
            DataSource = DataSource1
            ParentColor = False
            TabOrder = 23
            ValueChecked = '1'
            ValueUnchecked = '0'
          end
          object DBCheckBox23: TDBCheckBox
            Left = 54
            Top = 102
            Width = 83
            Height = 17
            Caption = '('#20809#27905#24230')'
            Color = clBtnFace
            DataField = #20809#27905#24230
            DataSource = DataSource1
            ParentColor = False
            TabOrder = 18
            ValueChecked = '1'
            ValueUnchecked = '0'
          end
        end
        object GroupBox4: TGroupBox
          Left = 1
          Top = 424
          Width = 777
          Height = 69
          Align = alClient
          Caption = #23458#25143#24847#35265
          Ctl3D = False
          ParentCtl3D = False
          TabOrder = 3
          object Label36: TLabel
            Left = 12
            Top = 18
            Width = 59
            Height = 13
            Caption = #20855#20307#24847#35265':'
          end
          object Label37: TLabel
            Left = 319
            Top = 43
            Width = 111
            Height = 13
            Caption = #23545#32500#20462#21592#25216#26415#35780#20215':'
          end
          object Label38: TLabel
            Left = 319
            Top = 19
            Width = 111
            Height = 13
            Caption = #23545#32500#20462#21592#24577#24230#35780#20215':'
          end
          object Label40: TLabel
            Left = 595
            Top = 18
            Width = 52
            Height = 13
            Caption = #23458#25143#31614#32626
          end
          object Label41: TLabel
            Left = 595
            Top = 43
            Width = 52
            Height = 13
            Caption = #24405#20837#26102#38388
          end
          object DBComboBox2: TDBComboBox
            Left = 444
            Top = 14
            Width = 119
            Height = 19
            Style = csOwnerDrawFixed
            Color = clInfoBk
            DataField = #24577#24230#35780#20215
            DataSource = DataSource1
            ItemHeight = 13
            Items.Strings = (
              #19978
              #20013
              #19979)
            TabOrder = 1
          end
          object DBComboBox3: TDBComboBox
            Left = 444
            Top = 38
            Width = 119
            Height = 21
            Color = clInfoBk
            DataField = #25216#26415#35780#20215
            DataSource = DataSource1
            ItemHeight = 13
            Items.Strings = (
              #19978
              #20013
              #19979)
            TabOrder = 2
          end
          object DBEdit50: TDBEdit
            Left = 665
            Top = 15
            Width = 104
            Height = 19
            Color = clInfoBk
            DataField = #23458#25143#31614#32626
            DataSource = DataSource1
            TabOrder = 3
          end
          object DBMemo1: TDBMemo
            Left = 79
            Top = 12
            Width = 220
            Height = 50
            Color = clInfoBk
            DataField = #23458#25143#24847#35265
            DataSource = DataSource1
            ScrollBars = ssVertical
            TabOrder = 0
          end
          object DBEdit51: TDBEdit
            Left = 666
            Top = 41
            Width = 103
            Height = 19
            Color = clInfoBk
            DataField = #24405#20837#26085#26399
            DataSource = DataSource1
            ReadOnly = True
            TabOrder = 4
            OnEnter = DBEdit51Enter
          end
        end
      end
    end
    object TabSheet2: TTabSheet
      Caption = #26597#30475#35797#26426#35760#24405
      ImageIndex = 1
      object DBGrid1: TDBGrid
        Left = 0
        Top = 41
        Width = 779
        Height = 455
        Align = alClient
        Color = clInfoBk
        DataSource = DataSource1
        ReadOnly = True
        TabOrder = 0
        TitleFont.Charset = GB2312_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -13
        TitleFont.Name = #23435#20307
        TitleFont.Style = []
      end
      object Panel2: TPanel
        Left = 0
        Top = 0
        Width = 779
        Height = 41
        Align = alTop
        BevelInner = bvLowered
        TabOrder = 1
        object Label35: TLabel
          Left = 589
          Top = 12
          Width = 32
          Height = 16
          Caption = #20849#26377
          Font.Charset = ANSI_CHARSET
          Font.Color = clWindowText
          Font.Height = -16
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
        end
        object Label42: TLabel
          Left = 625
          Top = 12
          Width = 75
          Height = 19
          Alignment = taCenter
          AutoSize = False
          Caption = '333'
          Color = clBtnText
          Font.Charset = GB2312_CHARSET
          Font.Color = clRed
          Font.Height = -19
          Font.Name = #26999#20307'_GB2312'
          Font.Style = [fsBold]
          ParentColor = False
          ParentFont = False
        end
        object Label43: TLabel
          Left = 704
          Top = 12
          Width = 48
          Height = 16
          Caption = #26465#35760#24405
          Font.Charset = ANSI_CHARSET
          Font.Color = clWindowText
          Font.Height = -16
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
        end
        object btn_filterfield: TButton
          Left = 8
          Top = 8
          Width = 49
          Height = 25
          Caption = #26597#35810
          TabOrder = 0
          OnClick = btn_filterfieldClick
        end
        object Button2: TButton
          Left = 56
          Top = 8
          Width = 75
          Height = 25
          Caption = #25152#26377#35760#24405
          TabOrder = 2
          OnClick = Button2Click
        end
        object btn_filterrecord: TButton
          Left = 130
          Top = 8
          Width = 49
          Height = 25
          Caption = #25171#21360
          TabOrder = 1
          OnClick = btn_filterrecordClick
        end
      end
    end
  end
  object DataSource1: TDataSource
    DataSet = ADOQuery1
    Left = 290
    Top = 36
  end
  object ADOQuery1: TADOQuery
    Connection = dm_wxp.ADOConnection1
    CursorType = ctStatic
    AfterOpen = ADOQuery1AfterOpen
    Parameters = <>
    SQL.Strings = (
      'select * from pub_z_test')
    Left = 712
    Top = 16
  end
end