Нужна рекомендация по организации программы

[Arkuz]

Здравствуйте.
Нужно сделать программу по типу DelphiWorld. Слева в окошке дерево объектов, справа RichEdit. При выборе элемента в дереве Какой-то определённый текст отображается в RichEdit'е.
Подскажите идеи по организации. Можно ли хранить большой текст в полях таблицы Access'а? Или лучше сделать хранение в файле. Просто нужны рекомендации...

[Манжосов Денис :)]

Я делал похожую программу. Там данные хранил в текстовых файлах.

[mihali4]

Можно ли хранить большой текст в полях таблицы Access'а?

Конечно. Мемо - оно и в Африке мемо. Текстовые файлы? А при чем тут тогда ричэдит? Тогда - простой листбокс...

[Arkuz]

Спасибо за рекомендации...

А при чем тут тогда ричэдит?

Да эт я просто написал... Можно что угодно...

[Arkuz]

Подскажите а как реализовать сохранение в файл ветки дерева... А потом ещё и загрузка нужна при старте программы.
Нужно же соответсвие как-то сделать между веткой дерева и файлом. Ну в смысле из какого файла в какую ветку загружать. Это через ини файл сделать или как?
Принцип расскажите, пожалуйста...

[mihali4]

Загружается в ветку не файл, а название вашего раздела.
Вот упрощенно.
Структура таблицы для самого дерева:
ID - идентификатор итема
ID_PAR - идентификатор родительского итема (ноль для корневых)
I_NAME - название итема
S_FILE - ссылка на идентификатор записи в мемо-таблице с основной информацией.

[Arkuz]

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

Загружается в ветку не файл, а название вашего раздела.
Вот упрощенно.
Структура таблицы для самого дерева:
ID - идентификатор итема
ID_PAR - идентификатор родительского итема (ноль для корневых)
I_NAME - название итема
S_FILE - ссылка на идентификатор записи в мемо-таблице с основной информацией.

Я с файлами решил делать.... Получается, что я храню файл структуры дерева, а в этом файле уже все параметры ветки и ссылка на физический файл?

[Arkuz]

Вот нашёл 2 процедурки сохранения и загрузки дерева...

procedure TmainForm.SaveTreeView;
var
  F:TFileStream;
begin
  F:=TFileStream.Create('TreeView.conf', fmCreate or fmShareCompat);
  try
    F.WriteComponent(TreeView1);
  finally
    F.Free;
  end;
end;

procedure TMainForm.LoadTreeView;
var
  F:TFileStream;
begin
  F:=TFileStream.Create('TreeView.conf', fmOpenRead or fmShareDenyWrite);
  try
    F.ReadComponent(TreeView1);
  finally
    F.Free;
  end;
end;

я вот только не пойму они сохраняют только структуру дерева или и данные, приявязанные к ветке (NewNode.Data)? Если данные тоже хранят, тогда получается нужно всего лишь в поле данных вписывать имя файла и всё... Или я не прав?

[Arkuz]

Помогите кодом, пожалуйста....
Мне нужно посмотреть на реализацию механизма сохранения дерева с данными. Там же куча всего непонятного. У дерева указатель на данные... Эти данные нужно ввести и сохранить ветку вместе с данными... Через FileStream это можно реализовать?

Хотя, mihali4, мне понравилась ваша идея с таблицами... И мне она кажется проще. Но хотелось бы как-нибудь с файлами...

[Arkuz]

Сообщение от Манжосов Денис :)

Я делал похожую программу. Там данные хранил в текстовых файлах.

А не могли бы вы исходник дать посмотреть?

Так, началось...
Что, кнопка "Правка" пропала?

Прошу прощения... Забыл я что-то про неё