Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi Property eines Objekts in einer TObjectList <-- erledigt (https://www.delphipraxis.net/57795-property-eines-objekts-einer-tobjectlist-erledigt.html)

malo 26. Nov 2005 22:07


Property eines Objekts in einer TObjectList <-- erledigt
 
Hi!

Ich habe folgendes Problem:

ich habe eine Klasse mit einer Property, die eine TObjectList zurückgibt. So:
Delphi-Quellcode:
property Tokens: TObjectList read FTokens write SetTokens;
Dort hab ich am Ende ganz viele Objekte der Klasse TTokens drin (besteht bisher nur aus 2 Properties).

Jetzt will ich auf die Properties von einem der Objekte in der TObjectList zugreifen. Die TObjectList kennt jedoch die Eigenschaften der Klasse TTokens nicht, ist ja klar. Aber ich will unbedingt auf eine der Eigenschaften der Klasse TTokens zugreifen. Ich hab es mit einem TypeCast versucht:
Delphi-Quellcode:
Memo2.Lines.Add(TTokens(Tokenizer.Tokens[i].TokString));
Aber er erkennt die Property TokString nicht (undeclared identifier), trotz Cast. Weiß jemand Rat?

P.S.: Ich weiß grad nicht, wo genau der Index hingehört, aber ich hab es mit der Variante versucht, und ich hab den Index ganz nach hinten gesetzt, funktioniert beides nicht :(


edit:
Hat sich erledigt. Ich hab das mit dem TypeCast ein wenig falsch verstanden. Es muss so heißen:
Delphi-Quellcode:
Memo2.Lines.Add(TTokens(Tokenizer.Tokens[i]).TokString);
Danke trotzdem für das Eventuelle Lesen.

Elvis 26. Nov 2005 22:16

Re: Property eines Objekts in einer TObjectList: Zugriffspro
 
Zitat:

Zitat von mlo
Memo2.Lines.Add(TTokens(Tokenizer.Tokens[i].TokString));

hmm...
hard cast: TToken(Ausdruck)
safe cast: Ausdruck as TToken

Dein Ausdruck, den du hier auf TToken boxen willst wäre Tokenizer.Token[i]
Also sollte ein hard cast wie aussehen? Rischtitch!
Delphi-Quellcode:
TToken(Tokenizer.Tokens[i]).ToString()
btw: Suche mal das Template für typisierte TObjectList-Ableitungen. Damit ist das da oben schlichtweg unnötig. ;)

edit: Menno... :cry:
Aber egal, geschrieben ist es nun schon :P


Alle Zeitangaben in WEZ +1. Es ist jetzt 04:27 Uhr.

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