如何防止因数据库被破坏，而程序不能运行？高分相送！！！

Question

你在运行的时候，不要直接打开数据库，等程序运行起来后在去连接，
这样你用
try  数据库连接except
  数据库连接控件.close;
end;

Answer 1

你如果是用ADO写的话，你可以把connection用手写的方式来完成，如果发现连接有错的话，你可以手动终止程序的运行就行了。
 设计时设置 
adoconnection1.connectioned:=false;
在程序运行的时候
try
adoconnection1.connectioned:=true;
finally
showmessage('数据库连接出错。');  
end;

Answer 2

如何在运行期选择　SQL服务器？网络中有两个SQL服务器，我想运行的时候能不能直接选择服务器呢？

Answer 3

把设置都放在外部，如INI文件中，运行时用TDataBase加载就行，如：Database.ini[Server]Server Name: NtServer
Database Name: DBTest
User Name: sa
PassWord:

Answer 4

这个函数可以调用WINDOWS自带的设置用于database连接框的:
PromptDataSource(handle,str)使用示例:procedure TFrmCreateDatabase.BitBtn1Click(Sender: TObject);
var
  str:string;
begin
  //显示微软数据连接窗口连接服务器
  str:= PromptDataSource(Handle,ADOConnection1.ConnectionString);
  Memo1.Lines.Text:=str;
   
end;