如何实现在ADO连接数据库或者查询的时候做点别的事情

比如
ADOCon.Connected := True;的时候可希望画面出现进度条但如果直接写代码 ,当服务器连接不上的时候画面实际上没刷新 如果能让画面也自动的刷新?其实这个问题在使用查询的时候也有 比如用TADOQUERY查询一个和大的表 这个时候记录数如果一多 画面可能就如同死了一般
补充一下:Application.ProcessMessages;似乎不管用