uniconnection断线重连
uses memds
con.Options.LocalFailover := true;
procedure TUnidac.conConnectionLost(Sender: TObject; Component: TComponent; ConnLostCause: TConnLostCause; var RetryMode: TRetryMode);
begin
RetryMode := rmReconnectExecute; //执行重新连接并重新执行中止的操作。不引发异常
end;
原文：https://www.cnblogs.com/hnxxcxg/p/12559591.html