Ayuda a completar una busqueda

[salvanano]

La cuestion es que no quiero destruir las ventanas, ya que es una busqueda a la que quiero acceder siempre que necesite. el problema esta en que cuando yo pongo
procedure TForm1.Button1Click(Sender: TObject);
begin
if Form2.showmodal = mrOk then
begin
Table1.Locate('Nombre', Form1.Elegido,[]);
// operar con las tablas
end;
En este caso la variable elegido me la da como inexistente, pero la tengo declarada, y si solo pongo Elegido, me la da por buena, pero el programa no me funciona correctamente.
Podrias ayudarme a ayar el problema?
Gracias

[[Lepe]]

Si el Form2 es el de busqueda, la variable elegido debería estar en esa misma ventana.

Por supuesto deberá estar declarada en la zona public de Form2.

ya me contarás si fue un fallo de escritura...

Un saludo

[salvanano]

Tengo todo correcto, pero no me funciona, creo que es porque utilizo la misma tabla en el dbgrid como en la que quiero que se muestren los datos, pero no estoy seguro. La cuestion es que porque no me deja, tengo declarada la variable 'Elegido', y puesto todo en su sitio, pero al darle a aceptar no me hace nada, tan solo vuelve a la ventan principal, y deja todos los campos como estaban anteriormente.

[[Lepe]]

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
begin
if Form2.showmodal = mrOk then
begin
if Table1.Locate('Nombre', Form1.Elegido,[]) then
  ShowMessage('si encontrado')
else
  ShowMessage('no encontrado');
// operar con las tablas
end;

Con esto ya sabes si lo encuentra o no. Debería encontrarlo por fuerza

Pon un breakpoint (punto de ruptura) en el table1.locate, y mira por donde vá.

Que significa "operar con las tablas"

Un saludo

[salvanano]

He encontrado una solucion muy facil, y es en la tabla del form1 en la opcion MasterSource porner Form2.Datasource1. De esta forma automaticamente pasa los datos seleccionados a la ventana inicial.
Es un poco cutre pero funciona perfetamente, es simple y no me complico tanto la vida.
Un saludo y muchas gracias por ayudarme.