¿Cómo manipular el color de los componentes creados dinámicamente por Delphi?

Primero cree dos procedimientos almacenados, uno para cambiar el color de la etiqueta a rojo y otro para cambiar el color de la etiqueta a gris.

Crea etiquetas dinámicamente cuando se te llama.

lb.OnMouseEnter:=mset;

lb.OnMouseLeave:=mslv;

El siguiente es el código completo:

Proceso TForm1 .mset(Remitente:TObject);

comenzar<

TLabel(Remitente).Color:=clRed;

fin;

procedimiento TForm1.mslv(Remitente:TObject);

comenzar

TLabel(Remitente).BitBtn1Click(Remitente: TObject);

var

i:integer;

lb:TLabel;

comenzar

para i:=1 a 3 hacer

comenzar

lb:=TLabel.Create(self);

lb.Parent :=Panel1;

lb.Caption :='Etiqueta'+ inttostr (i);

lb.Top := lb.Height*i;

lb.OnMouseEnter := mset;

lb.OnMouseLeave := mslv

fin;