Hola. Los ejemplos de antes funcionaron. He intentado aplicar eso en otro caso y no funciona.
Cuando hago click en una Label, quiero que cambie el formato de esta. Para ellos llamo a un procedure de este tipo:
Código Delphi
[-]
procedure TFMante.cambiarFormato(Objeto:String; Estado:String; Categoria:String);
begin
if (Estado = 'mouseClick') then
begin
TLabel(Objeto).Font.Color := clAqua;
end;
end;
Cuando hago la llamada, en Objeto envío el nombre de la label (labelUsuarios1, por ejemplo). Entonces
TLabel(Objeto).Font.Color := clAqua;
debería ser reemplazado por:
TLabel(labelUsuarios1).Font.Color := clAqua;
Pero al hacerlo no funciona, el programa peta. Creo que es porque envío el nombre como String...
Alguna idea? Gracas