我打算写代码,将数据库的服务名,用户名,密码写进一文件或者注册表,并且测试是否连接成功,请问有这样做的吗?这样分发程序的时候方便多了。

解决方案 »

  1.   

    可以的,你用try ado.connected := true
      

  2.   

    1、用DATABASE 控件选择数据库
    2、测试联连,可用查一数据来判断
      

  3.   

    Const
    ConnectionStr='Provider=SQLOLEDB.1;Password="%s";Persist Security Info=False;User ID=%s;'+
                           'Initial Catalog=%s;Data Source=%s';
    ADOConnection.ConnectionString := Format             (ConnectionStr,FPassWord,FUserName,FDataBaseName,FServerName]);
        Try
          ADOConenction.Open;
          Result:=True;
        Except
          Application.MessageBox('连接数据库失败!请重新建立数据连接!','提示',MB_OK+MB_ICONERROR);
        End;