Deklaration:
var pagepic: array of Timage;
Array vergrößern
Delphi-Quellcode:
SetLength(pagepic, Length(pagepic)+1); //Array vergrößern
index:=length(pagepic-1); //etwas mit dem letzten Object im Array machen
pagepic[index]:=Timage.Create(self);
pagepic[index].Onclick:=Image1Click;
Image1Click ist eine funktionierende Prozdeur wie oben schon beschrieben. Kann es sein, dass das was mit Objekten in dynamischen arrays zu tun hat?
mfg KahPee