Jump to content
Fórum Script Brasil
  • 0

(Resolvido) Locate Com Dois Dbgrids


srsilver
 Share

Question

Olá Pessoal,

Tenho dois dbgrids:

O primeiro é de pesquisa, que gera depois de um select em sql.

Gostaria que acontecesse que ao marcar em alguma célula desse grid, ele apontasse para outro grid, onde fica o cadastro.

Não posso fazer direto com o resultado, pois na select uso o like e %, fazendo com que apareça vários resultados. Por isso

que preciso exatamente da linha que eu marcar do resultado da pesquisa.

Ex: DM.QryExcluido.Locate('Nome', [DM.QryPesquisa.fieldbyName('Nome').asString], [loCaseInsensitive, loPartialKey]);

Sei que o Delphi não faz isso, mas é como eu gostaria que fosse...

Queria que ele marcasse a célula exata que eu marcasse para atualizar no outro grid. <_<

Link to comment
Share on other sites

2 answers to this question

Recommended Posts

  • 0
Cara o que você quer é mais ou menos isso???

que ao clicar no grid Clientes por exemplo apareça em outro grid os produtos que esse cliente comprou... isso é só um exemplo.

Seria isso que você quer?

Alexandre

Não, na verdade é sobre a mesma tabela... mas pensando muito acabei resolvendo, pois eu fazia busca por RG e por Nome

Abaixo vai como resolvi

procedure TFrmPesquisa.DBGrid1DblClick(Sender: TObject);
var linha,coluna: integer;
    valorcampo: string;
begin
   DM.Ocor_Select;
   valorcampo:=DM.QryPesquisa.Fields[0].AsString;
   if FrmPrincipal.flag='0' then // criei um flag em outro form e a partir disso gerei os resultados corretos
    DM.Qry1.Locate('Nome', trim(valorcampo), [loCaseInsensitive, loPartialKey])
   else
    if FrmPrincipal.flag='1' then
        DM.Qry1.Locate('RG', trim(valorcampo), [loCaseInsensitive, loPartialKey]);
   FrmPesquisa.Close;
end;

Edited by Micheus
Adicionado o delimitador de código [code] [/code]. Lembre-se de utilizá-lo para melhor visualização
Link to comment
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Answer this question...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

 Share

  • Forum Statistics

    • Total Topics
      149.8k
    • Total Posts
      646.6k
×
×
  • Create New...