Delphi窗体显示后弹出一个对话框的方法

今天要实现一个功能就是delphi窗体显示后弹出一个模式对话框,一开始就在formshow方法中加入弹出对话框的方法,没想到居然先弹出对话框而没有弹出窗体,郁闷良久,采用在formshow时发消息的方法实现该功能。后来仔细思考了这种情况下的实现方案,这个简单的问题应该有两种实现方法:1.formshow最后发一个消息postmessage,相应消息处理函数接收到该消息后弹出要求的对话框;这也是我今天采用的方案,很成功;2.采用计时器的方式实现。今天发现在一开始先弹出模式对话框再显示窗体的情况下,在弹出对话框后计时器内过程就开始执行;但只有处理完弹出对话框后才能真正显示窗体。

原文地址:https://www.cnblogs.com/doit8791/p/2598384.html