델파이 ADO 쿼리

Question

내가 지점 번호의 사전 정의 된 설정을 일치 약 9000 항목 만 추출 기록의 데이터 집합을 스캔해야

while (not ADOQuery1.Eof) do 
    begin 
     /* Do something */ 
     ADOQuery1.Next; 
    end; 

보다는 ADO 데이터 집합을 반복 할 수있는 빠른 방법이있다. 실행하기 전에

Answer 1

이 같은 작업의 ADORecordSet를 사용하는 것이 훨씬 빠릅니다 :

while not ADOQuery1.Recordset.EOF do 
    begin 
    ADOQuery1.Recordset.MoveNext; 
    // get value 
    SomeVar := ADOQuery1.Recordset.Fields['FieldName'].Value; 
    end; 

Answer 2

@Pieter, 두 가지 옵션

1)은 지점 번호의 사전 정의 된 세트 WHERE 조건 느릅 나무 일치를 추가, 당신의 SQL 문장을 수정할 수 있습니다.

2) TAdoQuery의 Filter 속성을 사용합니다.

AdoQuery1.close; 
AdoQuery1.filter := 'your condition goes here'; 
AdoQuery1.filtered := true; 
AdoQuery1.Open; 

Answer 3

것은이 데이터 집합에 관련된 볼 컨트롤을 업데이트하는 시간을 낭비하지에 대한 모든 necesary 아니라면 당신이 DisableControls/EnableControls를 사용하십시오.

try 
    ADOQuery1.DisableControls; 
    while (not ADOQuery1.Eof) do 
    begin 
     /* Do something */ 
     ADOQuery1.Next; 
    end; 
finally 
    ADOQuery1.EnableControls; 
end; 

감사합니다.

Answer 4

가능한 한 늦게까지 (다른 모든 항목이 일치 할 때까지) 문자열 비교를 피함으로써 추가적인 성능 향상을 얻을 수 있습니다. 데이터베이스에 많은 수의 중복 문자열이있는 경우 정수를 사용하여 첫 번째 테이블로 다시 링크 된 별도의 테이블에 문자열을 배치하는 것을 고려하십시오.

Answer 5

당신은 SQL을 포함하는 쿼리를 변경할 수 있습니다 where 절, 나는 또한 매우,에 앞으로 만보고 제안 읽기 전용 커서를 최대 속도 증가를 제공하는 것이다

Select whatever fields From whatevertable 
where branchnumber in (
    select branchnumber from whatevertable where branchid=xxz 
) 

같은.

Answer 6

델파이 ADO 항목 (TADOQuery 또는 TADOTable)은 나쁘지 않습니다 (Delphi XE2/2007에서 확인). Transbase 테이블 (ODBC 드라이버)에서 SQL 파일과 Navicat를 통해 MySQL로 데이터를 내보내는 중이었습니다. 거의 백만 건의 레코드가있는 테이블의 경우 ADO (8 백만 레코드 테이블은 2 일 후 10 % 완료), TQuery을 사용하여 몇 분 (BDE 버그로 인해 큰 테이블이 손상 될 수 있음, BDE는 마지막 15 개 업데이트되지 않음 년) 순수한 ODBC 또는 Navicat를 통해 몇 분. 조언 : ADO 대신 (개발자가 심각하게 수정하기 전까지) ADO를 사용하십시오.