create table show_sql
(str_sql  varchar2(250));存储过程部分
BEGIN
   delete from show_sql;
   insert into show_sql
   values( '正在执行A操作---');
   commit;
   .....   delete from show_sql;
   insert into show_sql
   values( '正在执行B操作---');
   commit;
   .....   delete from show_sql;
   insert into show_sql
   values( '正在执行C操作---');
   commit;
   .....
END;
/
在DELPHI前端包表show_sql中的結果顯示出來就可以了

解决方案 »

  1.   

    up and wait and study
      

  2.   

    新建一个记录进度的表Progress
    字段为proc
       Insert into Progress values('0');
    BEGIN   '正在执行A操作---'
       .....
       UPDATE Progress set proc='A'
       '正在执行B操作---'
       .....
       UPDATE Progress set proc='B'
       '正在执行C操作---'
       .....
       UPDATE Progress set proc='C'
    END;
    UPDATE Progress set proc='0'程序中新建一个线程,读取Progress的值获取进度,并显示'A','B'代表不同的进度?