正常timer做动画效果会出现闪烁问题 以下代码可以解决此问题 procedure TForm1.FormCreate(Sender: TObject);begin form1.DoubleBuffered := True; //开启双缓冲,使得lbl_ShowWorking描述不闪烁begin end;