想做一個Delphi源碼編輯器，Delphi DFM文件文字保存的格式是#2464#2646，問自己設計程序該如何將#2464#2646讀出成漢字，保存又按#2464#26

Question

想做一個Delphi源碼編輯器，Delphi DFM文件文字保存的格式是#2464#2646，問自己設計程序該如何將#2464#2646讀出成漢字，保存又按#2464#2646這樣保存？

Answer 1

var
  q:WideString;
  i:Integer;
begin
  q:=#20013;
  q:=q+#21326;
  q:=q+#20154;
  q:=q+#27665;
  q:=q+#20849;
  q:=q+#21644;
  q:=q+#22269;
  edit1.text:=q;
  edit2.text:='';
  for i:=1 to Length(q) do
  begin
    edit2.Text:=Edit2.Text+'#'+IntToStr(Ord(q[i]));
  end;
end;

Answer 2

就是想做成和Delphi打開DFM文件操作時一樣！各位大俠幫幫忙！