- 博客(1)
- 收藏
- 关注
RSS订阅转载 多线程操作ui
{自定义方法: 在窗体上绘制...} procedure MyMethod; var i: Integer; begin for i := 0 to 500000 do begin Form1.Canvas.Lock; Form1.Canvas.TextOut(10, 10, IntToStr(i)); Form1.Canvas.Unlock; end; e...
2018-07-13 16:37:51
458
空空如也
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人