Forum: Object-Pascal / Delphi-Language
Delphi
by Fingolfin,
11. Jul 2004
Oha, habe natürlich Unsinn erzählt.
Anstatt:
if QueryInterface(ITest, t) = S_OK then
begin
t.InterfaceMethode;
end;
Forum: Object-Pascal / Delphi-Language
Delphi
by Fingolfin,
11. Jul 2004
Hallo mirage. Mit
if QueryInterface(ITest, t) = S_OK then
begin
t.InterfaceMethode;
end;
funktioniert es.
Forum: Object-Pascal / Delphi-Language
Delphi
by Fingolfin,
11. Jul 2004
Danke für deinen Kommentar.
(test as ITest).InterfaceMethode
funktioniert ohne Probleme.
Die Abfrage:
if test is ITest then
Forum: Object-Pascal / Delphi-Language
Delphi
by Fingolfin,
11. Jul 2004
Im Nachhinein glaube ich, mich etwas zu kompliziert ausgedrückt zu habe. Ich versuche es nochmal einfacher:
Hier mein Interface und die Klasse, die es einbindet:
ITest = interface
end;
TTest = class(TInterfacedObject, ITest)
Forum: Object-Pascal / Delphi-Language
Delphi
by Fingolfin,
10. Jul 2004
Hallo nochmal. Anscheinend begehe ich immer noch einen ähnlichen Folgefehler.
Ich benutze ITest zur Datenhaltung. Das Interface und dementsprechend auch TTest beinhaltet mehere Collections, die zum Teil selbst Interfaces haben. Die Referenzzählung ist meiner Meinung nach korrekt implementiert, aber in dem Moment, in dem ich Getinterface nutzen möchte, wird der Referenzzähler des jerweiligen...
Forum: Object-Pascal / Delphi-Language
Delphi
by Fingolfin,
8. Jun 2004
:thuimb:
Oha, VIELEN DANK! Jetzt wird mir einiges klar. Und noch besser: Es funktioniert auch noch einwandfrei.
Interfaces fielen mir schon immer schwer, aber so langsam lüftet sich der Schleier.
:-D
Das geht aber echt schnell hier mit hilfreichen Antworten. :)
Fingolfin