hi, ich mach das immer so (im OnCreate)
Delphi-Quellcode:
for i:=0 to ComponentsCount do
if (Components[i] is TIASemiPanel) then Components[i].color:=MyFarbe;
Sorry, war noch ein Fehler drin. Hier mal ein Beispiel-Code, wie ich ihn verwende:
Delphi-Quellcode:
for i:=0 to Self.ComponentCount-1 do
if (Components[i] is TXiButton) then begin
(Components[i] as TXiButton).ColorScheme:=bColorScheme;
(Components[i] as TXiButton).Cursor:=myDefault;
end;