CS结构 数据库是SQL。我怎么判断客户端和服务器端连接是否正常？？？？

Question

正在做一系统，里面几乎每一个窗体上几乎都用到服务器端的数据库，还有在时间控件里面也有关于数据库的操作，这时如果数据库连接不通，它会提示很多连接失败的错误（系统的），这种情况怎么处理好，请给个好的处理方法

Answer 1

try  ADOConnection1.Connected:=true;
except
  showmessage('连接数据库失败');end;

Answer 2

procedure TForm1.Timer2Timer(Sender: TObject);
var i,j,m:integer;
    a:double;
    usagetime1:string;
begin
  label12.Caption:='';
    try
      begin
      adoconnection1.Connected:=true;
      label1.Caption:=formatdatetime('hh:nn:ss',time);      
      adoquery2.SQL.Clear;
      adoquery2.SQL.Add('update runstudents set endtime='+quotedstr(formatdatetime('hh:nn:ss',time)));
      adoquery2.ExecSQL;
      end;
    except
      adoconnection1.Connected:=false;
    end;
    If not adoconnection1.Connected then                      //处理数据库连接失败
    begin
      timer1.Enabled:=false;
      timer2.Enabled:=false;
      form1.ToolButton8.Enabled:=false;
      form1.ToolButton7.Enabled:=true;
      ShowMessage('对不起，连接服务器出错，请重新连接服务器！');
    end
    else
      。。
    end;
....