unbestimmter Datentyp deklarieren

[vsilverlord]

hm.
hier mal der Quelltext wie es bisher aussieht, so gefällt es mir halt überhaupt nicht:

Delphi-Quellcode:

unit uBuffer;

interface

uses
uvektor;

Type

// Pointer auf array mit extended
tarrayextended = record
  items:array of extended;
end;
  parrayextended=^tarrayextended;

// Pointer auf array mit tvektor3
tarraytvektor3 = record
  items:array of tvektor3;
end;
  parraytvektor3=^tarraytvektor3;

...

////////// TBuffer ///////////////
TBuffer = class
    public

        constructor create;virtual;
        destructor destroy;virtual;

        procedure SetSlotlength(Slotlength:integer);virtual;abstract;
end;
  pBuffer=^TBuffer;

/////////TBufferextended//////////
TBufferextended = class(TBuffer)
     protected
        fparts:tarrayextended;
        //getter setter methoden
        function getparts:parrayextended;
        procedure setparts(nitems:parrayextended);

     public
        // create / destroy
        constructor create;virtual;
        destructor destroy;virtual;
        //propertys
        property parts:parrayextended read getparts write setparts;
        procedure SetSlotlength(Slotlength:integer);override;
end;
pBufferextended=^TBufferextended;

//////////TBuffertvektor3/////////
TBuffertvektor3 = class(TBuffer)
      protected
        fparts:tarraytvektor3;
        //getter setter methoden
        function getparts:parraytvektor3;
        procedure setparts(nitems:parraytvektor3);

      public
      // create / destroy
        constructor create;virtual;
        destructor destroy;virtual;
        //propertys
        property parts:parraytvektor3 read getparts write setparts;
        procedure SetSlotlength(Slotlength:integer);override;
end;

implementation

...
end.

Ich denke ihr wisst am besten wir man das hier verbessern kann, wenigstens funktioniert es so, auch wenn es hässlich ist.
Das Ziel hier ist, dass ich TBuffer benutzen kann, ohne gleich den Typ angeben zu müssen. Den kann ich nun später angeben.
//edit: gekürzt, um Übersichtlichkeit zu schaffen