张志峰的博客

水滴石川,积少成多。

导航

随笔分类 -  Delphi 数组的用法

摘要:FillChar(aryTest[Low(aryTest)], Length(aryTest) * SizeOf(aryTest[Low(aryTest)]), 0); 阅读全文

posted @ 2016-05-17 17:39 ╰★张志峰★╮ 阅读(1026) 评论(0) 推荐(0)

摘要:Const ArrayPeriod: array[0..8] of string = ('[QJ]', '[QJ.ND]', '[QJ.BND]', '[QJ.JD]', '[QJ.YD]', '[QJ.BYD]', '[QJ.X]', '[QJ.Z]', '[QJ.R]');当作常量用。var //存储单位的固定字段 ArrayDWFixFLD: array[0..4] of string =('P_CODE', 'DW_CO 阅读全文

posted @ 2012-07-06 15:49 ╰★张志峰★╮ 阅读(676) 评论(0) 推荐(0)