Letztendlich willst du nicht prüfen, ob eine Klasse eine bestimmte Methode enthält, sondern ob
ein
Control ein bestimmtes
Property hat und falls ja, soll dieses Property gesetzt werden.
Kleines Beispiel:
Delphi-Quellcode:
uses TypInfo;
procedure SetControlColor(AControl: TControl; Color: TColor);
begin
if IsPublishedProp(AControl, 'Color') then
SetOrdProp(AControl, 'Color', Color)
end;
Du solltest eine Zuordnungstabelle führen, bei dem für jedes Property der Datentyp vermerkt ist.
So kann man z.B. die Caption setzen:
SetStrProp(dasObjekt, 'Caption', inhalt_der_Caption);