将 TForm 调整为当前

大佬教程收集整理的这篇文章主要介绍了将 TForm 调整为当前，大佬教程大佬觉得挺不错的，现在分享给大家，也给大家做个参考。

如何解决将 TForm 调整为当前？

开发过程中遇到将 TForm 调整为当前的问题如何解决？下面主要结合日常开发的经验，给出你关于将 TForm 调整为当前的解决方法建议，希望对你解决将 TForm 调整为当前有所启发或帮助；

在我完成了在 FreePascal（使用 Lazarus IDE）中制作的工具后，我将其交给了一些人使用（和测试）。我的一些朋友有 1080p 显示器，有些有 2160p 显示器，而一个仍然有 720p 显示器。我的问题是，该工具对于 720p 显示器来说太大了（谈论的是 UI 的大小而不是文件大小），但对于拥有更高显示器 (2160p) 的人来说可能太小了。

我的“更新”的目标是根据屏幕分辨率设置自定义尺寸。 例如，长度和宽度都应该是大约 41.67%。按钮和图像也应该调整大小。

在为 1440p 显示器重写之前，我最初为 2160p 显示器设置了静态表格尺寸。 在 2160p 显示器的第一个版本中，我将 UI 的形式设置为 1600x900（分辨率的 41.67%）。

我不知道如何做到这一点。 到目前为止，我拥有的唯一代码是将工具放置在屏幕中间的程序（因为我也有相当多的问题）：

    procedure TForm1.staticVIEw();
    var
       w : Integer;
       h : Integer;
    begin
       Form1.position := podesktopCenter;
       Form1.borderstyle := bsDialog;
       
       w := Screen.Height;
       h := Screen.WIDth;   
    end;

不确定是否需要初始化 Screen.Heght 和 .WIDth 以及如何正确设置自定义 TForm 和 Tbutton 大小。

解决方法

暂无找到可以解决该程序问题的有效方法，小编努力寻找整理中！

如果你已经找到好的解决方法，欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@）

大佬总结

以上是大佬教程为你收集整理的将 TForm 调整为当前全部内容，希望文章能够帮你解决将 TForm 调整为当前所遇到的程序开发问题。

如果觉得大佬教程网站内容还不错，欢迎将大佬教程推荐给程序员好友。

本图文内容来源于网友网络收集整理提供，作为学习参考使用，版权属于原作者。
如您有任何意见或建议可联系处理。小编QQ：384754419，请注明来意。