Hallo,
ich habe mal wieder eine kleine Frage, und mir fällt auf Anhieb keine wirklich geschickte Lösung ein.
Folgendes Problem: Ich habe meinen Objekten Tags zugewiesen (inklusive des Formulars).
Diese Tags entsprechen in einer externen Sprachdatei einem bestimmten Wert (Lokalisierung).
Wie kann ich dem Programm sagen, es soll alle Tags von 0000 bis 9999 durchgehen, und falls es ein Objekt mit der Property "Caption" gibt, das diesen Tag besitzt, soll es die Caption entprechend anpassen?
Wie ich die Caption am Ende auslese und ändere, weiß ich schon.

Danke für eure Hilfe schonmal im vorraus, habe gute Erfahrungen in diesem Forum gemacht

MFG Dennis

Die Komponenten einer Form kannst du über die Owner Beziehung TComponent.Components oder die Controls über die Parent Beziehung TControl.Parent herausfinden.

Mit IsPublishedProp kann man abfragen, ob es eine Property "Caption" gibt und mit GetPropValue bzw. SetPropValue diese auch auslesen und verändern.

Hier sind auch RTTI-Beispiele (lustigerweise genau für die Caption-Property) zu finden: http://www.delphipraxis.net/123356-a...tml#post841761

hm.... und haben die Forms denn auch einen Parent?
Weil ich habe nämlich mehrere Formulare die unterschiedliche Tags haben.
Falls ja, wie lautet dieser Parent-Component?

Danke;

Einen Parent vermutlich nicht, aber im Normalfall Application als Owner IIRC. Es sei denn, Du erstellst die zur Laufzeit, dann kannst Du den Owner ja selbst feslegen.

Zitat von Dennis07:

hm.... und haben die Forms denn auch einen Parent?
Weil ich habe nämlich mehrere Formulare die unterschiedliche Tags haben.
Falls ja, wie lautet dieser Parent-Component?

Danke;

Eine Form hat nicht zwangsläufig (und idR auch nicht) einen Parent (kann aber).
Einen Owner hat eine Form idR Application TApplication (muss aber auch nicht).

Insgesamt gesehen ist es sinnvoller (und leichter umzusetzen) ein Basis-Formular zu nehmen und dort diese Funktionalität zu programmieren. Alle weiteren Formulare dann von diesem ableiten und schon spart man sich das Suchen und Finden