Hola.
No puedo saber con seguridad la lógica que has implementado, pero suponiendo que
fListadoClientes es el form que tiene el DBGrid y el Button,
fcliente el form donde se editan los datos y
fmodulo el DataModule donde residen
qCliente y
tCliente, creo que podrías hacer:
Código Delphi
[-]
procedure TfListadoCliente.bModificarClick(Sender: TObject);
begin
fmodulo.tCliente.Active := true;
if fmodulo.tCliente.Locate('id_cliente', fmodulo.qCliente['id_cliente'], []) then
begin
fmodulo.tCliente.Edit;
fcliente := Tfcliente.Create(Self);
try
fcliente.ShowModal;
finally
fcliente.Free;
end;
end;
fmodulo.tCliente.Active := false;
fmodulo.qCliente.Refresh;
end;
Eso tratando de respetar lo mas posible el código original y suponiendo que esa es tu organización...
Saludos