我在尝试使用 TGridLayout 来保存一系列 TImage 对象时得到了一些结果,每个对象都加载了位图。但是,控制之间没有余量。我已经尝试使 TImage 宽度/高度小于 TGridLayout itemheight/itemwidth,但没有运气。

示例代码:

ImageRef := TImage.Create(GridLayoutGallery);
ImageRef.Visible := False; // se true later
ImageRef.Width := GridLayoutGallery.ItemWidth - 10;
ImageRef.Height := GridLayoutGallery.ItemHeight - 10;
GridLayoutGallery.AddObject(ImageRef);

最佳答案

您自己已经接近答案了,这是我实现这一目标的方法:

假设您的 Grid 包含一系列大小为 40 x 40 px 的图像



要在图像之间应用边距,只需将 ItemWidth 组件的 ItemHeightTGridLayout 属性设置为大于实际图像大小的值,例如 42 x 42 像素。

这应该在放置在 TGridLayout 中的每个图像周围创建一个边距。

关于ios - Delphi TGridLayout 布局和项目之间的填充,我们在Stack Overflow上找到一个类似的问题:https://stackoverflow.com/questions/17909209/

10-11 16:56