office97 mdb에서 bde사용하다가 msacess2000,ado ,델파이6으로 프로그램 변환할려고 작업중인 초보입니다.
험난한 변환과정을 헤치고 지금까지 잘 왔는데 쿼리로 테이블내용을 채우고 보여주는 내용인데
그리드에 나타나지 않아서 디버깅 해 봤는데 직전에 tbl1.recordcount 리턴값 - 1
tbl1.recordcount 리턴값 0 그래서 Tbl1.eof 가 true되면서 while not Tbl1.eof do begin while문
안에 코딩된 작업을 하지않음
refresh, application.processmessages, Tbl1.First, tbl1.Last, Tbl1.First, Tbl1.close,
Tbl1.open별 수를 써도 않되네요, 그리고 Tbl1.indexname 도 반영이 않되어서
Tbl1.indexfieldnames 로 사용 ado패취도 해 봤고 db복구도 해봤고 간혹 디버그 중 브레이크포인트해 놓고 ms aceccess
프로그램으로 확인해보고 f9키 누르면 정상적으로 Tbl1.eof 가 false되면서 실행됨.
너무 상황이 복잡해서 경험한 고수님들이 있을런지 아니면 ado에 대하여 너무 무지했는지
알려 주시면 감사하겠읍니다.
Tbl1.refresh;
Tbl1.indexfieldnames := 'ctrlseq';
application.processmessages;
Tbl1.First;
tbl1.Last;
Tbl1.First;
Pb1.progress := 12;
gg := tbl1.RecNo ;
tbl1.next ;
gg := tbl1.RecNo ;
gg := tbl1.recordcount ;
sstb1.panels[0].text := '장부자료를 구성중입니다...';
Tbl1.close;
Tbl1.open;
Tbl1.indexfieldnames := 'ctrlseq';
Dbg1.datasource := ds1;
while not Tbl1.eof do begin