《【2017年整理】调用数据链接属性对话框的几种方法》由会员分享,可在线阅读,更多相关《【2017年整理】调用数据链接属性对话框的几种方法(2页珍藏版)》请在金锄头文库上搜索。
1、调用数据链接属性对话框的几种方法在 delphi 中有好几种方法可以得到数据库的 connectionstring 方法一 放一个 adoconnection 对象 ADOConnection1 到窗体, 然后 uses AdoConEd; 代码为 EditConnectionString(ADOConnection1); 将得到取得 ConnectionString 的对话框 方法二 先设置 uses AdoDB; 然后调用edtString.Text := PromptDataSource (handle , ); 既可以得到系统的 数据链接属性 对话框 方法三 可以自己建立一个 UDL
2、文件,然后打开 比如Form1.SaveDialog1.Filter:=数据库连接文件|*.udl;Form1.SaveDialog1.DefaultExt:=udl;Form1.SaveDialog1.FileName:=DbLink;if Form1.SaveDialog1.Execute() thenbegintempFile:=SaveDialog1.FileName;if not fileExists(tempFile) thenbeginassignfile(f,tempFile);Rewrite(F);Write(F, );CloseFile(F);end;if FileExists(tempFile) thenbegintry/WinExec(pchar(c:elog.txt),SW_NORMAL);ShellExecute(Handle,open,PChar(tempFile),nil,nil,SW_SHOWNORMAL);exceptend; end;end; 然后自己读取这个 udl 文件即可.此方法比较笨 其实几种方法都是调用了系统的 Rundll32.exe C:PROGRA1COMMON1SystemOLEDB1oledb32.dll,OpenDSLFile %1