请问 已知有3个image,如何依次操作?
image1 tag=1
image2 tag=2
image3 tag=3
想在一个循环里依次让image载入图片,请问如何实现?
[解决办法]
大概就是这样
for i:=1 to 3 do
if self.findcomponent('image'+inttostr(i))<>nil then
TImage(self.findcomponent('image'+inttostr(i))).picture.loadformfile(...);
[解决办法]
定义一个图片框数组
var
ArrayImage: array[0..2] of TImage;
ArrayImage[0] := image1;
ArrayImage[1] := image2;
ArrayImage[2] := image3;
for I:= 0 TO 2 do
ArrayImage[I].picture.LoadFromFile();