例如:
canvas.moveto(50,50);
canvas.lineto(75,75);
canvas.lineto(100,50);
在这里做个延时
canvas.moveto(75,75);
...
谢谢!!!!
canvas.moveto(50,50);
canvas.lineto(75,75);
canvas.lineto(100,50);
在这里做个延时
canvas.moveto(75,75);
...
谢谢!!!!
解决方案 »
- delphi(OP)和C++哪个更适合我?
- Delphi开发嵌入式IE浏览器监控程序
- VC调用Delphi编写的DLL的问题(很急很急,在线等待)
- 如何获取自增型字段的值?
- 怎样使图片自动放大或是缩小到和Image组件的高宽一样???
- idhttp post 符号?
- DBgrid的问题!
- 请问我的Delphi6。0的帮助是不是不全?为什么我查不到MessageDlg().IntToStr().Format()等常用函数?
- VCL剖析,谁能大概说一下WM_COMMAND ->Sendor:TObject的变迁?
- 如何一次性修改某一字段的所有记录值?
- 怎样查找大于某个字段,但小于另一个字段的值??如:
- 请问:如何实现类似Delphi的代码编辑器界面
procedure Delay(MiniSec: Integer);
var
i, j : LongInt;
begin
i := GetTickCount;
repeat
j := GetTickCount;
until (j-i>= MiniSec);
end;