您的位置:首页 > 其它

修复 XE8 FMX TGridLayout 容器自动计算宽度及高度的问题

2015-05-22 15:43 267 查看
说明:TGridLayout 提供计算容器内控件等分的功能:

横式(Orientation=Horizontal)可将 ItemWidth = -1(小于0则自动等分)

直式(Orientation=Vertical)可将 ItemHeight = -1(小于0则自动等分)

问题:当 TGridLayout 设定 Padding 边界时,会造成等分计算错误。

适用:XE8 Firemonkey

修复方法:

请将源码 FMX.Layouts.pas 复制到自己的工程目录里,再进行修改。

找到:
if CurPos.X + LItemWidth > Self.Width - Self.Padding.Left -
改成:
if CurPos.X + LItemWidth - Self.Padding.Left - 0.1 > Self.Width - Self.Padding.Left -

找到:
if CurPos.Y + LItemHeight > Self.Height - Self.Padding.Top -
改成:
if CurPos.Y + LItemHeight - Self.Padding.Top - 0.1 > Self.Height - Self.Padding.Top -


效果:

内容来自用户分享和网络整理,不保证内容的准确性,如有侵权内容,可联系管理员处理 点击这里给我发消息
标签: