Hello Paolo!
Saturday March 08 1997, Paolo Faccini wrote to All:
 PF> I need to create runtime many icons to show in my form.
 PF> i wrote:
 PF> for K:=0 to ICONCOUNT DO
 PF>  IconVar:=Ticon.create(self);
It would be a lot easier to help you, if you worte what you declared IconVar 
as.
But here is a solution to your problem:
Procedure Icons;
Var
  MyImageArray : Array[1..10] of TImage;
  Loop : Byte;
Begin
  For Loop:=1 To 10 Do
   Begin
     MyImageArray[Loop]:=TImage.Create(Form1);
     MyImageArray[Loop].Parent:=Form1;
     ...
   End;
End;
Kind regards Ole
    E-Mail: Ole_Mortensen@Hotmail.com
--- Pr›v CDMag 2.16 fra Primeware.
---------------