unit1.dfm

delphi开发的数据库系统,支持用户注册.管理员登陆,可以进行插入,修改,删除等操作. 普通用户可以对数据库进行查询.

object Form1: TForm1
  Left = 258
  Top = 111
  Width = 549
  Height = 346
  BorderIcons = [biSystemMenu, biMinimize]
  Caption = #20154#20107#26723#26696#31649#29702#31995#32479' 1.02'#29256
  Color = clGradientInactiveCaption
  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 = 128
    Top = 32
    Width = 276
    Height = 24
    Caption = #27426#36814#20351#29992#20154#20107#26723#26696#31649#29702#31995#32479
    Font.Charset = GB2312_CHARSET
    Font.Color = clFuchsia
    Font.Height = -21
    Font.Name = #23435#20307'-'#26041#27491#36229#22823#23383#31526#38598
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label2: TLabel
    Left = 128
    Top = 96
    Width = 48
    Height = 13
    Caption = #29992#25143#21517#65306
  end
  object Label3: TLabel
    Left = 136
    Top = 160
    Width = 36
    Height = 13
    Caption = #23494#30721#65306
  end
  object BitBtn1: TBitBtn
    Left = 24
    Top = 248
    Width = 75
    Height = 25
    Caption = #30331#24405
    TabOrder = 0
    OnClick = BitBtn1Click
  end
  object BitBtn2: TBitBtn
    Left = 120
    Top = 248
    Width = 105
    Height = 25
    Caption = #36229#32423#31649#29702#21592#30331#24405
    TabOrder = 1
    OnClick = BitBtn2Click
  end
  object BitBtn3: TBitBtn
    Left = 248
    Top = 248
    Width = 75
    Height = 25
    Caption = #27880#20876
    TabOrder = 2
    OnClick = BitBtn3Click
  end
  object BitBtn4: TBitBtn
    Left = 440
    Top = 248
    Width = 75
    Height = 25
    Caption = #36864#20986
    TabOrder = 3
    OnClick = BitBtn4Click
    Glyph.Data = {
      6E020000424D6E020000000000006E0100002800000010000000100000000100
      08000000000000010000120B0000120B00004E0000004E000000FFFFFF006666
      F500F5EAD500C6BDAC009D968800746E640069645A00676259001B19D1001B19
      D0006665D000908FFA00BCBBFB00C3C2FB005B56F90044419C0049459B007B76
      FA009B98F80069679B00C9C7FB007169F600BFBBFB00B8B2FA00CBC7FB00BAB2
      FA00C6BFFB00BCB2FA00C7C0FB00E3DFFC00A595F700AA9DF800F8F7FE00AD9C
      F800B9ACF900BDB0FA00BFB3FA00CBC0FB00D3CBFB00E1DBFC00FAF9FF00B5A5
      F800BEAFF900BFB1FA00C1B3F900C4B6FA00EAE5FD006E685F000000FB000000
      FA000000F8000000F5000000F4000000F2000000F1000000F0000101F9000101
      F0000909EC001A1AF1001B1BF1002727EB003D3DF8004C4CF4004D4DF4005050
      F4005858FA006464FA006666FA006666F9006666F8006666EB009797F800BBBB
      FB00DDDDFD00F8F8FE00FFFFFF00000000000202020204050607070605040202
      02020202030513474644444647130503020202032F0A4548494A4A4948450A2F
      030202050A46010D000000004B0C0B0A05020413450101011400000000001645
      13040547121701010118000000004B12470506461A001941403F1C000000001A
      460607431D00001F3C3B3B1B0000001D43070742270000001E37373922000027
      4207063E2300000000213636362B00233E06053D152000000000293535352C15
      3D050410322D00000000002A3434343210040205090E25280000000024333209
      050202032F083111262E2E261131082F0302020203050F3A383030383A0F0503
      020202020202040506070706050402020202}
  end
  object Edit1: TEdit
    Left = 208
    Top = 96
    Width = 121
    Height = 21
    TabOrder = 4
  end
  object Edit2: TEdit
    Left = 208
    Top = 160
    Width = 121
    Height = 21
    PasswordChar = '*'
    TabOrder = 5
  end
  object BitBtn5: TBitBtn
    Left = 344
    Top = 248
    Width = 75
    Height = 25
    Caption = #20462#25913#23494#30721
    TabOrder = 6
    OnClick = BitBtn5Click
  end
  object ADOTable1: TADOTable
    ConnectionString = 
      'Provider=SQLOLEDB.1;Password=101336ps2;Persist Security Info=Tru' +
      'e;User ID=sa;Initial Catalog='#20154#20107#31649#29702';Data Source=3AD7FD6EABA74D6'
    CursorType = ctStatic
    TableName = 'PW'
    Left = 32
    Top = 72
  end
  object ADOTable2: TADOTable
    ConnectionString = 
      'Provider=SQLOLEDB.1;Password=101336ps2;Persist Security Info=Tru' +
      'e;User ID=sa;Initial Catalog='#20154#20107#31649#29702';Data Source=3AD7FD6EABA74D6'
    CursorType = ctStatic
    TableName = 'ADPW'
    Left = 72
    Top = 24
  end
end