Ajuda para montar essa sql ?

Delphi

26/04/2004

Pessoal uso Delphi 7 e Paradox !!

Bem tenho um Form que faço uma consulta em uma tabela e mostro os nomes com o seguinte procedimento:

procedure Tfrm_localizaclientes.FLC_edtlocalizarChange(Sender: TObject);
var a,b,c: String;
begin
flc_Query.SQL.Clear;
a:=´Select * From tb_clientes.db ´;
b:=´Where Nome Like:Nome ´;
c:=´Order By Nome´;
flc_Query.SQL.Add(a+b+c);
flc_Query.Params[0].AsString;
flc_Query.ParamByName(´Nome´).AsString:=´´+´¬´+FLC_edtlocalizar.Text+´¬´;
flc_Query.Close;
flc_Query.Open
end;



Logo após localizar quero clicar na DBgrid em um Item e ao clicar em um botao fazer com que uma outra tabela minha se posicione no registro indicado pela minha sql que esta selecionado no dbgrid, Como faço isso ?


Koringa

Koringa

Curtidas 0

Respostas

Djjunior

Djjunior

26/04/2004

no evento do botão dê um locate na outra tabela tendo como base a chave primária do seu banco de clientes (que deve ser uma chave estrangeira na outra tabela)


GOSTEI 0
Marco Salles

Marco Salles

26/04/2004

eu acho que para isto ser feito as duas tabelas devem ter um [b:12dbd353da]campo em comum....[/b:12dbd353da]. No Caso o Campo Nome, por exemplo..
Então tente usar o código abaixo:
table1.Locate(´Nome´,Query1.FieldByName(´nome´).asstring,[])

Qualquer coisa poste para nos :P


GOSTEI 0
POSTAR