2014年12月28日
[转]Delphi中进行延时的4种方法
摘要： 1、挂起，不占CPUsleep2、不挂起,占cpuprocedure Delay(msecs:integer);varFirstTickCount:longint;beginFirstTickCount:=GetTickCount;repeatApplication.ProcessMessages;... 阅读全文
posted @ 2014-12-28 23:39 绣春刀 阅读(288) 评论(0) 推荐(0) 编辑
[转]delphi 删除动态数组的指定元素
摘要： typeTArr = array of TPoint; {把数组先定义成一个类型会方便许多, 这里仅用 TPoint 测试}{删除动态数组指定元素的过程: 参数 arr 是数组名, 参数 Index 是要删除的索引}procedure DeleteArrItem(var arr: TArr; Ind... 阅读全文
posted @ 2014-12-28 23:00 绣春刀 阅读(1320) 评论(0) 推荐(0) 编辑