0

我知道这是一个愚蠢的问题，但是在更改视觉库时，我发现了 FMX 的“麻烦”......我的问题是：我需要做自己的边框，所以我将适当的边框样式设置为：“无”，但是该应用程序全屏运行，也覆盖了 Windows 工具栏，所以我想要一种根据屏幕调整申请表大小的方法，例如：

mainForm->Height = Screen->Height - 10;

使用 VCL 是可能的，但是有没有办法使用 FMX 库来做到这一点？我用 FMX 征服的最大值是（我不知道它如何返回值以及值的种类）：

Screen->Size(); // TSize

我现在也征服了它，但我有编译器错误：

TSize* Tamanho = new TSize;
Tamanho = Screen->Size();
frmPrincipal->Width = Tamanho->Width;
frmPrincipal->Height = Tamanho->Height - 10;

错误：“E2034 无法将 'TSize' 转换为 'TSize*'”

最后我试着把它放在frmPrincipal.h上，但同样的错误：

TSize *Tamanho;

PS.：解决“主要问题”的其他可能解决方案是可以接受的......

多谢！

4

1 回答 1

5

TScreen::Size()返回结构的实际实例TSize，而不是TSize*指针。您需要相应地更改代码：

TSize Tamanho = Screen->Size();
frmPrincipal->Width = Tamanho.Width;
frmPrincipal->Height = Tamanho.Height - 10;

或者，您可以使用 FMX 的平台服务框架直接访问IFMXScreenService接口（这是TScreen::Size()内部使用的）：

_di_IInterface Intf;
if (TPlatformServices::Current->SupportsPlatformService(__uuidof(IFMXScreenService), Intf))
{
    _di_IFMXScreenService Svc = Intf; 
    TPoint size = Svc->GetScreenSize().Round();
    frmPrincipal->Width = size.X;
    frmPrincipal->Height = size.Y - 10;
}
于 2015-02-20T17:57:07.270 回答