utilidad del application.tag

[Giniromero]

Hola,


Al pulsar un botón del form1, te muestra un Form, form2, con un DBGrid en el que se muestran distintos registros de una tabla, Tabla2. Si seleccionas alguno de ellos, haciendo dobleclick sobre el dbgrid, entonces salimos del form, form1, con modal OK.

Si es así, es cuando entra en acción el Application.Tag.


Application.Tag := Form2.Tabla2CAMPOInteger.Value;
ApliRangos(sender);


donde el procedure ApliRangos(sender), tiene el siguiente código.


Tabla1.FindKey([Application.Tag]);


Siendo tabla1 una tabla que está en el form1 y que quiero que muetre el valor seleccionado.

El problema es, que no quiero usar locate, que es lo más parecido que encuentro al findKey, pues la tabla1 es grande, y se puede eternizar la busqueda.

estoy intentando hacerlo usando sql en un IBDataSet.

Pero el registro que selecciono no es el actual de la tabla2, por lo que no sé como obtener ese valor para asignarselo a la tabla1.

Espero que si no podeis ayudarme, al menos haya servido para "matar" la curiosidad de andres1569
Saludos

Virignia