实现TrackBar的自动滚动

本实验用到的控件是CheckBox，Timer和TrackBar。目标是实现Trackbar自动循环滚动。 当Timer控件用来监控CheckBox->Checked属性，每间隔50毫秒检测一次。当CheckBox->Checked=true时TrackBar->Position++直至TrackBar5->Position=TrackBar5->Max开始TrackBar5->Position--，到0时再TrackBar5->Position++如此反复。 代码如下： BOOL flag=true; void __fastcall TForm1::Timer1Timer(TObject *Sender) { if(CheckBox1->Checked) { if (TrackBar1->Position +1&&flag) { TrackBar1->Position++; if (TrackBar1->Position==255) flag =false; } if(!flag) { TrackBar1->Position--; if (TrackBar1->Position==0) flag=true;} } } } 其中flag为一全局变量，用来判断TrackBar1->Position是否到达最小或者最大位置。这是我实现的方法，不知道还有没有更好的，欢迎指导。