안녕하세요?

제가 사용하는 환경은 delphi3.0에 oracle을 사용하고 있습니다.



oracle의 long raw type에 파일을 등록(5M이상)한뒤 down load하여 사용하고 있습니다.

그런데 파일size가 크다보니 down load 진행상태를 TGauge로 보여주고 싶은데

어떻게 해야되나요?

BlobField의 onChange Event를 발생시켜보왔는데도 Event가 전혀 동작하지 않네요..

아래는 down load 프로그램 소스입니다.

고수님들의 고견을 부탁드립니다.



<<<<<<<<<<<<<<<<<<<<<<<<

tblVersion.Open;



for i := 1 to grdBox.RowCount - 1 do begin

lblMessage.Caption := grdBox.Cells[0,i] + ' 파일을 DOWNLOAD중입니다...';

Application.ProcessMessages;



tblVersion.FindKey([grdBox.Cells[0,i]]);

tblVersionPROGRAM_FILE.SaveToFile(grdBox.Cells[1,i]+grdBox.Cells[0,i]);



end;

tblVersion.Close;

<<<<<<<<<<<<<<<<<<<<<<<<