VPF::Virtual Treeview - в дереве объекты разных типов

Herzchen

Дата 24.5.2009, 16:31 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 3
Регистрация: 17.5.2009

Репутация: нет
Всего: нет

Добрый день!

Вопрос такой: Возможна ли реализация дерева на Virtual Treeview у которого каждый родитель содержит один тип объекта, а каждый потомок другой?

Например:
Любой родитель содержит запись из 3 строк,
а любой потомок содержит запись из строки и 2-х integer-ов.

И как потом можно такое дерево считать или записать в файл?

Помогите пожалуйста! Заранее спасибо.

Caduser

Дата 25.5.2009, 22:03 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 71
Регистрация: 2.10.2006
Где: г. Хабаровск

Репутация: 1
Всего: 1

Я использовал обходной путь, создал record содержащий поле типа TObject, а затем в этот TObject создавал разные классы.

Код


  TMyNode = record
    OtherData: TObject;   
  end;
  PMyNode  = ^ TMyNode ;

//...

  NodeData.OtherData := TMyClass1.Create;

//...

  NodeData.OtherData := TMyClass2.Create;

память очищаю так:

Код


procedure TfrmForm1.VT1FreeNode(Sender: TBaseVirtualTree;
  Node: PVirtualNode);
var
  NodeData: PMyNode;
begin
  NodeData := Sender.GetNodeData(Node);

  if Assigned(NodeData.OtherData) then
    FreeAndNil(NodeData.OtherData);

  //Finalize(NodeData^); // Clear string data.
end;

Это сообщение отредактировал(а) Caduser - 25.5.2009, 22:09

Herzchen

Дата 30.5.2009, 12:20 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 3
Регистрация: 17.5.2009

Репутация: нет
Всего: нет

хорошая идея спасибо

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Общие вопросы \| Следующая тема »