请高手解答

Question

在delphi项目当中加载data module后在很多窗体里面使用data module里面的adoquery等 控件及函数。但是每当窗体里面使用时候在uses里面登入才行。这样很多窗体时候很费时间有不规范（名称改的话全部改才行）。请教不用登入可以调用的方法。 先谢谢了。

Answer 1

很简单啊，最简单的方法：
建一个单元，比如叫xxxGlobals.pas，xxx是你的项目的名字，
在这个单元中引出一些全局变量作为别名，比如Queryxxx等等，有一个初始化过程，比如叫InitDataModule，其中设置Queryxxx := DataModule1.ADOQuery1; 等等。
这样其他单元只需要引用这个单元，使用它引出的别名就可以了，修改只需要修改这一个单元。