현재 오라클을 ODAC으로 열결시켜 테스트를 하는데 한 프로그램에서 MS_SQL과 오라클을
동시에 연결하여 사용하고 있습니다.

그런데 오라클은 읽기만 하는데 속도가 무척 늦게 뜨네요.

처음 사용해서 그런지 Session쪽과 OraQuery에서 속도와 관련된 옵션 또는 파라메터들이
어떤것이 있는지 사용해 보신 분 있으시면 조언 부탁드립니다.

참고로 해당되는 부분을 첨부합니다.

    with ORAQuery1 do
        begin
          i_row := 0;
          sglist2.rowcount := 0;
          close;
          SQL.CLEAR;
          SQL.ADD(' select * from xxx ');
          SQL.ADD(' where (DT = '''+t_Key+''')' );
//          SQL.Add(' order by DT ');
          OPEN;
          while not EOF do
            begin
              sglist2.cells[0, i_row] := inttostr(i_row + 1);
              sglist2.cells[1, i_row] := fieldbyname('a').asstring + '-' + fieldbyname('SEQ').asstring;
              t_cust := fieldbyname('b').asstring;
              t_prod := fieldbyname('c').asstring;
              t_dept := fieldbyname('d').asstring;
              t_no := fieldbyname('e').AsString;
              t_kind := fieldbyname('f').AsString;
              with ORAQuery2 do
                  begin
                  close;
                  SQL.Clear;
                  SQL.ADD('select * from x1 where (a = '''+t_cust+''') and (b = '''+t_dept+''')');
                  OPEN;
                  sglist2.cells[2, i_row] := fieldbyname('a').asstring;
                  end;

              with ORAQuery2 do
                  begin
                  close;
                  SQL.Clear;
                  SQL.ADD('select * from x2 where (a = '''+t_cust+''') and (b ='''+t_dept+''') and (c = '''+t_prod+''')');
                  OPEN;
                  sglist2.cells[3, i_row] := fieldbyname('a').asstring;
                  end;

              with ORAQuery2 do
                  begin
                  close;
                  SQL.Clear;
                  SQL.ADD('select * from x3 where DT = ('''+t_key+''') and (a ='''+t_no+''') and (b = '''+t_kind+''')');
                  OPEN;
                  sglist2.cells[4, i_row] := fieldbyname('a').asstring;
                  end;

              with ORAQuery2 do
                  begin
                  close;
                  SQL.Clear;
                  SQL.ADD('select * from x4 where a = ('''+t_mst+''')');
                  OPEN;
                  sglist2.cells[8, i_row] := fieldbyname('a').asstring;
                  sglist2.cells[9, i_row] := fieldbyname('b').asstring;
                  end;

              inc(i_row);
              sglist2.rowcount := sglist2.rowcount + 1;
              next;
            end;
        sglist2.rowcount := sglist2.rowcount - 1;
        end;