queryform.dfm

一个使用Delphi编写的ADO数据库链接查看器

object FormMain: TFormMain
  Left = 224
  Top = 106
  Width = 743
  Height = 620
  Caption = 'ADO'#26597#35810#20998#26512#22120
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Icon.Data = {
    0000010002002020100000000000E80200002600000010101000000000002801
    00000E0300002800000020000000400000000100040000000000800200000000
    0000000000000000000000000000000000000000800000800000008080008000
    0000800080008080000080808000C0C0C0000000FF0000FF000000FFFF00FF00
    0000FF00FF00FFFF0000FFFFFF00000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFDFFFFFFF9
    FFFFFFF0FFFFFFE0FFFFFFC0FFFFFF807FFFFF0C7FFFFE1C3FFFFC3E3FFFF87E
    1FFFF8FF1FFFFFFF8FFFFFFF8FFFFFFFC7FFFFFFE3FFFFFFF3FFFFFFF1FFFFFF
    F9FFFFFFFCFFFFFFFE7FFFFFFF7FFFFFFFBFFFFFFFDFFFFFFFEFFFFFFFF7FFFF
    FFFBFFFFFFFFFFFFFFFFFFFFFFFF280000001000000020000000010004000000
    0000C00000000000000000000000000000000000000000000000000080000080
    00000080800080000000800080008080000080808000C0C0C0000000FF0000FF
    000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000070000000000000000000000000000000000000000000000000000000000
    00000000000000000000000000000000000000000000FFFF0000FEFF0000FCFF
    0000F8FF0000F07F0000E27F0000C63F0000FF3F0000FF9F0000FF8F0000FFCF
    0000FFE70000FFF30000FFF90000FFFD0000FFFF0000}
  OldCreateOrder = False
  PopupMenu = PopupMenu
  OnClose = FormClose
  PixelsPerInch = 96
  TextHeight = 13
  object Splitter2: TSplitter
    Left = 185
    Top = 281
    Width = 8
    Height = 312
    Cursor = crHSplit
    Beveled = True
  end
  object Splitter1: TSplitter
    Left = 0
    Top = 273
    Width = 735
    Height = 8
    Cursor = crVSplit
    Align = alTop
    Beveled = True
  end
  object CoolBar1: TCoolBar
    Left = 0
    Top = 0
    Width = 735
    Height = 65
    Bands = <
      item
        Control = ActionToolBar1
        ImageIndex = -1
        MinHeight = 26
        Width = 731
      end
      item
        Control = Panel1
        ImageIndex = -1
        MinHeight = 37
        Width = 731
      end>
    object ActionToolBar1: TActionToolBar
      Left = 9
      Top = 0
      Width = 718
      Height = 26
      ActionManager = ActionManager
      AllowHiding = True
      Caption = 'ActionToolBar1'
      HorzSeparator = True
      Orientation = boLeftToRight
      PersistentHotKeys = False
      Spacing = 0
    end
    object Panel1: TPanel
      Left = 9
      Top = 28
      Width = 479
      Height = 37
      AutoSize = True
      BevelInner = bvLowered
      BorderWidth = 2
      TabOrder = 1
      object SpeedButton1: TSpeedButton
        Left = 446
        Top = 4
        Width = 29
        Height = 29
        Action = ADOConnect
        Flat = True
        Glyph.Data = {
          36030000424D3603000000000000360000002800000010000000100000000100
          18000000000000030000C40E0000C40E00000000000000000000FFFFFFFFFFFF
          FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
          FFFFFFFFFFFFFFFFFFFFC0C0C0C0C0C0C0C0C0FFFFFFC0C0C0C0C0C0C0C0C0C0
          C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
          8080800000000000008080808080808080808080808080808080808080808080
          80808080808080000000FFFFFFFFFFFF808080C0C0C0000000808080C0C0C000
          FF00C0C0C0C0C0C0C0C0C0000000000000000000C0C0C0808080C0C0C0C0C0C0
          808080808080808080808080FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
          FFFFFFFFFFFFFF808080C0C0C0C0C0C0C0C0C0FFFFFFC0C0C0C0C0C0C0C0C000
          0000000000000000000000000000000000000000808080C0C0C0C0C0C0C0C0C0
          C0C0C0FFFFFFC0C0C0C0C0C0808080FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
          FFC0C0C0808080C0C0C0C0C0C0C0C0C0C0C0C0FFFFFFC0C0C0C0C0C0808080FF
          FFFF000000808000808000808000808080C0C0C0808080C0C0C0C0C0C0C0C0C0
          800000800000800000C0C0C0808080FFFFFF000000FFFF008080008080008080
          80C0C0C0808080C0C0C0C0C0C0FF0000FF000000FF00008000800000808080FF
          FFFF000000808000808000808000808080C0C0C0808080C0C0C0FF0000FF0000
          FF0000008000008000FF0000808080FFFFFF8080808080808080808080808080
          80C0C0C0808080C0C0C0FF0000FF0000FF0000FF0000FF0000FF000000800080
          8080FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF808080C0C0C0FF000000FF00
          008000FF0000FF0000FF0000008000008000C0C0C0C0C0C0C0C0C0C0C0C0C0C0
          C0C0C0C0C0C0C0C0C0C0FF0000008000008000008000FF000000FF0000800000
          8000C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0FFFF00008000
          FFFF00008000FF000000FF00008000800000C0C0C0C0C0C0C0C0C0C0C0C0C0C0
          C0C0C0C0C0C0C0C0C0C0FFFFFF008000008000FF0000008000FFFF00C0C0C0C0
          C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0}
        Layout = blGlyphTop
        Margin = 4
      end
      object ConnectionString: TLabeledEdit
        Left = 91
        Top = 6
        Width = 349
        Height = 26
        AutoSize = False
        BevelKind = bkSoft
        EditLabel.Width = 84
        EditLabel.Height = 13
        EditLabel.Caption = '    '#25351#23450#25968#25454#28304#65306
        LabelPosition = lpLeft
        LabelSpacing = 3
        TabOrder = 0
      end
    end
  end
  object PanButtom: TPanel
    Left = 193
    Top = 281
    Width = 542
    Height = 312
    Align = alClient
    TabOrder = 1
    object Pages: TPageControl
      Left = 1
      Top = 1
      Width = 540
      Height = 310
      ActivePage = InfoPage
      Align = alClient
      DockSite = True
      MultiLine = True
      PopupMenu = PopupMenu
      TabIndex = 1
      TabOrder = 0
      TabPosition = tpBottom
      object DataPage: TTabSheet
        Caption = #25968#25454
        object DBGrid1: TDBGrid
          Left = 0
          Top = 0
          Width = 532
          Height = 284
          Align = alClient
          DataSource = DMADO.DSMain
          TabOrder = 0
          TitleFont.Charset = DEFAULT_CHARSET
          TitleFont.Color = clWindowText
          TitleFont.Height = -11
          TitleFont.Name = 'MS Sans Serif'
          TitleFont.Style = []
        end
      end
      object InfoPage: TTabSheet
        Caption = #20449#24687
        ImageIndex = 1
        object REInfo: TRichEdit
          Left = 0
          Top = 0
          Width = 532
          Height = 284
          Align = alClient
          Font.Charset = GB2312_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
          TabOrder = 0
        end
      end
    end
  end
  object PanLeft: TPanel
    Left = 0
    Top = 281
    Width = 185
    Height = 312
    Align = alLeft
    Constraints.MinWidth = 10
    DockSite = True
    TabOrder = 2
    object TVDatabase: TTreeView
      Left = 1
      Top = 1
      Width = 183