Delphi有两个进度条为什么同时只能有一个运行


两个进度条，一个增加，一个减小，但程序提示错误，只能运行一个，如何同时执行两个进度条。
ProgressBar1.Position :=ProgressBar1.Position+10
ProgressBar2.Position :=ProgressBar2.Position-10



[解决办法]
没道理错误的，看一下两个进度条的max和min还有Position的值

另外加减前加个Position判断，要做意外处理的，比如〉max，<min
还有你的代码少了分号
ProgressBar1.Position :=ProgressBar1.Position+10;
ProgressBar2.Position :=ProgressBar2.Position-10;