Hola amigos, una consulta con el afan de que mi aplicacion vaya mas rapido.
Utilizo delphi 2006, firebird 2.0, IBExpert y componentes interbase
Tengo 2 tablas, hago una busqueda en una para obtener el cierto codigo ligado a esta, luego con este codigo busco en la otra tabla. Este es el codigo que utilizo:
Código Delphi
[-]
ibquery4.close;
ibquery4.SQL.clear;
ibquery4.SQL.Add('Select * from PRESUPUESTO');
IBQUERY4.SQL.ADD('WHERE EMPRESA='+quotedstr(edit1.text));
IBQUERY4.SQL.ADD('AND (PERIODO = '+ QUOTEDSTR(edit2.text));
ibquery4.open;
if ibquery4.isempty = false then
begin
ibquery2.close;
ibquery2.sql.clear;
ibquery2.sql.add('select * from compras');
ibquery2.sql.add('where empresa='+quotedstr(edit1.text));
ibquery2.sql.add('AND codigo='+quotedstr(ibquery4.fieldbyname('codigo').asstring));
ibquery2.open;
end;
Funciona bien, pero queria saber si es que existe una forma que funcione mas rapido que esta... ya que aqui hago 2 consultas...
Existe alguna forma de relacionar esta dos tablas y que funciona mas rapido
Gracias... espero que pueda ayudar.
Saludos