Objekt-Variablen sind in Delphi Zeiger (Referenzen).
Delphi-Quellcode:
constructor Txyz.Create(GridName : TNextGrid);
begin
inherited Create; // nicht vergessen!!
FPrivVariable := GridName;
end;
Das Objekt das im Parameter GridName übergeben wird schon existieren bevor ein Objekt der Klasse Txyz erzeugt wird.
Delphi-Quellcode:
var
ng : TNextGrid;
xyz : Txyz;
begin
ng := TNextGrid.Create();
xyz := Txyz.Create(ng);
xyz.Irgendwas();
....
xyz.Free;
ng.Free; // Reihenfolge ist wichtig
Wichtig ist, dass das Objekt
ng aus obigem Beispiel eine längere Lebensdauer als
xyz hat!