本文整理自网络,侵删。
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 application.processmessages的作用
Delphi d10.x 在android 9及更高版本下使用Delphi获取设备序列号?
Delphi idhttp最简洁的修改和取得cookie例子
Delphi自动以管理员身份在vista 和 windows7 下运行程序
更多相关阅读请进入《Delphi》频道 >>