在delphi中Char,PChar,PByte,Byte,String的相互转换示例

var    s:string;    pc:pchar;    pb:pbyte;    ac:array[1..100] of char;    ab:array[1..100] of byte;    i:integer;begin    s:='this is a test';    pc:=pchar(s);//string->pchar    pb:=pbyte(pc);//pchar->pbyte          for i:=1 to length(s) do            begin               ac[i]:=s[i];//string->arrary of char               ab[i]:=byte(s[i]);//string->arrary of byte            end;    s:=pc;//pchar->string    s:=string(pb);//pbyte->string    s:=c;//arrary of char->string;end;

DELPHI里把STRING转来BYTE再转回STRING的方法或代码Byte是8位的，只能代表一个字符。所以应该只有在String只有一位时才能转。String只有一位那就是个Char所以用Ord()和Chr()两个函数就可以互相转。