J jackl Unregistered / Unconfirmed GUEST, unregistred user! 2001-11-12 #4 我指的不是这个.. 例如 ： Var i:integer; Astr : array[0..3] of string; begin for i := 0 to 3 do Astr := 'abc' /////////// 现在怎样得到他的长度，有函数吗？ end;
我指的不是这个.. 例如 ： Var i:integer; Astr : array[0..3] of string; begin for i := 0 to 3 do Astr := 'abc' /////////// 现在怎样得到他的长度，有函数吗？ end;
悲 悲酥清风 Unregistered / Unconfirmed GUEST, unregistred user! 2001-11-12 #6 High(StringArray)-Low(StringArray)
J jackl Unregistered / Unconfirmed GUEST, unregistred user! 2001-11-12 #7 to kaideng: 我要的是整个数组的字符长度 也就是： 'abd','abc','abc','abc'的长度，不知道我说明白了吗？
B bluerain Unregistered / Unconfirmed GUEST, unregistred user! 2001-11-12 #9 循环加一下不就可以了 len := 0; for i := low(astr) to high(astr) do begin inc(len,length(astr); end;
