Скачать: CL | DM;

Как сохранить дерево в поле типа OLE Object базы Access?   Найти похожие ветки 

← →
GreySerg   (2003-09-17 18:11) [0]

Мастера, подскажите пожалуйста , как сохранить дерево,представленное TreeView, в поле типа OLE Object базы Access ?
А ещё лучше, как сохранить дерево в данном поле, представленное списком элементов даного типа:
TExpDecisionNode = class
private
FDocuments: TStrings;
FIsQuestion: boolean;
FText: string;
FPK: string;
FParentPK: string;
public
constructor Create;
destructor Destroy; reintroduce;
property PK: string read FPK write FPK;
property ParentPK: string read FParentPK write FParentPK;
property IsQuestion: boolean read FIsQuestion write FIsQuestion;
property Text: string read FText write FText;
property Documents: TStrings read FDocuments write FDocuments;
end;

Этот элемент представляет собой узел (вершину) дерева.
Если можно, пример пожалуйста.

---

← →
Reindeer Moss Eater ©   (2003-09-17 18:24) [1]

как сохранить дерево,представленное TreeView, в поле типа OLE Object базы Access ?

Сохранить данные в поле можно путем присвоения полю значения. Делается это методом Assign либо оператором :=
Есть еще методы LoadFrom....
Это если ты спрашивал как сохранить.

---

← →
GreySerg   (2003-09-17 18:32) [2]

есть у TreeView метод SaveToStream , но он не может хранить Data , ассоциированное с вершиной , а это как раз и надо

---

← →
Reindeer Moss Eater ©   (2003-09-17 18:37) [3]

А кто мешает сохранять данные, лежащие по указателю Data?

---

← →
GreySerg   (2003-09-17 18:42) [4]

как? в OleObject можно сохранить через Stream только

---

← →
GreySerg   (2003-09-17 18:43) [5]

да и TreeView не совсем подойдёт , потому что по этому дереву ещё потом надо ходить

---

← →
Sandman25 ©   (2003-09-17 18:46) [6]

Напишите своего потомка и перекройте SaveTo/LoadFrom Stream.

---

← →
Reindeer Moss Eater ©   (2003-09-17 18:52) [7]

как? в OleObject можно сохранить через Stream только

TStream.Write конечно

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.019 c