[[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