unit2.dfm

数据装载监控程序

object login: Tlogin
  Left = 449
  Top = 129
  Width = 331
  Height = 301
  AutoSize = True
  Caption = #30331#24405
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnClose = FormClose
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 323
    Height = 267
    TabOrder = 0
    object Label1: TLabel
      Left = 48
      Top = 72
      Width = 62
      Height = 20
      Caption = 'ODBC'#65306
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label2: TLabel
      Left = 48
      Top = 112
      Width = 64
      Height = 20
      Caption = #29992#25143#21517#65306
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label3: TLabel
      Left = 48
      Top = 152
      Width = 48
      Height = 20
      Caption = #23494#30721#65306
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label4: TLabel
      Left = 48
      Top = 192
      Width = 64
      Height = 20
      Caption = #25968#25454#24211#65306
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label5: TLabel
      Left = 56
      Top = 24
      Width = 214
      Height = 27
      Caption = 'ETL'#20840#29366#24577#30417#25511#31995#32479
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -24
      Font.Name = #21326#25991#20013#23435
      Font.Style = []
      ParentFont = False
    end
    object Button1: TButton
      Left = 24
      Top = 224
      Width = 75
      Height = 25
      Caption = #30830#23450
      TabOrder = 0
      OnClick = Button1Click
    end
    object Button3: TButton
      Left = 128
      Top = 224
      Width = 75
      Height = 25
      Caption = #37325#22635
      TabOrder = 1
      OnClick = Button3Click
    end
    object Button2: TButton
      Left = 232
      Top = 224
      Width = 75
      Height = 25
      Caption = #36864#20986
      TabOrder = 2
      OnClick = Button2Click
    end
    object odbc: TComboBox
      Left = 136
      Top = 72
      Width = 145
      Height = 21
      ItemHeight = 13
      TabOrder = 3
      OnDropDown = odbcDropDown
    end
    object User_name: TEdit
      Left = 136
      Top = 112
      Width = 121
      Height = 21
      TabOrder = 4
    end
    object Password: TEdit
      Left = 136
      Top = 152
      Width = 121
      Height = 21
      PasswordChar = '*'
      TabOrder = 5
      OnKeyPress = PasswordKeyPress
    end
    object Edit3: TEdit
      Left = 136
      Top = 192
      Width = 121
      Height = 21
      TabOrder = 6
    end
  end
  object ADOConnection1: TADOConnection
    Connected = True
    ConnectionString = 
      'Provider=MSDASQL.1;Password=dwjob;Persist Security Info=True;Use' +
      'r ID=dwjob;Data Source=NCR'
    LoginPrompt = False
    Left = 16
    Top = 16
  end
end