Una pequeña duda.
yo tengo algo parecido y tambien estoy buecando la manera de poder habrir desde el Dbgrid basado en Query un formulario para modificacion de datos.
pero en mi caso se complica por que lo que tengo son barios Query que mandan los datos a un DataSource. el cual es el que pinta en el DbGrid.
Código:
procedure TfrmBuscar.btnBuscarClick(Sender: TObject);
begin
if rbEmpresa.checked then Begin
qryEmpresas.close;
qryEmpresas.ParamByName('Buscar').asString := edit1.Text+'%';
dsBuscar.dataSet:=qryEmpresas;
qryEmpresas.Open;
End Else
If rbNombre.checked Then Begin
qryNombre.Close;
qryNombre.ParamByName('Buscar').asString := edit1.Text+'%';
dsBuscar.DataSet:=qryNombre;
qryNombre.Open;
End Else
If rbApellido.checked Then Begin
qryApellido.Close;
qryApellido.ParamByName('Buscar').asString := edit1.Text+'%';
dsBuscar.DataSet:=qryApellido;
qryApellido.Open;
End Else
If rbTelefono.checked Then Begin
qryTelefono.Close;
qryTelefono.ParamByName('Buscar').asString := edit1.Text+'%';
dsBuscar.DataSet:=qryTelefono;
qryTelefono.Open;
End;
end;
procedure TfrmBuscar.Salir1Click(Sender: TObject);
begin
Close;
end;
Este es el codigo que estoy Usando para las diferenres busquedas.