Como eu faço para unir duas tb em uma pesquisa

Delphi

14/04/2003

com uma eu faço isso :
with dm do
begin
IBQCopiaNotaUnidas.Close;
IBQCopiaNotaUnidas.SQL.Clear;
IBQCopiaNotaUnidas.SQL.Add(´SELECT * FROM CopiaNota´);
IBQCopiaNotaUnidas.SQL.Add(´WHERE NumeroNota=:NumeroNota´);
IBQCopiaNotaUnidas.ParamByName(´NumeroNota´).ASSTRING:=Edit_Cod_Ped_1.Text;
IBQCopiaNotaUnidas.Prepare;
IBQCopiaNotaUnidas.Open;
If Dm.IBQCopiaNotaUnidas.RecordCount=0 then
begin
ShowMessage(´Produto não cadastrado´);
Edit_Cod_Ped_1.SetFocus;
exit;
end;

mas agora com duas ferro .. Sera que alguém pode me ajudar .. obrigado


C-t

C-t

Curtidas 0

Respostas

João Hueder

João Hueder

14/04/2003

Ola, a Scrip SQL eu entendi, mas sua pergunta não, o que quer fazer?


GOSTEI 0
Marcelo.c

Marcelo.c

14/04/2003

SELECT Cadastro.Cod, Cadastro.Nome, Compras.Produto, Compras.Qtde FROM Cadastro INNER JOIN Compras ON Cadastro.Cod=Compras.CodCli WHERE Cadastro.Cod=:cod;

Este é um exemplo de como listar um Cliente e o produto relacionado a ele.

Lembrando que as duas tabelas devem estar relacionadas.


GOSTEI 0
C-t

C-t

14/04/2003

CARA OBRIGADO PELA AJUDA!!!


GOSTEI 0
POSTAR