Delphi程序访问数据库自动登陆解决办法

来源:互联网 发布:大数据专业哪些大学有 编辑:程序博客网 时间:2024/06/02 13:45

在Delphi中,有Database元件和对象,Database对象有属性:Params和LoginPrompt,充分使用这两个属性就会自动Login数据库。下面的例程就会自动Login。

    例:新建一程序(Project),在Form上放置Table,Database,DataSource,DBGrid各一个,并通过Object Inspector将DBGrid的DataSource指向DataSource,DataSource的DataSet指向Table。双击Form,进入Form1的Create事件程序代码编辑,输入:
     Database1.Params.Values['USERNAME']:='SYSDBA';
     Database1.Params.Values['PASSWORD']:='masterkey';
     Database1.LoginPrompt:=False;
     Database1.DatabaseName:='MYDB';

     Database1.AliasName:='IBLOCAL';
     Table1.DatabaseName:='MYDB';
     Table1.TableName:='EMPLOYEE';
     Table1.Open;
    运行程序(Run, F9)则可以自动Login Interbase,将数据表中的数据显示在DBGrid中。
注:对于不需要用户名和密码的ODBC驱动,可以设置USERNAME和PASSWORD为空。

原创粉丝点击