Pasar como parametro un objeto 'calculado'
 

Hola compañeros,

Como puedo pasar como parámetro un objeto que depende de una variable que corresponde a una posicion pulsada con el Intro ? .

Me explico : Quiero hacer algo así como

Código Delphi [-]
Aux_Pos := ((Pos_Line-1)*6)+Pos_Column;
LabelDblClick(FindComponent('Label'+IntToStr(Aux_Pos)) as TLabel);

pero al parecer esto no me funciona.

He consultado la ayuda de Delphi y entiendo que FindComponent me devuelve como valor un componente que a la vez lo debería poder pasar como TObject a una nueva función, no ?

Gracias por vuestra ayuda.

Saludos a todos.

Yo creo que en primer lugar explicaras para que piensas utilizar lo que estas intentando hacer. El Objeto Sender te podría servir para lo que quieres hacer.

Saludos.

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