☆★☆★☆★☆★做MSSQL下的BDE方式连接的程序，使用DATABASE控件，其中添服务器名，用户名，还有密码。如果换到其他的机子上使用，岂不

Question

☆★☆★做MSSQL下的BDE方式连接的程序，使用DATABASE控件，其中添服务器名，用户名，还有密码。如果换到其他的机子上使用，岂不是又要重新编译一次☆★☆★

Answer 1

可以用ODBC的方式.到其它电脑上只需该电脑设置ODBC即可.也即别名.
如果用BDE则需打包BDE,用ADO则在WIN2K中自带了的.

Answer 2

那就用ODBC.
尝试过下载微软得MSADOC的吗,可以打包到可户端.

Answer 3

我不知道怎么改成可配置的，请chilli7811(chilli) 指教，也请menliwxj(有缘) 将例子发到[email protected]

Answer 4

将新的服务器信息保存在EXE文件中的INI文件manager.ini或者注册表中
内容如下：
[Manager]
DataBase Name=DatabaseName(数据库名)
Server Name= ServerName(服务器名)
User Name=sa(登陆数据库用户)
PassWord=PassWord(登陆密码)procedure TFrmDM.DataModuleCreate(Sender: TObject);
var Fini : TIniFile;
    Path : String;
begin
  Path := ExtractFilePath(Application.ExeName);
  Fini := TIniFile.Create(Path + 'Manager.ini');  DataBase1.Connected := False;
  try
  with DataBase1 do
  begin
    Params.Clear;
    Params.Append('DataBase Name='+Fini.ReadString('Manager','DataBase Name',''));
    Params.Append('Server Name='+Fini.ReadString('Manager','Server Name',''));
    Params.Append('User Name='+Fini.ReadString('Manager','User Name',''));
    Params.Append('PassWord='+Fini.ReadString('Manager','PassWord',''));    Connected := True;
  end;
  Except
    ShowMessage('数据库连接不上，请与系统管理员联系！');
    Application.Terminate;
  end;
end;
其中在interface下面的uses中加入：IniFiles
如果要换到其他PC上则只需要在manager.ini文件中改变ServerName则可以了。

Answer 5

给客户提供一个配置的地方吧，然后动态修改Database的参数

Answer 6

在不用ADO的情况下,楼上的方法比较常用,制作一个连接数据库界面,要求用户输入database's password , username and databasename ,  it is ok! enjoy!!