使用UIB组件进行测试：Firebird数据库连接是否有效？

Question

在旧的IBX组件中，有一个名为“ TestConnected”的函数：

if not DB.TestConnected then
  Showmessage('Database connection dropped!');

我正在Unified InterBase component下寻找类似的命令。
选中if uDB.Connected = True ...不会不提供真实的证据。

在执行SQL命令之前，我想测试一下，如果与数据库的连接仍然正常，那么我：

• 如果连接不可用，则无需执行事务
• 可以将问题告知用户
• 尝试重新连接，等等...

我为什么需要这个？我正在创建一个后台线程类，以在超时的情况下执行所有SQL命令。

只有Firebird 4.0+可以处理超时功能。 2.5版仅支持LockTimeout，因此我不得不在辅助线程中启动所有数据库操作，如果运行时间太长，则可以停止该线程。