Forum: Sonstige Fragen zu Delphi
Delphi
by alzaimar,
13. Aug 2009
Ok, die Veränderung von TInterfacedObject (Referenzzählung überschreiben) wäre die Lösung. Danke.
Forum: Sonstige Fragen zu Delphi
Delphi
by alzaimar,
13. Aug 2009
Eigentlich wollte ich ein minimalistisch kleines Observer-Pattern mit Interfaces implementieren, sodaß man beliebige Objekte nachträglich damit observieren kann. Dabei soll der Originalcode, also i.A. (Create->Process->Destroy) nicht verändert werden müssen.
Ich wollte dann nur ein Interface definieren, das die zu benachrichtigenden Klassen dann implementieren müssen.
Type
IObserver =...
Forum: Sonstige Fragen zu Delphi
Delphi
by alzaimar,
12. Aug 2009
Folgender Code:
Type
TTest = Class (TInterfacedObject, IInterface)
End;
procedure TForm1.Button1Click(Sender: TObject);
Var
l : TInterfaceList;
x : TTest;