在执行存储过程时我想在界面上显示时间进度

在执行存储过程时我想在界面上显示时间进度 Delphi / Windows SDK/API
http://www.delphi2007.net/DelphiMultimedia/html/delphi_20061103143720181.html
在执行存储过程时我想在界面上显示时间进度  
  怎么做到？？  
 

进度具体是啥意思,还有这个问题看起来好象是数据库方面的,怎么在"GAME，图形处理/多媒体   "中啊

随便做一个动画