DB그리드에서 엑셀로 변환하는중에...

프로그래스 바를 뛰우고.....

필드가 3000개 정도 되니 시간도 3분정도 걸립니다...

이 지루한 시간을 달래주기 위해서....

프로그레스 바를 뛰웠습니다...

헌데...........문제는 이걸 엑셀로 변환 도중에서는 델파이 프로그램

의 어떤 키도 먹지 않는다는 겁니다....

for문 중간에 리플래쉬도 했는데 말이죠........

또한  DB그리드는 막 움직여서 혼란 스럽게 합니다...

====> 질문은?????????????????/

-이 DB그리드를 어떻게 가만히움직이지 않고 막고.....

-프로그래스 바가 있는 폼에 버튼 좀 먹게 해주세요.....

-서비스로... 퍼센트도 나오게하는걸 가르쳐주면 좋고요.......



for i :=1 to DM.Table1.Recordcount do begin
   for j :=0 to 3 do begin
     sheet.cells[i+1,j+1] :=  DM.Table1.fields[j].asstring;
     z := z+1;
     F_thread.ProgressBar1.position := z;
     F_thread.Refresh;       ==>> 폼 이름.....
  
   end;
  
   dm.table1.Next;
end;
F_thread.Close;