Objekt mit Objekt assoziieren?

[Mattze]

Hallo,

ich habe natürlich gesucht.
Den Class Helper scheint es erst ab Delphi 8 zu geben. Ich bin noch bei Delphin 7 prof.
Gibt's da auch was in der Art.
Der wäre wohl toll und wirklich genau das richtige.

Gruß
Matthias

[shmia]

Ich werfe da mal das Interface in die Runde.
Ein vorgegebenes Interface kann von völlig verschiedenen Klassen implementiert werden.
Etwas nervig ist nur, das man gezwungen ist, von TComObject abzuleiten oder man muss alle 3 Methoden von IUnknown selbst implementieren.
Für TComponent und alles darunter ist IUnknown aber schon implementiert.

[jfheins]

Nein, die gibts da noch nicht ...

Aber du könntest natürlich auch den Tag dafür benutzen, einfach xyz.Tag := @MyRecordVar; machen, und auslesen via TMyRecord(Pointer(xyz.Tag)^).Filename oder so ...

[Mattze]

Hallo,

'tschuldigung! Ist zwar schon einen Moment her, aber trotzdem vielen Dank!
Das war mein erster Gedanke als ich anfing, darüber nachzudenken. Dann wurde ich aber ganz schnell misstrauisch, weil es mir zu einfach erschien.
Und vor allen Dingen ist das eine wirklich gute Möglichkeit, ein Objekt zur Laufzeit mit ein paar zusätzlichen Eigenschaften zu versehen. Borlands statement, dass sie das "nur aus Kompatibilitätsgründen" mitschleppen, klingt dann doch ziemlich merkwürdig!

Ihr habt also keine negativen Erfahrungen damit gemacht? Könnte ja sein, dass ich da irgendwas übersehe!
Inzwischen habe ich das aber eingebaut und auch schon relativ oft ausprobiert. Bisher gibt es keine Probleme!
(Es muss übrigens heißen: xyz.tag:=Integer(@MeinSatz)

Gruß
Matthias