摘要: type TArr = array of TPoint;{把数组先定义成一个类型会方便许多, 这里仅用 TPoint 测试}{删除动态数组指定元素的过程: 参数 arr 是数组名, 参数 Index 是要删除的索引}procedure DeleteArrItem(var... 阅读全文
posted @ 2016-08-03 09:26 Wishmeluck 阅读(377) 评论(0) 推荐(0) 编辑