return Pointer / dynamic array

[samso]

Ich glaube renew möchte einfach nur die Syntax zu dynamische Arrays als Rückgabewert erfahren. So sollte es gehen:

Delphi-Quellcode:

type
  TVertexDynArray = array of TVertex;
  TMesh = class
  protected
     fVertices: TVertexDynArray;
  public
    property Vertices : TVertexDynArray read fVertices;
    function GetVertices : TVertexDynArray ;
  end;
[...]
procedure TRenderer.DrawMesh(mesh: TMesh);
var
    vertices: TVertexDynArray;
begin
    vertices:= mesh.GetVertices;
    vertices[0].y := 1;
    glVertexPointer(3, GL_FLOAT, sizeof(TVertex), vertices[0].x);