ActiveDelphi

[adsonazevedo]

Olá !!
eu tenho duas tabelas Cli_for e contas_receber onde a select das contas a receber por cidade a qual e um compo da tabela cli_for !! onde os campos para link na código na tebele cliente e cliente na tebela contas_receber eu estou utilizando adoquery !!
Muito Obrigado pela ajuda pessoal. [/b]

[gustavocco]

bom nao sei se entendi bem, mas:

select r.* from receber r, clifor c where c.codclifor = r.codclifor and c.cidade = <suacidade>;

Qqr coisa manda mais detalhes ai...

flw.
_________________
Top System - www.topsystem.com.br

[adsonazevedo]

O eu dinovo gaelra !! o cod que fiz e esse mas nao ta fazendo a consulta ele nao mostra nenhum registro nao sei o q ta errado !! se alguem poder me ajudar !!
procedure TForm1.BitBtn1Click(Sender: TObject);
begin
if bitbtn1.Enabled = true then
begin
ADOQuery1.Active := true;
end;
with ADOQuery1 do
begin
close;
sql.Clear;
sql.Add('select * from contas_receber a, cli_for b');
if edit1.Text = '' then
sql.Add('where a.vencimento <datain>= :datafim and a.valor_recebido = :valor')
else
sql.add('where a.vencimento <datain>= :datafim and a.valor_recebido = :valor and b.cidade=:cid order by b.cidade');
Prepared := true;
Parameters.ParamByName('valor').Value := 0;
Parameters.ParamByName('datain').Value := MaskEdit1.Text;
Parameters.ParamByName('datafim').Value := MaskEdit2.Text;
parameters.parambyname('cid').value := edit1.text;
ExecSQL;
open;

end;