Usar Nombre Componente en variable

[camino]

Hola amigos
Desearia que me ayudaran a completar una parte del problema.
Con La Funcion FindControl dejo en un Edit el nombre de un Objeto.
(RichEdit).
Hasta aqui todo bien, pero cuando quiero manejar las propiedades del objeto mecionandolo por la variable, no resulta.
Ej:
MiObjeto : TObjectName;
Edit1.Text:=FindControl(windowfrompoint( Cur )).Name;
MiObjeto := Edit1.Text;
MiObjeto.Color := clRed;


Edit1.Text contiene "RichEdit1"

[[xEsk]]

Debes realizar un casting.

Código Delphi [-]
MiObjeto : TObject;

Edit1.Text:=FindControl(windowfrompoint(Cur)).Name; // buscas el control bajo el mouse (imagino)
MiObjeto := FindComponent(Edit1.Text); // buscamos este componente en el formulario (usando su propiedad Name)
TRichEdit(MiObjeto).Color := clRed; // realizamos un casting, para convertir el TObjeto en un TRichEdit

Aqui tienes un poco de información acerca de los castings en Delphi.

Saludos

P.D.: Se puede realizar de otras formas, pero lo he hecho siguiendo tu planteamiento, para que se entienda mejor donde estan los fallos

[santus]

Holas.

Se me ocurre que quiza podrias usar findcomponent...

 
   (FindComponent(Edit1.Text) as TRichEdit).Text := 'Holitas';

busca mas en el foro si no estas familiarizado con FindComponent que hay un monton de hilos....

Saludos.

[camino]

Gracias xEsk me funciono super bien.