updateaccessdavid.dfm

ACCESSE和Excel之间的数据互换

object UpdateData: TUpdateData
  Left = 254
  Top = 135
  Width = 715
  Height = 307
  Caption = #23558'Excel'#25968#25454#23548#20837'Access'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 528
    Top = 64
    Width = 113
    Height = 13
    Caption = #26356'    '#26032'    '#23383'    '#27573
  end
  object SpeedButton1: TSpeedButton
    Left = 184
    Top = 64
    Width = 23
    Height = 22
    Caption = '...'
    OnClick = SpeedButton1Click
  end
  object SpeedButton2: TSpeedButton
    Left = 184
    Top = 128
    Width = 23
    Height = 22
    Caption = '...'
    OnClick = SpeedButton2Click
  end
  object ToolBar1: TToolBar
    Left = 0
    Top = 0
    Width = 707
    Height = 29
    Caption = 'ToolBar1'
    TabOrder = 7
  end
  object EdiDataSourcePathXsl: TEdit
    Left = 64
    Top = 64
    Width = 121
    Height = 21
    TabOrder = 0
    Text = 'DataSourcePath[*.xsl]'
  end
  object EdiTargetDataPath: TEdit
    Left = 64
    Top = 128
    Width = 121
    Height = 21
    TabOrder = 1
    Text = 'DataDestination[*.mdb]'
  end
  object CmbDataSourceXsl: TComboBox
    Left = 224
    Top = 64
    Width = 145
    Height = 21
    ItemHeight = 13
    TabOrder = 2
    Text = 'TableNameList'
    OnChange = CmbDataSourceXslChange
  end
  object CbmDataTargerMdb: TComboBox
    Left = 224
    Top = 128
    Width = 145
    Height = 21
    ItemHeight = 13
    TabOrder = 3
    Text = 'TableNameList'
    OnChange = CbmDataTargerMdbChange
  end
  object ListBoxFields: TListBox
    Left = 528
    Top = 96
    Width = 121
    Height = 57
    ItemHeight = 13
    TabOrder = 4
  end
  object BtnExcUpdate: TButton
    Left = 520
    Top = 176
    Width = 105
    Height = 25
    Caption = ' '#24320#22987#25191#34892#26356#26032
    TabOrder = 5
    OnClick = BtnExcUpdateClick
  end
  object ProgressBarUpdate: TProgressBar
    Left = 64
    Top = 184
    Width = 409
    Height = 16
    Min = 0
    Max = 100
    TabOrder = 6
  end
  object Button1: TButton
    Left = 392
    Top = 96
    Width = 113
    Height = 25
    Caption = #26174#31034#21487#26356#26032#23383#27573#21517
    TabOrder = 8
    OnClick = Button1Click
  end
  object ADOConDataSourceXsl: TADOConnection
    Left = 528
    Top = 64
  end
  object ADOConTargetDataMdb: TADOConnection
    Left = 528
    Top = 120
  end
  object ADOQueryDataSourceXsl: TADOQuery
    Connection = ADOConDataSourceXsl
    Parameters = <>
    Left = 576
    Top = 64
  end
  object ADOQueryTargetDataMdb: TADOQuery
    Connection = ADOConTargetDataMdb
    Parameters = <>
    Left = 576
    Top = 120
  end
  object OpenDialog: TOpenDialog
    Left = 424
    Top = 16
  end
end