delphi7代码编辑运行环境下，Delphi Messagebox自动关闭功能演示代码，以及可运行程序，无须任何.net编译平台，windows下原生程序。 使用方法：打开对话框前调用 SetDlgAutoClose { 参数1： 设定多长时间后关闭 } { 参数2： 是否在对话框标题栏进行倒计时提示 } 代码包括了一个功能类，也就是unt_TimerDlg单元，主程序可以调用两种方法，实现不同效果。这种可自动关闭的对话框，适合各种管理系统or监控程序的提醒告知功能。 欢迎csdn