摘要: //延迟函数:方法一procedure delay(msecs:integer);var Tick:DWord; Event:THandle;begin Event:=CreateEvent(nil,False,False,nil); try Tick:=GetTickCount... 阅读全文
posted @ 2014-05-30 22:34 Wishmeluck 阅读(521) 评论(0) 推荐(0) 编辑