selecciona el primer registro de mi tabla!!

[maru1981]

hola chicos quisiera su ayuda para ver si me ayudan a resolver mi problema tengo un formulario de busqueda de salarios con un edit1 DBGrid y botones de buscar aceptar y salir. al hacer la busqueda busca el campo ahi no tengo problemas pero como tranfiero mis datos a otro formulario al hacer click en el boton aceptar me manda el primer registro de mi tabla y no el dato que busco

este esel codigo de mi boton aceptar del formulario busqueda

begin
Form32:=TForm32.Create(self);
   try
    Form32.ShowModal;
   finally
   If Form32.nive_sall <> '' then
   Edit1.Text := Form32.nive_sall;
   Edit2.Text := Form32.salario_sal;
   Form32.Free;
   end;

ya declare mis variables publicas y este es mi codigo del boton buscar de mi formulario de modificar

begin
Form32:=TForm32.Create(self);
   try
    Form32.ShowModal;
   finally
   If Form32.nive_sall <> '' then
   Edit1.Text := Form32.nive_sall;
   Edit2.Text := Form32.salario_sal;
   Form32.Free;
   end;

no se si este mal mi sentencia en el SQL de mi ADOQuery es esta

SELECT * FROM salario
WHERE nive_sall=:A1

gracias de antemano por la ayuda...

[[ArdiIIa]]

Creo que en vez de declarar variables públicas, y asumiendo que el ADOQuery está en Form32, antes de hacer un Free sobre el formulario, deberías tomar directamente los valores desde el Query..

begin
Form32:=TForm32.Create(self);
   try
    Form32.ShowModal;
   finally
   If NOT Form32.ADOQuery.IsEmpty then
   Begin
   Edit1.Text := Form32.ADOQuery.FieldByName('nive_sall')AsString;
   Edit2.Text := Form32.ADOQuery.FieldByName('salario_sall')AsString;;
   End;
   Form32.Free;
   end;