delphi datasnap 连接异常捕获

Question

try
dtm.SQLConnection1.Params.Values['HostName']:='127.0.0.1';
dtm.SQLConnection1.Params.Values['Port']:=211;
dtm.SQLConnection1.Connected:=True;
Except
showMessage('连接失败！');
End;

Answer 1

应该是没有close