dbgridchama form 01

[maquinavirtual 0]

procedure TFormPesquisaCadastro.DBGridPesquisaCadastroDblClick(
  Sender: TObject);
begin
  begin
    FormCadastro.Show;
    DTM.IBQRYcadastro.Close;
    DTM.IBTABcadastro.Locate('NomeCompleto',DTM.IBQRYpesqNomeCompletoNOMECOMPLETO.AsString);
    DTM.IBQRYcadastro.Open;
  end;
end;

Com este codigo quero chamar o registro clicado no formcadastro.

Porem ele da erro no .asString e nao compila.

Lembrando que estou no formpesquisa e dando duplo clique no dbgrid

realizando pesquisa atraves de uma ibquery. Uso delphi7, ibexpert

e banco dados firebird.

Aguardo resposta.

[wllf 2]

Colega tira uma dúvida, é uma pesquisa SQL ou Locate, me parece que no seu código existe um pouco dos 2?

 

Colega montei um teste muito parecido com seu e deu certo:

 

procedure TForm2.DBGrid1DblClick(Sender: TObject);
begin
If FormCadastro <> nil then
      begin
            FormCadastro.Show;
            FormCadastro.tblcad.Locate('NOME', tbltesteNOME.AsString, [loCaseInsensitive, loPartialKey]);
            FormPesquisa.Release;
            FormPesquisa := nil;
        end;
end;

Só q sem a query, somente com o locate da tblcad do (FormCadastro)e no FormPesquisa uma outra tblteste passa o valor para o locate.

 

Qualquer dúvida posta aí !!!!