Controlar varios objetos con el mouse

[camino]

Hola amigos, tengo un problema con el mouse.

Estoy haciento un programa donde tengo que manejar 160 richedits.
Esto me obliga a hacer 160 eventos "OnMouseDawn" para que se ejecute una rutina donde solo necesita el nombre del objeto(RichEdit1, RichEdit2, etc.).

Existe alguna rutina u objeto que me permita capturar en un Edit el nombre del objeto al hacer click sobre el?

Desde ya muchas gracias.

[yusnerqui]

Bueno, puedes compartir el evento onmousedown, esto es programarlo en uno de los richedit y después, para los otros, solo ir al object inspector y en la celda del mencionado evento seleccionar en la lista desplegable el que ya progrmastes, por ejemplo richedit1mousedown

Dentro de ese evento puedes saber a cual richedir fue el que cliquearon mediante la variable sender y para saber el nombre puedes poner algo como


var Nombre:String;
begin
Nombre:= TRichEdit(Sender).name;
...


Si no interpreté mal eso es lo que quieres, espero haberte ayudado.
saludos
Yusnerqui

[camino]

Amigo Yusnerqui, funciono excelente.

Gracias.