Einzelnen Beitrag anzeigen

Tenobaal

Registriert seit: 9. Mai 2013
21 Beiträge
 
Delphi XE5 Professional
 
#1

Zeiger auf eine Klasse

  Alt 11. Aug 2013, 12:04
Delphi-Version: 2007
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


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;

Geändert von Tenobaal (11. Aug 2013 um 12:06 Uhr)
  Mit Zitat antworten Zitat