delphi 让两图片首尾相连

来源：百度知道 编辑：UC知道 时间：2024/06/22 07:19:12
如何让两个不确定大小的图片左右始终紧挨着，没有缝隙。

这个很困难么？
Form上放两个TImage，设置AutoSize属性为True，运行时，当两个Image的图片都装入后：
Image2.Left := Image1.Left + Image1.Width;
Image2.Top := Image1.Top;
即可，两个Image之间绝对没有缝隙！

最简单的做法是放两个image分别装两幅图片，Align属性，第一个设置成alLeft，第二个设成alClient。AutoSize属性都设成True。