Wie mache ich ein dyn. Array eines Objects

[himitsu]

Zitat von blink182:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
  bla:=TDCM.Create;
  bla.setfelda(5);
  showmessage(inttostr(bla.getfelda));
end;

außerhalb der Klasse solltest du nicht auf Privates zugreifen
(OK, geht hier zwar, daß beides in der gleichen Unit liegt, aber so isses ja nich gedacht)

Code:

procedure TForm1.Button1Click(Sender: TObject);
begin
  bla:=TDCM.Create;
  [b]bla.feldA[/b] := 5;
  showmessage(inttostr([b]bla.feldA[/b]));
end;