Einzelnen Beitrag anzeigen

Koolance

Registriert seit: 28. Feb 2006
Ort: Kerpen
74 Beiträge
 
Delphi 6 Enterprise
 
#5

Re: Überprüfen ob Klasse instanziert ist

  Alt 3. Nov 2006, 12:51
Aber warum kriege ich dann immer einen Stack-überlauf?

Edit Fehler gefunden:


Code:
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; //ruft sich selber auf, richtig ist result:=self.Ftitel
end;
  Mit Zitat antworten Zitat