So da bin ich wieder! Ich hab jetzt das Record mit der Klasse ersetzt. Trotzdem kann ich nicht einfach das Array mit Instanzen dieser Klasse in den Public Bereich packen. Ich könnte jetzt auch wieder wie vorher mit nem Property Werte Lesen, aber nicht schreiben. Was hat das denn nun für einen Vorteil, wenn ich eine Klasse benutze ? Jetzt muss ich auch noch dynamisch Instanzen davon laden und das wäre dann das zweite Problem.
Vielleicht hab ich das auch ganz missverstanden ? Kannst du vielleicht den Code einfach mal ergänzen ?
Hab gerade ne Blockade
Delphi-Quellcode:
unit UCoordinates;
interface
type
//Unterklasse Zahlenpaar
TPair =
class(TObject)
private
Fx_value : Single;
Fy_value : Single;
public
constructor create();
destructor destroy();
property x_value : single
read Fx_Value
write Fx_Value;
property y_value : single
read Fy_Value
write Fy_Value;
end;
//Klasse Tabelle mit Zahlenpaaren
TCoordinates =
class(TObject)
private
ACoordinates :
Array of TPair;
public
constructor Create();
destructor Destroy;
ACoordinates :
Array of TPair;
// Das geht leider nicht ! Field definition not allowed after methods or properties
end;
implementation
//Implementation für TPair
constructor TPair.Create();
begin
inherited Create;
end;
destructor TPair.Destroy;
begin
end;
//Implementation für TCoordinates
constructor TCoordinates.Create();
begin
inherited Create;
SetLength(ACoordinates, 1);
end;
destructor TCoordinates.Destroy;
begin
end;
end.