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
 

相关阅读 >>

Delphi idsmtp发送邮件

gdi tgpimage 提取 gif 动画

Delphi 检测进程是否存在

Delphi 几个日期操作

Delphi stringgrid如何清空

Delphi listview 排序功能

Delphi使用idhttp.get('') 造成假死(堵塞),请问线程idhttp怎么才能做到不出错?

Delphi读ios的设备id

Delphi 清空文件夹

pe结构详细图

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

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