VCL中Application.Run()的过程

最新推荐文章于 2020-02-24 21:58:58 发布

d_yang

最新推荐文章于 2020-02-24 21:58:58 发布

阅读量1.1k

点赞数

分类专栏： Delphi

本文链接：https://blog.csdn.net/d_yang/article/details/2806355

版权

本文详细解析了VCL框架下TApplication.Run()过程，包括设置运行状态、添加退出处理、主窗体的显示逻辑以及消息循环与异常处理。在Application.Run()中，会根据CmdShow参数调整主窗体状态，并在消息循环中处理窗口消息及异常情况，直到应用程序被终止。

摘要由CSDN通过智能技术生成

2005年3月15日,发布于: http://zyyang.spaces.live.com/blog/cns!193DAE30814DFA36!210.entry

 
  procedure TApplication.Run;
begin
  FRunning := True; //I am Running.
  try
    AddExitProc(DoneApplication); //Add the current Application's Exit Proc Handler(Using AddExitProc()) so that DoneApplication is called when Exit.
    if FMainForm <> nil then //The first Form Application Creates.
    begin

 