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 xe5获取android imei id

Delphi 判断时间是否是下午 dateutils.ispm

Delphi 获取电脑进程网络连接ip端口

Delphi 如何获取进程的全路径名

Delphi randomfrom 随机返回字符串数组avalues中的一个元素

Delphi 判断uefi与 legacy bios启动模式

Delphi 10.4 自定义托管记录

Delphi 如何解析网址？

Delphi里实现多线程下载文件并且显示进度到界面

Delphi之完美splash方案

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

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