delphi - 如何下载 Unicode 文件并将其加载到 TTreeView 中？

Question

我需要使用 idHTTP (String := idHTTP.Get) 下载 Unicode 格式的 TreeView 文件。下载后，我需要对字符串进行一些操作，然后将其放入 TTreeView 中。我使用的是 Delphi 2010。

s:=form2.idhttp1.Get(Adres+'list.ttt');
....
StrStream:=TStringStream.Create(s,t encoding.Unicode);
form2.TreeView1.LoadFromStream(strstream);
StrStream.Free;

我在 S 或 TreeView1 中看不到 Unicode。如果我尝试下载的不是 list.ttt 而是 list.html，我只会在 S 中看到 Unicode。我需要在 idHTTP 或其他内容中设置什么才能正常工作？

Answer 1

如何使其与 TIdHttp 一起使用

不要使用TStringStream，而使用TMemoryStream，这样您就不会得到任何内容的重新编码。示例:

var ResponseStream: TMemoryStream;
begin
  ResponseStream := TMemoryStream.Create;
  try
    H.Get(URL, ResponseStream);
    ResponseStream.Position := 0;
    Tree.LoadFromStream(ResponseStream);
  finally ResponseStream.Free;
  end;
end;