资源占用率太高了，有什么办法解决？

Question

一个SERVER端程序，用BDE联ODBC联SQL SERVER，用TIMER来控制存储过程的提交，
以便每隔一段时间提交一次存储过程，但运行时资源占用率是100%，
天啊，有什么办法解决？谢谢高手指点！

Answer 1

我开发的一个系统和你的一样，cpu占20--30%,处理数据是400条/分钟，上面给我的要求是1000条/分钟。我是用的ADO，我想BDE没有你说的100%那么多，可以把你的Timer里的代码贴上来
procedure TForm1.YourTimerTimer(Sender: TObject);
begin
   //建议的做法
   YourTimer.Enabled :=false   
   ////代码
  
   YourTimer.Enabled :=false
end;

Answer 2

不好意思，写错了procedure TForm1.YourTimerTimer(Sender: TObject);
begin
   //建议的做法
   YourTimer.Enabled :=false   
   ////代码
  
   YourTimer.Enabled :=true
end;

Answer 3

不好意思，我的代码不能公布(不是我一个人写的）。不过我跟踪了一下代码，觉得好像是BDE的问题。

Answer 4

不好意思，问题解决了，少了一个Storeproc.Prepare;