Você precisa acessar o Pai do componente primeiramente acompanhado dos componentes dentro dele para ter acesso. Fiz um exemplo para ter acesso ao TLabel. Espero que ajude. var oLabel: TObject begin oLabel := FindComponent('nome do TRectangle').FindComponent('nome do TLabel'); if Assigned(oLabel) then TLabel(oLabel).TextSettings.FontColor := TAlphaColorRec.White; end;