mostrar datos de varias tablas relacionadas

[ecfisa]

Hola Marcos.

A ver si te entedí bien...

Tenés dos tablas: PEDIDOS y CLIENTES, supongamos que están definidas así:

TABLA PEDIDOS
COD_PEDIDO
COD_CLIENTE
DESCRIPCION

TABLA CLIENTES
COD_CLIENTE
NOMBRE
DIRECCION

Y, dado el número de pedido (que está en un edit) querés obtener los datos de la tabla PEDIDOS más algunos de la tabla CLIENTES ?

Si es eso, haría:

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
begin 
  with IBQuery do
  begin
    Close;
    SQL.Text:= 'SELECT COD_PEDIDO,COD_CLIENTE,DESCRIPCION,NOMBRE,DIRECCION '+
               'FROM PEDIDOS, CLIENTES '+
               'WHERE PEDIDOS.COD_PEDIDO = ' + QuotedStr(Edit1.Text)+
               'AND PEDIDOS.COD_CLIENTE = CLIENTES.COD_CLIENTE';
    Open;
  end;
end;

Saludos.