Überprüfen ob Klasse instanziert ist

[Koolance]

Dank dir, Assigned() war was ich gesucht hatte, hatte irgendwie ein Brett vom Kopf.

Nur leider war das nicht die Lösung für mein Problem.

Ich möchte folgenden Aufruf ermöglichen:

Code:

  address:=Taddress.Create(self,dbx_ME4);
  address.NAME1:='Gustav';
  address.NAME2:='Ganz';
  address.titel.NAME:='Herr';
  address.titel.insert;
  address.insert;

Er funktioniert mit folgender Propery:

Code:

    property titel:Ttitel read ftitel write ftitel;

Aber ich möchte noch einen Gtter dazwischen schieben

Code:

     property titel:Ttitel read getitel write ftitel;

function TAddress.Gettitel: Ttitel;
begin
  if not assigned(self.ftitel) then
  begin
    self.ftitel:=ttitel.Create(nil,MyConnection);
//    self.titel.OnAfterSelectByID:=self.titelIdChange;
  end;
  if self.ID_TITEL <> 0 then
    titel.SelectByID(self.ID_TITEL);
  result:=self.titel;
end;

Das heißt die Übergabe muss wahrscheinlich per Reference gemacht werden, habe aber keine Ahnung wie das geht.
Noch einen Tip?