Drawing to many TImages in turn

Patrick,

Try this, I use it in my app.

for i:=0 to SomeNumber do
begin
        TImage(FindComponent('TN'+inttostr(i))).Free;
end;

'TN'+inttostr(i) is the Image component Name property.

Robbie...

Quote
"Patrick Robinson" <mak...@dial.pipex.com> wrote:
>Hi All,

>My problem is this:

>I have an array of "images" (actually the instructions to draw the images)
>and i wish to draw each one to its own TImage in a way equivalent to

>for Ndx := 0 to ... do

>Image0.Canvas  := Array[0]
>Image1.Canvas := Array[1]
>...etc

> Is this possible - can i "point"  to each TImage component by some kind of
>counter, like i would use to index the array, and hence keep confusion to a
>minimum.

>Regards

>PX