Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Algorithmen, Datenstrukturen und Klassendesign (https://www.delphipraxis.net/78-algorithmen-datenstrukturen-und-klassendesign/)
-   -   Delphi Object hard cast auf Interface? (https://www.delphipraxis.net/187345-object-hard-cast-auf-interface.html)

stahli 20. Nov 2015 20:14

Object hard cast auf Interface?
 
Mal eine grundsätzliche Frage:

MyList ist ein IMyList und enthält ein Objekt TMyList, das auch IGuid unterstützt.

So klappt das wie erwartet.
Delphi-Quellcode:
if Supports(MyList, IGuid, lGuid) then
  lGuid.Guid := NewGuid;
Ein Hardcast klappt nicht. Der Debugger zeigt Unsinn an und die Zuweisung erfolgt auch nicht korrekt.
Delphi-Quellcode:
IGuid(MyList).Guid := NewGuid;

Sollte der Hardcast nicht eigentlich funktionieren?
Supports zeigt ja, dass IGuid unterstützt wird.


Ach so (fällt mir gerade ein), oder müsste man erst in das Objekt casten und dann in das andere Interface?
Oder mache ich was anderes falsch?

Stevie 20. Nov 2015 22:00

AW: Object hard cast auf Interface?
 
Und ich dachte, du weißt, was Interfaces sind, immerhin hast du nen YT Tutorial dazu gemacht.

Ein Interface, oder genauer gesagt eine Interface Referenz ist ein Pointer auf ein Array von Pointern, nämlich die Methodenpointer dieses Interfaces. Die hängen natürlich von der Implementierung dieses Interfaces ab. Wenn eine Klasse 2 unterschiedliche Interfaces implementiert, dann hat es 2 von diesen sogenannten IMTs (Interface method table), pro Interface eins. Diese stehen an einer bestimmten Stelle in der Klasseninformation.

https://sergworks.files.wordpress.co...tintobject.png

Nun dämmert es dir eventuell, warum du nicht einfach einen Hardcast von dem einen Interface auf das andere machen kannst.

stahli 20. Nov 2015 22:48

AW: Object hard cast auf Interface?
 
Ich habe ja nicht behauptet, dass ich alles weiß.
Hätte ja auch sein können, dass der Compiler das normalerweise selbstständig korrekt prüft und ich etwas falsch gemacht hätte.

Jetzt weiß ich etwas mehr.

Danke.


Alle Zeitangaben in WEZ +1. Es ist jetzt 22:34 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz