请教：查询数据库时，怎样把查询数据库的进度与progressbar联系起来？谢谢大家！

Question

请教：查询数据库时，怎样把查询数据库的进度与progressbar联系起来？谢谢大家！我的查询Button是这样的：procedure TThreeFactoryForm.Button1Click(Sender: TObject);
begin
  ADOStoredProc1.Close;
  ADOStoredProc1.Parameters.ParamByName('@sta').Value:=copy(combobox1.Text,1,1);
  ADOStoredProc1.Parameters.ParamByName('@d1').Value:=DateTimePicker1.Date;
  ADOStoredProc1.Parameters.ParamByName('@d2').Value:=DateTimePicker2.Date;
  ADOStoredProc1.Open;
end;

Answer 1

不好弄，我看大家都是用Animate 动画。

Answer 2

李维的也只有在数据取完放在DBGrid后才出现在Progressbar上

Answer 3

to Changefish(问题总会解决的):你的是怎么弄的？谢谢！

Answer 4

这个确实不好做，你还是用一个Timer作个假相算哒，别占到牛角尖里去了，
只是一个视觉效果而已，随便怎么做。不一定要精确。