Carregar registro pesquisado no formulário de cadastro
Bom dia.
Pessoal criei um form de pesquisa e nele tenho dois Edits,
um para o codigo e outro onde digito o nome a ser pesquisado e um dbgrid ele
exibe o resultado da pesquisa.
Coloquei um IBQuery e esta tudo ligado. Em um button coloquei o seguinte codigo:
procedure Tfrmconsultafornecedores.BitBtn1Click(Sender: TObject);
begin
QryConsFornecedor.CLOSE;
QryConsFornecedor.Params[0].AsString:= '%'+Edit1.Text+'%';
QryConsFornecedor.Params[1].AsString:= '%'+Edit2.Text+'%';
QryConsFornecedor.Open;
end;
Esta tudo funcionando
O que eu nao estou conseguindo fazer é ao clicar duas vezes no DBGRID, o resultao da pesquisa feita ser carregado no formulario de cadastro.
Exemplo. Cadastro de clientes nele efetuo a pesquisa por fulano de tal, ao ser encontrado o fulano de tal, dar dois clics e ai o form de pesquisa fecha e abre o form de cadastro posicionado no form de cadastro de clientes.
Desde já agradeço.Discussão (1)
Carregando comentários...