DELPHI动态创建数据库时，怎么显示进度条

DELPHI动态创建数据库时，如何显示进度条？
DELPHI动态创建数据库时，也不知道是否创建成功，所以想加个进度条，哪位高手知道怎么作吗？

[解决办法]
执行完一个步骤以后，让progress.postion + 1就行了呗
[解决办法]
一两秒的事, 没事找事做... BTW, 进度条这不够谱的东西, 没啥用