DELPHI字符串间的转化问题

Question

1.
  type
    THanzi : array [0..1] of byte;
  var
    AHanzi:THanzi;
  begin
    AHanzi[0] := 0xC5;
    AHanzi[1] := 0xC0;
  end;
2.
  同理

Answer 1

现在的问题是那个汉字是一个String变量呀
谢谢

Answer 2

用TNMURL试一试
NMURL1.InputString:=Edit1.Text;
Edit2.Text:=NMURL1.Encode;
Edit3.Text:=NMURL1.Decode
不过这样的出来的格式是%C5%C0

Answer 3

var
  b1,b2: Byte;procedure TForm1.Button1Click(Sender: TObject);
var
  s: string;
begin
  s := '爬';
  b1 := Ord(s[1]);
  b2 := Ord(s[2]);
  Edit1.Text := IntToStr(b1);
  Edit2.Text := IntToStr(b2);
end;procedure TForm1.Button2Click(Sender: TObject);
var
  s: string;
begin
  setLength(s,2);
  s[1] := Char(b1);
  s[2] := char(b2);
  Edit3.Text := s;
end;