Delphi 程序窗体最大化、组件居中显示代码

本文整理自网络，侵删。

 
程序窗体最大化、组件居中显示代码

程序主窗体放置Tpanel组件、把Align属性设置为alclient，在panel的Resize事件中写

procedure TFrm_AddNewUser.Panel1Resize(Sender: TObject);
begin
    Panel2.Left := round((Width - 8 - Panel2.Width) / 2);      //常量8用于处理边界问题
     Panel2.Top := round((Height - 8 - Panel2.Height) / 2);
end;

――――――――――――――――

原文链接：https://blog.csdn.net/xxkku521/article/details/11799473
 

相关阅读 >>

devexpress vcl 动态调用皮肤

Delphi d10.x 并行库ppl编程之 tparallel.for

gdi tgpimage 提取 gif 动画

Delphi xe 共享一个之前封装的多进程共享内存的memorystream

Delphi 字符串适宽处理

Delphi 得到不同平台的录音文件保存路径

Delphi 获取大于2g的物理内存大小

Delphi enumwindows回调函数获取qq2009窗体句柄

Delphi基于高斯-拉普拉斯算子的图像边缘检测

Delphi 中 unicode 转汉字 函数

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

转载请注明出处：木庄网络博客 » Delphi 程序窗体最大化、组件居中显示代码