delphi byte数组怎么转换成String

答案：// byte数组转换成String
function TFrmStringToByte.ByteToString(const Value: TByteArr): String;
var
    I: integer;
    S : String;
    Letra: char;
begin
    S := '';
    for I := Length(Value)-1 Downto 0 do
    begin
        letra := Chr(Value[I] + 48);
        S := letra + S;
    end;
    Result := S;
end;

>>  运用EG:
ShowMessage(ByteToString(byteArray));

其他：逐个提取，转换 长度多加一个，最后一个＝0，作为结束
arr:array [0..6] of byte
arr[6]:=0

上一个：Delphi中如何对ComboBox下拉选项进行备注？
下一个：delphi 表格添加数据