Delphi全局变量带来的问题-创新互联

最近在写一个Delphi程序,想到一个问题,即Delphi为了方便使用的需要,自动创建了所有的窗体,并将这些窗体变量自动声明为全局变量。想了一下,这会带来一些问题:

我们提供的服务有:网站制作、网站设计、微信公众号开发、网站优化、网站认证、衡水ssl等。为1000多家企事业单位解决了网站和推广的问题。提供周到的售前咨询和贴心的售后服务,是有科学管理、有技术的衡水网站制作公司

1、窗体声明为全局变量,可以随时随地可用,但也同时意味着,随时会被修改和调用,调用关系复杂,且难以被追踪。

2、不符合面对向象的要求。由于窗体全局变量的存在,在各个类的方法实现中,涉及到其它窗体时,代码都是类似于 frmMain.XXX 、 frmAddInstance.XXX ,使用窗体变量进行直接调用。但这样是不合理的,一个类的方法实现,直接调用的是某一个具体对象的方法,而不是通过创建、组合、继续的方式来实现代码,不符合面对对象的精神。

如:TForm1的OnClick方法里,经常看到开发人员这样写:

procedure TForm1.OnClick(Sender:TObject);

begin

form1.Caption := 'abc';

form2.Visable := not form2.Visable;

end;

这里在一个类的实现方法里直接使用了form1这个全局窗体变量,虽然运行没有问题,但如果TForm1创建了第二个实例呢,点击第二个实例的窗体时,它的标题根本不会变,但是第一个实例反而改变了。这样的代码肯定是可笑的。如果亡羊补牢,应该把from1改为self。这里对form2的引用也是类似,代码实现引用了具体的全局实例而不是由自己创建或控制的对象,是不合理的。

Delphi的机制难以改变,暂时可以将每个窗体的全局变量看作是单例变量来使用,即不要尝试去创建窗体的第二个实例。

3、Delphi创建的数据模块,上面的组件全部都是可见的,虽然操作方便,但很容易引导开发人员直接去操作组件。更合理的方式是将这些操作封装为模块公开的方法,每个方法实现特定的业务逻辑,其它窗体通过这些方法(即广义上的模块接口)去操作,而不是直接操作组件,从而达到解耦的目的。

另外有需要云服务器可以了解下创新互联cdcxhl.cn,海内外云服务器15元起步,三天无理由+7*72小时售后在线,公司持有idc许可证,提供“云服务器、裸金属服务器、高防服务器、香港服务器、美国服务器、虚拟主机、免备案服务器”等云主机租用服务以及企业上云的综合解决方案,具有“安全稳定、简单易用、服务可用性高、性价比高”等特点与优势,专为企业上云打造定制,能够满足用户丰富、多元化的应用场景需求。


网页题目:Delphi全局变量带来的问题-创新互联
文章位置:http://scyanting.com/article/diesis.html