所选择的数据别名不是本地数据库时，在那儿设置密码
编号：QA004682
建立日期: 2003年1月12日 最后修改日期：2003年1月12日
所属类别：
xbh:
操作系统: windows2000
编程工具: delphi
问题: 新建一个工程，只有一个FORM,在其ONCREAT添加如下代码
procedure TForm1.FormCreate(Sender: TObject);
var
list1:TStringList;
begin
list1:=TStringlist.Create;
Session.GetDatabaseNames(List1);
Listbox1.Items:=list1;
end;
然后在Listbox1的dbclick事件
procedure TForm1.ListBox1DblClick(Sender: TObject);
var
tableslist:TStringList;
databasename:string;
begin
tableslist:=TStringList.Create;
databasename:=listbox1.Items.Strings[listbox1.itemindex];
Session.GetTableNames(databasename,'',false,false,tableslist);
end;
listbox2.Items:=tableslist;
end;
可是每当运行dbclick时，当所选择的数据别名不是本地数据库时，告诉我用户名、密码不正确，请问在那儿设置密码？如何设置（通过程序），或者让次对话框不出现？
水平: 中级
回答:
下面的答案是假设在BDE是设置好远程数据库服务器的别名条件下：并且在Database的AliasName中设置过别名前提下：远程数据库连接采用BDE部件组中的Database控件,在Database组件中有两个属性:LoginPromt和Params ,LoginPromt属性的功能是确认是否出现远程数据库(如SQL数据库服务器)默认验密码证登录框,置为False则不出现,不过必须在该组件的Params参数属性中填写登录远程数据库时的用户名和密码，例如：user:sa; password:123;（在此假设远程数据库服务器的用户名为：sa；密码为：123）
此问题由崔晓杰回答。
| |
|
|
| |
|
|
