procedure TForm1.Timer1Timer(Sender: TObject); begin ProgressBar1.Position:= (ProgressBar1.Position+10) mod 100 ; end;
5,402
社区成员
262,733
社区内容
加载中
试试用AI创作助手写篇文章吧