delphi 创建一个大小不可改变的窗体,通用模板

本文整理自网络，侵删。

 
procedure TForm1.FormCreate(Sender: TObject);
begin
 form1.Left:=(screen.Width - form1.Width) div 2;
 form1.Top :=(screen.Height - form1.Height) div 3;
 form1.Constraints.MaxHeight:=form1.Height;
 form1.Constraints.MaxWidth:=form1.Width;
 form1.Constraints.MinHeight:=form1.Height;
 form1.Constraints.MinWidth:=form1.Width;
end;

http://blog.chinaunix.net/uid-20564848-id-72755.html
 

相关阅读 >>

Delphi -- gdi+ Delphi如何让 tgpimage 直接从流中加载图片

Delphi windows 编程[11] - wm_size 消息

Delphi百度网盘真实地址解析

Delphi通过post传递参数给php

Delphi xe firemonkey的stylebook皮肤控件的使用

Delphi 简单的 "双缓冲" 绘图的例子

Delphi webbrowser 表单赋值模拟点击

Delphi qr /条形码扫描仪应用示例代码（使用zxing，tframestand）

Delphi 获取指定年月的周、日数 -weeksinayear、weeksinyear、daysinayear、daysinamonth、daysinyear、daysinmonth

Delphi 判断时间是否合法 -isvaliddatetime、isvaliddate、isvalidtime、isvaliddateday

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » delphi 创建一个大小不可改变的窗体,通用模板