数组如何删除为0的数据? 本帖最后由 xwl777 于 2011-01-02 20:41:33 编辑 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 如果数组是从大到小排的,0在最后面,就用 SetLength 将数组缩小。如果是从小到大排的,0在最前面,如数组长度为 10 前两个为0,则利用CopyMemory(@Arr[0],@Arr[2],8)将数据都前移一下,然后在用 SetLength 将数组缩小 定义一个临时数组,先过滤0数据,存储到临时数组,再对临时数组进行排序,这样减少排序次数,效率会高一些完了再CopyMemory DELPHI数据类型的问题 Boolean字段ClientDataSet前台怎么用Filter属性实现过滤? 请问各位牛人:小弟做一个连SQL数据库时发出错误 關於nmsmtp1發郵件得問題,我現在可以發正文,但是我卻不知道怎麼發附件,可以用該控件發附件嗎? 还是TQuery问题 关于DBF数据库与Ado控件 winsock问题 请教下如何画圆啊?在线等!! 如何在fastscript中使用指针 跳出事件函数用什么? 急!两个第三方组件中的自定义数据类型名称重名,如何解决? delphi怎么调用createfile函数打开硬盘?
将数据都前移一下,然后在用 SetLength 将数组缩小
完了再CopyMemory