首页 > 代码库 > Delphi initialization和finalization
Delphi initialization和finalization
1 initialization和finalization
测试办法:启动一个控制台程序,因为一般的application有太多的单元引用,可能会造成一些调试上的麻烦
经过测试,大致结果可能是这样的
加载顺序与project及各单元的引用顺序有关
首先从project文件中加载第一个单元如A,在试图加载A的Initialization时,先查看A的uses部分,这里的uses不分 Interface部分还是implementation部分,只分先后顺序,当发现A有Uses单元时,比如依次引用了单元B和C,则在加载A的 Initialization前,先加载B(这里可以理解为将A压入堆栈,专门处理B),依次递归,假如在对B单元进行处理时,发现B引用了A,根据测试 结果,猜测是先到“堆栈”里看有没有A单元,如果有,就跳过A的这部分处理,如果没有,就把B压入堆栈,处理新的引用单元
或者说在初始化时,有一个假想的队列,开始是空的,项目加载时,把第一个单元放在队列头上, 然后,将第一个单元打开,依次取uses的单元,如果队列中没有这个单元名,就追加到队列尾部,如果队列中已经有了,就跳过这个单元,依次递归,最后,把 项目所有uses到的单元放到一个队列中,然后,
Initialization的顺序是:从队列尾部倒推,依次执行各单元的initialization,
而finalization的顺序正好相反,从队列头部向后执行
上边的是有可能是错误的,简单来说,就是一个递归,碰到uses就找源码,递归到源码的uses,如果一个单元没有uses,则执行这个单元的Initialization
关于队列的说法太武断了,应当就是一个简单的递归,我的算法不好,不知道如何描述
Delphi initialization和finalization