unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs; type TForm1 = class(TForm) procedure FormCreate(Sender: TObject); private { Private declarations } public { Public declarations } end; var Form1: TForm1; implementation {$R *.dfm} procedure TForm1.FormCreate(Sender: TObject); begin ShowMessage('创建窗体'); Application.Terminate; end; initialization ShowMessage('初始化'); finalization ShowMessage('结束化') end.
Delphi初始化与结束化
免责声明:文章转载自《Delphi初始化与结束化》仅用于学习参考。如对内容有疑问,请及时联系本站处理。
上篇Mybatis之collection与association标签C# DllImport 方法,出现 The system cannot find the file specified 错误下篇
宿迁高防,2C2G15M,22元/月;香港BGP,2C5G5M,25元/月 雨云优惠码:MjYwNzM=