Forum: Object-Pascal / Delphi-Language
Delphi
by Neutral General,
11. Nov 2005
Du musst/solltest die Shapes alle während der Laufzeit erzeugen.. dann hast du das Problem nicht..
procedure TForm1.FormCreate(Sender: TObject);
begin
Shapes := TShape.Create(Self); // vielleicht auch ohne die Klammer.. ka ob shapes ein Parent brauchen^^
with Shapes do begin
Parent := Self; // wichtig wenn die Klammer nötig ist^^
Left := 100;
Top := 50;
Width:= 150;
Forum: Object-Pascal / Delphi-Language
Delphi
by Neutral General,
11. Nov 2005
Shapes: Array of TShape; // so
DynShapes: Array of TShape; // oder so^^
Dann halt die Shapes dynamisch erzeugen. Und dann kannst du halt mit (Dyn)Shapes auf die Shapes zugreifen.