Ver Mensaje Individual
  #3  
Antiguo 20-07-2006
Avatar de Lepe
[Lepe] Lepe is offline
Miembro Premium
 
Registrado: may 2003
Posts: 7.424
Reputación: 31
Lepe Va por buen camino
Tienes que ir por partes:
- Primero buscar con FindComponent.
- Si lo encuentra, pasarlo a la rutina que quieras, si no, controlar el error

Código Delphi [-]
var LabelFound:TComponent;
begin
Aux_Pos := ((Pos_Line-1)*6)+Pos_Column;
LabelFound := FindComponent('Label'+IntToStr(Aux_Pos));
if LabelFound <>nil  then // se ha encontrado
  LabelDblClick(TLabel(LabelFound));

Ahora en la función LabelDblClick puedes usar algo así:
Código Delphi [-]
with TLabel(Sender) do
begin

end;
Siempre y cuando te asegures que LabelDblClick siempre va a recibir un TLabel.

Saludos
__________________
Si usted entendió mi comentario, contácteme y gustosamente,
se lo volveré a explicar hasta que no lo entienda, Gracias.
Responder Con Cita