ss := i.ToString + ‘中国人民解放军中国人民解放军中国人民解放军‘; Image1.Width := Image1.Canvas.TextWidth(ss); Image1.Picture := nil; Image1.Canvas.TextOut(1, 1, ss);
根据文字动态改变image宽度,改变画布宽度尺寸大小。
时间: 2024-10-17 17:52:18
ss := i.ToString + ‘中国人民解放军中国人民解放军中国人民解放军‘; Image1.Width := Image1.Canvas.TextWidth(ss); Image1.Picture := nil; Image1.Canvas.TextOut(1, 1, ss);
根据文字动态改变image宽度,改变画布宽度尺寸大小。