S ss_328 Unregistered / Unconfirmed GUEST, unregistred user! 2002-03-27 #1 定义了一个数组a:array [0..100] of char 一个字符串b:string 如何将a数组中的所有值载入b中形成一字符串
C creation-zy Unregistered / Unconfirmed GUEST, unregistred user! 2002-03-27 #4 SetLength(B,101); Move(A[0],B[1],101);
P photodelphi Unregistered / Unconfirmed GUEST, unregistred user! 2002-03-27 #5 for i := 0 to 100 b := b + a
D danliyou Unregistered / Unconfirmed GUEST, unregistred user! 2002-03-28 #6 SetLength(B,101); for i:=0 to 100 b:=b+a
菜 菜中菜 Unregistered / Unconfirmed GUEST, unregistred user! 2002-05-22 #8 定义了一个数组a:array [0..100] of char 一个字符串b:string 如何将a数组中的所有值载入b中形成一字符串 setlegnth(b,101); for i:=0 to 100 do s[i+1]:=a;
定义了一个数组a:array [0..100] of char 一个字符串b:string 如何将a数组中的所有值载入b中形成一字符串 setlegnth(b,101); for i:=0 to 100 do s[i+1]:=a;
X xw1980 Unregistered / Unconfirmed GUEST, unregistred user! 2002-05-23 #10 大家快来看,这个肯定是最简单的, a:array[1..200] of char; Mystr:string; begin ... MyStr:=String(a); ... 我已经试过肯定可以[]