Suche alle Komponeten mit bestimmter property

[Sidores]

Hi,
wie der Titel es schon sagt möchte ich alle Komponeten mit einer bestimmten property, während der Laufzeit ermitteln.
Gibt es für soetwas vielleicht schon eine Funktion, wo ich nur noch sagen muss welche property die Komponente haben soll, und er mir die Namen der Komponenten zurückgibt, die diese besitzen???
Wie ist soetwas möglich?

Danke

[Sidores]

Hab was dazu gefunden:
http://www.delphipraxis.net/internal...erty+in+objekt

[DelphiDeveloper]

Die PPropList ist der Schluessel fuer dein Problem.
Alle Properties die von TPersistent kommen kann man damit einfangen.

Was jetzt noch fehlt ist dass du ueber deine Form läufts und von allen
Components die PropList ansiehst

Im Anhang findest du ein beispiel.

Das Programm lädt in eine ComboBox alle Properties von Form und deren
Komponenten.
Dann wählst du ein Property aus und es wird in der Listbox angezeigt
welche Komponente das selektierte property besitzt.

[DelphiDeveloper]

wenn du dich noch fuer die values der Properties interessiert,
dann schau dir PPropInfo an.

geht etwa so:

im var teil zusaetzlich
PropInfo: PPropInfo;

und dann

Delphi-Quellcode:

PropInfo := PropList^[j];
        ListBox1.AddItem(components[i].Name + ':' + PropList^[j].Name + ' -' +
        PropList^[j].PropType^.Name + ' value: '+
        VarToStr(GetPropValue(components[i],PropInfo^.Name)), nil);