Geometrische Objekte in Liste speichern

[Sir Rufo]

Erzeuge Dir 3 Klassen für jeden Typ halt eine und schmeiß die in die Liste ... fertig.

TList speichert alles was von TObject abgeleitet wurde und das ist jede Klasse

[edit]
ok, weil du Delphi-Anfänger bist

Delphi-Quellcode:

type
  TRechteck = class
    Punkt1 : TPoint;
    Punkt2 : TPoint;
  end;

Und so greifst du über die Liste darauf zu:

Delphi-Quellcode:

if 
  Liste.Items[ i ] is TRechteck
then
  begin
    with 
      TRechteck( Liste.Items[ i ] )
    do
      begin
        // Hier kannst du auf das Objekt zugreifen
        // z.B.
        Punkt1.X := 10;
      end;
  end;

Die anderen Klassen werden analog behandelt.
[/edit]