怎么样动态配置BDE 和 SQL server 2000 的连接？

Question

我现在在做毕业设计用的是BDE连接SQL server 2000每次都要动态的配置ODBC，才能连接到SQL Server 2000上。而且还要将数据库附加到企业管理理中，然后手动的配置odbc.
    请问怎么样才能动态的配置BDE 和 SQL server 2000 的连接，并且不用手动加载数据库文件到服务器呢？

Answer 1

为什么不用ADO连SQLSERVER呢？？？

Answer 2

可是我现在已经用了而且做得很大，现在要改动已经不可能了。
 有没有方法啊。
用BDE！

Answer 3

你们不会的不要发言。
真是的，用ADO我不会？还要你们教，我现在只想用BDE，会的就教一下谢谢！

Answer 4

写入INI文件，
然后每次读它

Answer 5

procedure TForm1.Button1Click(Sender: TObject);
var MyList: TStringList;
begin
MyList := TStringList.Create;
try
with MyList do
begin
Add('SERVER NAME=210.242.86.2');
Add('DATABASE NAME=db');
Add('USER NAME=sa');
end;
Session1.AddAlias('TESTSQL', 'MSSQL', MyList); //ミMSSQL
Session1.SaveConfigFile;
finally
MyList.Free;
Session1.Active:=True;
Database1.DatabaseName:='DB';
Database1.AliasName:='TESTSQL';
Database1.LoginPrompt:=False;
Database1.Params.Add('USER NAME=sa');
Database1.Params.Add('PASSWORD=');
Database1.Connected:=True;
end;
end;
procedure TForm1.Button2Click(Sender: TObject);
begin
Database1.Connected:=False;
Session1.DeleteAlias('TESTSQL'); 
end;

Answer 6

谢谢这位“梦醒了”可能有用。
还有就是写入ini文件怎么写？

Answer 7

filename:=ExtractFilePath(paramstr(0))+'文件名.ini';
myinifile:=TInifile.Create(filename);myinifile.writestring('小节名','关键字','字符串');
myinifile.writeinteger('小节名','关键字','整型');
myinifile.writebool('小节名','关键字','True/False');//写入，上面的三个都是写入的