UniConnectDialog使用

时间:2024-10-24 23:33:26

对话框中文显示

UniConnectDialog使用

设计视图

UniConnectDialog使用

设置参数

UniConnectDialog使用

取值结果

UniConnectDialog使用

获取根据参数设置的值关键代码

    UniConnection1.ConnectDialog := UniConnectDialog1;
UniConnection1.Connect;
if UniConnection1.Connected then
begin
Memo1.Lines.Add('数据库类型:' + UniConnection1.ProviderName);
memo1.lines.Add('服务器名:' + UniConnection1.Server);
memo1.lines.Add('端口' + UniConnection1.Port.ToString);
Memo1.Lines.add('用户名:' + uniconnection1.Username);
memo1.lines.add('密码:' + UniConnection1.Password);
memo1.Lines.add('数据库名:' + UniConnection1.Database);
end;