加一个TDatabase,设置其LoginPrompt为false,在Form的Create事件添加:
  Database1.Connected := False;
  Database1.Params.Add(UserName=''); //登录数据库帐号
  Database1.Params.Add(Password=''); //登录数据库密码
  Database1.Connected := True;