社区
Delphi
帖子详情
ado数据连接属性
ghxghx
2003-08-21 12:05:16
1、如何在程序运行中弹出ado的数据连接属性对话框;2、将用户设定的连接属性记录下来::
...全文
47
5
打赏
收藏
ado数据连接属性
1、如何在程序运行中弹出ado的数据连接属性对话框;2、将用户设定的连接属性记录下来::
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
5 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
Goxu
2003-08-21
打赏
举报
回复
uses Form2所在单元;
procedure TForm1.Button1Click(Sender: TObject);
var
frDisplay: TForm2;
begin
try
frDisplay := TForm2.Create(Application);
with frDiaplay do
Edit1.Text := ADOConnection1.ConnectionString;
end;
finally
frDisplay.Free;
end;
end;
IORILI
2003-08-21
打赏
举报
回复
学习
cnhgj
2003-08-21
打赏
举报
回复
正解!
things
2003-08-21
打赏
举报
回复
//界面上有三个控件ADOConnection1,Edit1,Button1
//Edit1.text记录连接字符串
uses AdoConEd;
procedure TForm1.Button1Click(Sender: TObject);
begin
ADOConnection1.Close;
if EditConnectionString(ADOConnection1) then
begin
Edit1.Text := ADOConnection1.ConnectionString;
ShowMessage(ADOConnection1.ConnectionString);
end;
end;
nhdj
2003-08-21
打赏
举报
回复
同意:things(平) (走在未知世界)
Delphi
5,388
社区成员
262,730
社区内容
发帖
与我相关
我的任务
Delphi
Delphi 开发及应用
复制链接
扫一扫
分享
社区描述
Delphi 开发及应用
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章