Database 自动更正打开的查询和数据库连接

有时，由于人为错误，数据库连接和查询在设计时保持打开状态，并保存在dfm中。 我在想一个代码，通过在连接和查询尝试自动打开之前自动关闭这些连接和查询来避免这种错误

---

有人能帮忙吗？

您可以对连接组件进行子类化，并设置

Connected

属性，使其永远不会写入DFM。
这意味着开发人员可以在designtime中将connection属性设置为“True”，而不必担心它会在运行时保持打开状态

TAdoConnection的示例：

type
  TggAdoConnection = class(TADOConnection)
  published
    property Connected stored false;
  end;

---

这是GExperts IDE扩展的一个特性：“设置组件属性”请参阅感谢。。。很高兴知道。我还是不想安装任何东西，如果可能的话，我会使用一些代码。但这将是我的第二个选择！您可能可以通过使用OTA+ToolsAPI单元编写IDE外接程序包来实现这一点，但是如果GExperts扩展满足了您的需要，为什么还要麻烦呢？没有必要在文章的标题中重复（Delphi）。标记系统在这里工作得非常好，因此添加一个Delphi标记就足够了。多余地把它放在标题中是不必要的混乱。谢谢。@MartynA实际上我想知道是否有可能编写一个代码（例如类帮助器）来实现这一点，而不必处理IDE或.DFM，例如。。。只是为了防止在创建数据集/连接时自动打开