Zeiger auf eine Klasse

**Tenobaal**

Hallo, ich schreibe ein Programm zum Speichern von Geometrien diverser Motoren.
Die Koordinaten um die Geometrie eines Motors zu beschrieben sollen mit der Klasse TPoints gespeichert werden.
TPoints besteht aus einem zweidimensionalen dyn. Array mit X-Y-Koordinaten.

Im Programm gibt es später mehrere Instanzen von TPoints, weshalb ich mit Zeigern arbeiten wollte, um auf die gespeicherten X-Y-Koordinaten zuzugreifen.
Zu diesem Zweck habe ich einen Zeiger "Ptr:^TPoints" der auf die jeweilige Instanz von TPoints zeigen soll. Leider funktioniert es überhaupt nicht

zusammenfalten · markieren

Delphi-Quellcode:

			//...

type TCoord_XY = record //Speichert eine X-Y-Koordinate

  x,y:Double;

end;

type TPoints = Array of Array of TCoord_XY; //Enthält eine Geometrie aus X-Y-Koordinaten

//...

procedure TForm1.FormCreate(Sender: TObject);

var PointsRotor: TPoints; Ptr:^TPoints;

begin

SetLength(PointsRotor,2,3); //Setze Größe des Arrays direkt

Ptr:=@PointsRotor;

SetLength(Ptr,2,3); //Setze die Größe des Arrays über Pointer... Compiler Fehler

end;

Zeiger auf eine Klasse

Zeiger auf eine Klasse

Forumregeln