Текущий архив: 2003.03.03;
Скачать: CL | DM;
ВнизИспользование TTreeView в run-time Найти похожие ветки
← →
prorok2 (2003-02-20 22:14) [0]Доброго времени суток, мастера!
Подскажите, как использовать компонент TTreeView в run-time. То есть как добавить узел, как добавить подузел этого узла, удалить их, как пройтись по всему дереву в поисках нужной ветки. И еще. Как можно было бы привязать узел к уникальному номеру записи в таблице базе данных. Буду очень благодарен за пример или хотя за намек на него.Спасибо.
← →
mrcat (2003-02-20 22:19) [1]>>как добавить узел, как добавить подузел этого узла,
AddChild
>>удалить их
ThreeView.Items[MyIndex].Delete
>>Как можно было бы привязать узел к уникальному номеру записи в таблице базе данных.
ThreeView.Items[MyIndex]. Data
← →
prorok2 (2003-02-20 22:22) [2]Так у свойства AddChild есть параметр TTreeNode. Что это такое и с чем его едят?
← →
mrcat (2003-02-20 22:27) [3]>>Так у свойства AddChild есть параметр TTreeNode.
это дочерняя ветка для твоего TTreeNode, например:
var
fChild: TTreeNode;
...
fChild := AddChild("", "prorok2");
fChild.ImageIndex := 2;
fChild.SelectedIndex := 2;
...
TreeView.Items.AddChild(fChild);
← →
mrcat (2003-02-20 22:30) [4]поправка:
var
fChild: TTreeNode;
...
fChild := AddChild( nil, "prorok2");
fChild.ImageIndex := 2;
fChild.SelectedIndex := 2;
...
TreeView.Items.AddChild(fChild, "");
← →
prorok2 (2003-02-20 22:35) [5]Пишу так:
var fChild: TTreeNode;
begin
fChild.Create( nil);
fChild.Item[0].Text := "prorok2";
fChild.ImageIndex := 2;
fChild.SelectedIndex := 2;
TreeView1.Items.AddChild(fChild, "Text");
end;
Что должно быть вместо nil?
Эта конструкция компилится, но не выполняется из-за того, как я понимаю, что объект не создан.Правильно?
← →
Song (2003-02-20 22:37) [6]>>это дочерняя ветка для твоего TTreeNode,
Если быть точнее, TTreeNode - это класс любой ветки.
← →
Song (2003-02-20 22:39) [7]2prorok2 (20.02.03 22:35)
А чего ты создаёшь экземпляр своей переменной? Надо создавать экземпляр класса!
← →
prorok2 (2003-02-20 22:42) [8]2Song
так?
fChild := TTreeNode.Create(<а что здесь?>);
← →
prorok2 (2003-02-20 22:42) [9]Что-то я ляпнул :(
← →
mrcat (2003-02-20 22:43) [10]Song © (20.02.03 22:37)
ветка в контексте AddChild. так сойдет? =)
← →
prorok2 (2003-02-20 22:56) [11]var fChild: TTreeNode;
a: TTreeNodes;
fChild.Create(a);
fChild.Text := "prorok2";
fChild.ImageIndex := 2;
fChild.SelectedIndex := 2;
TreeView1.Items.AddChild(fChild, "Text");
и падает на последней строке
← →
prorok2 (2003-02-20 22:57) [12]Что я не так делаю или не делаю?
← →
mrcat (2003-02-20 23:03) [13]
fChild.Create(a);
fChild.Text := "prorok2";
fChild.ImageIndex := 2;
fChild.SelectedIndex := 2;
TreeView1.Items.AddChild(fChild, "Text");
нафига Create? Привел же работающий код.
← →
ION T (2003-02-20 23:05) [14]можно так:
fChild := TreeView1.Items.AddChild(TreeView1.Selected, "Text");
← →
prorok2 (2003-02-20 23:11) [15]2mrcat >Привел же работающий код.
fChild := AddChild(nil, "prorok2"); // не работающий код
← →
mrcat (2003-02-20 23:14) [16]fChild := TreeView1.Items.AddChild("", "prorok2");
← →
prorok2 (2003-02-20 23:15) [17]2 ION T
А как добавить подузел добавленного узла?
← →
prorok2 (2003-02-20 23:19) [18]fChild := TreeView1.Items.AddChild(nil, "prorok2");
fChild := TreeView1.Items.AddChild(fChild, "prorok3");
работает.....второе добавляет подузел!!!!!
Всем спасибо...суть я уловил
Страницы: 1 вся ветка
Текущий архив: 2003.03.03;
Скачать: CL | DM;
Память: 0.48 MB
Время: 0.009 c