u_frmimports.dfm

数据表对拷程序。 做这个程序的本意是

object frmImports: TfrmImports
  Left = 194
  Top = 107
  Width = 585
  Height = 455
  Caption = #25968#25454#34920#23545#25335#31243#24207
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  ShowHint = True
  OnClose = FormClose
  OnCloseQuery = FormCloseQuery
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 12
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 577
    Height = 217
    Align = alTop
    BevelOuter = bvNone
    TabOrder = 0
    object Splitter1: TSplitter
      Left = 288
      Top = 0
      Width = 3
      Height = 217
      Cursor = crHSplit
    end
    object GroupBox1: TGroupBox
      Left = 291
      Top = 0
      Width = 286
      Height = 217
      Align = alClient
      Caption = #30446#30340#34920#23383#27573'[&D]'
      TabOrder = 0
      object Panel6: TPanel
        Left = 2
        Top = 14
        Width = 282
        Height = 201
        Align = alClient
        BevelOuter = bvNone
        TabOrder = 0
        object Panel7: TPanel
          Left = 0
          Top = 0
          Width = 282
          Height = 65
          Align = alTop
          BevelInner = bvRaised
          BevelOuter = bvLowered
          TabOrder = 0
          object Label3: TLabel
            Left = 48
            Top = 16
            Width = 36
            Height = 12
            Caption = #25968#25454#24211
          end
          object Label4: TLabel
            Left = 48
            Top = 40
            Width = 36
            Height = 12
            Caption = #25968#25454#34920
          end
          object sbnDescConnect: TSpeedButton
            Left = 224
            Top = 8
            Width = 23
            Height = 22
            Hint = #36830#25509#25968#25454#24211
            Glyph.Data = {
              76010000424D7601000000000000760000002800000020000000100000000100
              04000000000000010000120B0000120B00001000000000000000000000000000
              800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
              FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
              333333FFFFFFFFFFFFF3344444444444443337777777777777F334CCCCCCCCCC
              C43337777777777777F33444881B188444333777F3737337773333308881FF70
              33333337F3373337F3333330888BF770333333373F33F337333333330881F703
              3333333373F73F7333333333308B703333333333373F77333333333333080333
              3333333333777FF333333333301F103333333333377777FF3333333301B1F103
              333333337737777FF3333330881BFB7033333337F3737F77F333333088881F70
              333333F7F3337777FFF334448888888444333777FFFFFFF777F334CCCCCCCCCC
              C43337777777777777F334444444444444333777777777777733}
            NumGlyphs = 2
            ParentShowHint = False
            ShowHint = True
            OnClick = sbnDescConnectClick
          end
          object cmbDescTB: TComboBox
            Left = 96
            Top = 32
            Width = 153
            Height = 20
            Style = csDropDownList
            Enabled = False
            ItemHeight = 12
            TabOrder = 0
            OnChange = cmbDescTBChange
          end
          object edtDesc: TEdit
            Left = 96
            Top = 8
            Width = 121
            Height = 20
            Color = clBtnFace
            ReadOnly = True
            TabOrder = 1
            OnChange = edtDescChange
          end
        end
        object Panel2: TPanel
          Left = 241
          Top = 65
          Width = 41
          Height = 136
          Align = alRight
          BevelInner = bvRaised
          BevelOuter = bvLowered
          TabOrder = 1
          object sbnDescDown: TSpeedButton
            Left = 8
            Top = 72
            Width = 23
            Height = 22
            Glyph.Data = {
              76010000424D7601000000000000760000002800000020000000100000000100
              04000000000000010000120B0000120B00001000000000000000000000000000
              800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
              FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333303333
              333333333337F33333333333333033333333333333373F333333333333090333
              33333333337F7F33333333333309033333333333337373F33333333330999033
              3333333337F337F33333333330999033333333333733373F3333333309999903
              333333337F33337F33333333099999033333333373333373F333333099999990
              33333337FFFF3FF7F33333300009000033333337777F77773333333333090333
              33333333337F7F33333333333309033333333333337F7F333333333333090333
              33333333337F7F33333333333309033333333333337F7F333333333333090333
              33333333337F7F33333333333300033333333333337773333333}
            NumGlyphs = 2
            OnClick = sbnDescDownClick
          end
          object sbnDescUp: TSpeedButton
            Left = 8
            Top = 40
            Width = 23
            Height = 22
            Glyph.Data = {
              76010000424D7601000000000000760000002800000020000000100000000100
              04000000000000010000120B0000120B00001000000000000000000000000000
              800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
              FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333000333
              3333333333777F33333333333309033333333333337F7F333333333333090333
              33333333337F7F33333333333309033333333333337F7F333333333333090333
              33333333337F7F33333333333309033333333333FF7F7FFFF333333000090000
              3333333777737777F333333099999990333333373F3333373333333309999903
              333333337F33337F33333333099999033333333373F333733333333330999033
              3333333337F337F3333333333099903333333333373F37333333333333090333
              33333333337F7F33333333333309033333333333337373333333333333303333
              333333333337F333333333333330333333333333333733333333}
            NumGlyphs = 2
            OnClick = sbnDescUpClick
          end
          object sbnDescFist: TSpeedButton
            Left = 8
            Top = 8
            Width = 23
            Height = 22
            Glyph.Data = {
              76010000424D7601000000000000760000002800000020000000100000000100
              04000000000000010000120B0000120B00001000000000000000000000000000
              800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
              FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF003C3333339333
              337437FFF3337F3333F73CCC33339333344437773F337F33377733CCC3339337
              4447337F73FF7F3F337F33CCCCC3934444433373F7737F773373333CCCCC9444
              44733337F337773337F3333CCCCC9444443333373F337F3337333333CCCC9444
              473333337F337F337F333333CCCC94444333333373F37F33733333333CCC9444
              7333333337F37F37F33333333CCC944433333333373F7F373333333333CC9447
              33333333337F7F7F3333333333CC94433333333333737F7333333333333C9473
              33333333333737F333333333333C943333333333333737333333333333339733
              3333333333337F33333333333333933333333333333373333333}
            NumGlyphs = 2
            OnClick = sbnDescFistClick
          end
          object sbnDescLast: TSpeedButton
            Left = 8
            Top = 104
            Width = 23
            Height = 22
            Glyph.Data = {
              76010000424D7601000000000000760000002800000020000000100000000100
              04000000000000010000120B0000120B00001000000000000000000000000000
              800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
              FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333393333
              333333333337F3333333333333397333333333333337FF333333333333C94333
              3333333333737F333333333333C9473333333333337373F3333333333CC94433
              3333333337F7F7F3333333333CC94473333333333737F73F33333333CCC94443
              333333337F37F37F33333333CCC94447333333337337F373F333333CCCC94444
              33333337F337F337F333333CCCC94444733333373337F3373F3333CCCCC94444
              4333337F3337FF337F3333CCCCC94444473333733F7773FF73F33CCCCC393444
              443337F37737F773F7F33CCC33393374447337F73337F33737FFCCC333393333
              444377733337F333777FC3333339333337437333333733333373}
            NumGlyphs = 2
            OnClick = sbnDescLastClick
          end
        end
        object clbDesc: TCheckListBox
          Left = 0
          Top = 65
          Width = 241
          Height = 136
          Align = alClient
          ItemHeight = 12
          TabOrder = 2
        end
      end
    end
    object GroupBox2: TGroupBox
      Left = 0
      Top = 0
      Width = 288
      Height = 217
      Align = alLeft
      Caption = #28304#34920#23383#27573'[&S]'
      TabOrder = 1
      object Panel3: TPanel
        Left = 2
        Top = 14
        Width = 284
        Height = 201
        Align = alClient
        BevelOuter = bvNone
        TabOrder = 0
        object Panel4: TPanel
          Left = 0
          Top = 0
          Width = 284
          Height = 65
          Align = alTop
          BevelInner = bvRaised
          BevelOuter = bvLowered
          TabOrder = 0
          object Label1: TLabel
            Left = 40
            Top = 16
            Width = 36
            Height = 12
            Caption = #25968#25454#24211
          end
          object Label2: TLabel
            Left = 40
            Top = 40
            Width = 36
            Height = 12
            Caption = #25968#25454#34920
          end
          object sbnSourceConnect: TSpeedButton
            Left = 216
            Top = 8
            Width = 23
            Height = 22
            Hint = #36830#25509#25968#25454#24211
            Glyph.Data = {
              76010000424D7601000000000000760000002800000020000000100000000100
              04000000000000010000120B0000120B00001000000000000000000000000000
              800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
              FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
              333333FFFFFFFFFFFFF3344444444444443337777777777777F334CCCCCCCCCC
              C43337777777777777F33444881B188444333777F3737337773333308881FF70
              33333337F3373337F3333330888BF770333333373F33F337333333330881F703
              3333333373F73F7333333333308B703333333333373F77333333333333080333
              3333333333777FF333333333301F103333333333377777FF3333333301B1F103
              333333337737777FF3333330881BFB7033333337F3737F77F333333088881F70
              333333F7F3337777FFF334448888888444333777FFFFFFF777F334CCCCCCCCCC
              C43337777777777777F334444444444444333777777777777733}
            NumGlyphs = 2
            ParentShowHint = False
            ShowHint = True
            OnClick = sbnSourceConnectClick
          end
          object cmbSourceTB: TComboBox
            Left = 88
            Top = 32
            Width = 153
            Height = 20
            Style = csDropDownList
            Enabled = False
            ItemHeight = 12
            TabOrder = 0
            OnChange = cmbSourceTBChange
          end
          object edtSource: TEdit
            Left = 88
            Top = 8
            Width = 121