Как сохранить структуру в файл

← →
01 (2005-06-13 03:18) [0]

Структура создается для каждой ветви TTreeView и вяжется к Data.
Соответственно, есть желание сохранять и загружать структуру дерева, а не перестраивать..

← →
Defunct © (2005-06-13 03:31) [1]

Ну так вперед. Сохраняйте и загружайте структуру дерева. Кто не дает?

← →
01 (2005-06-13 04:13) [2]

Я спрашиваю, как структуру сохранить в файл и потом загрузить из него.

← →
Просто Джо © (2005-06-13 04:48) [3]

Что есть "структура"? От этого зависит - как сохранять и читать.

← →
Defunct © (2005-06-13 05:22) [4]

> 01

BlockWrite/BlockRead
Write/Read

← →
01 (2005-06-13 13:58) [5]

> Что есть "структура"?

type
Tnode = record
id:integer;
db_name:string;
flag:integer;
end;

procedure Save_struct(var _t:Tnode);
var _M: TMemoryStream;
begin
_M := TMemoryStream.Create;
Try
_M.WriteBuffer( _t, sizeof(_t) );
_M.SaveToFile(куда);
finally
_M.Free;
end;
end;

Как сохранить структуру в файл Найти похожие ветки