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...:o

[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;