您现在的位置:首页 >> 基础算法 >> window基础 >> 内容

Delphi如何将byte型的数组转换为字符串

时间:2011/9/3 15:36:41 点击:

  核心提示:1、var buf:array[1..100] of byte; S1:string; s2: string; begin s1 := '12345'; Move(s1[1],buf[1],5); S...

1、

var
buf:array[1..100] of byte;
S1:string;
s2: string;
begin
s1 := '12345';
Move(s1[1],buf[1],5);
SetLength(s2,5);
Move(buf[1],s2[1],5);
ShowMessage(s2);  
2、

var
buf:array[1..100] of byte;
S1:string;
s2:string;
begin
s1 := '12345';
Move(s1[1],buf[1],5);
s2 := StrPas(pchar(@buf[1]));
ShowMessage(s2);  

3、

for i:=1 to 100 do
begin
s:=s+chr(buf[i]);
end;

作者:网络 来源:转载
共有评论 0相关评论
发表我的评论
  • 大名:
  • 内容:
  • 盒子文章(www.2ccc.com) © 2020 版权所有 All Rights Reserved.
  • 沪ICP备05001939号