unit2.dfm

Delphi结合Access

object Form2: TForm2
  Left = 354
  Top = 368
  Width = 397
  Height = 251
  Caption = #30331#20837#39564#35777
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -15
  Font.Name = #26999#20307'_GB2312'
  Font.Style = [fsBold]
  OldCreateOrder = False
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 15
  object Label1: TLabel
    Left = 72
    Top = 64
    Width = 68
    Height = 15
    Caption = #29992#25143#21517#65306
  end
  object Label2: TLabel
    Left = 72
    Top = 96
    Width = 69
    Height = 15
    Caption = #23494'  '#30721#65306
  end
  object Label3: TLabel
    Left = 104
    Top = 24
    Width = 136
    Height = 15
    Caption = #23398#29983#26723#26696#31649#29702#31995#32479
  end
  object Edit1: TEdit
    Left = 144
    Top = 64
    Width = 121
    Height = 23
    TabOrder = 0
  end
  object Edit2: TEdit
    Left = 144
    Top = 96
    Width = 121
    Height = 23
    PasswordChar = '*'
    TabOrder = 1
  end
  object Button1: TButton
    Left = 72
    Top = 136
    Width = 75
    Height = 25
    Caption = #30331'  '#20837
    TabOrder = 2
    OnClick = Button1Click
  end
  object Button2: TButton
    Left = 192
    Top = 136
    Width = 75
    Height = 25
    Caption = #36864'  '#20986
    TabOrder = 3
    OnClick = Button2Click
  end
  object ADOConnection1: TADOConnection
    ConnectionString = 
      'Provider=MSDASQL.1;Password="";Persist Security Info=True;Data S' +
      'ource=data1'
    LoginPrompt = False
    Provider = 'MSDASQL.1'
    Left = 32
    Top = 24
  end
  object ADOQuery1: TADOQuery
    Connection = ADOConnection1
    Parameters = <>
    Left = 32
    Top = 64
  end
end