第一个问题 mastersky(浪) 说的很透彻 我来说第二个问题,字节数组转化到string for exampleprocedure TForm1.Button1Click(Sender: TObject); var buff:string; I:integer; C:array[1..10] of byte; begin for I := 1 to 10 do C[I] := 64 + I; setlength(buff,10); Move(C,buff[1],10); ShowMessage(buff); //显示 "ABCDEFGHIJ" end;
第一个问题 mastersky(浪) 说的很透彻
我来说第二个问题,字节数组转化到string
for exampleprocedure TForm1.Button1Click(Sender: TObject);
var
buff:string;
I:integer;
C:array[1..10] of byte;
begin
for I := 1 to 10 do C[I] := 64 + I;
setlength(buff,10);
Move(C,buff[1],10);
ShowMessage(buff);
//显示 "ABCDEFGHIJ"
end;