delphi中String，PChar，PByte，Array of Char，Array...

delphi中String，PChar，PByte，Array of Char，Array of Byte 转换

vars: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;