[AlexSku]

Сообщение от Vhm

Значит проблема такая:
Делаем раз
TreeView1.SaveToFile('tree.dat'); полученный файлик открывается и все там нормально... А при выполнении TreeView.LoadFromFile('tree.dat') дерево отаброжется в виде иероглифов...
Также было замечено вот что... Если после создании файла tree.dat открыть его через блокнок и просто нажать сохранить... То после закрытия и выполнения TreeView.LoadFromFile('tree.dat'); все норм...
Может кто поможет мне с этой бедой!

У меня всё вводится нормально (TreeView1 - исходное дерево, TreeView2 изначально пустое):

Код:

procedure TForm1.btnSaveClick(Sender: TObject);
begin
  TreeView1.SaveToFile('tree.dat');
end;

procedure TForm1.btnLoadClick(Sender: TObject);
begin
  TreeView2.LoadFromFile('tree.dat');
end;

Как-то вы странно описываете ситуацию: "файлик открывается" - где? "Также было замечено... если открыть через блокнот", а первый раз через какую программу смотрели? Возможно, первый просмотрщик меняет кодировку ANSI на Unicode.