Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.03.20;
Скачать: CL | DM;

Вниз

TreeNode   Найти похожие ветки 

 
Checist [root]   (2005-03-06 10:44) [0]

Я пытаюсь всунуть node в выделенныю ветвь, но лезет ошибка, как это правильно сделать?

var
 Node: TTreeNode;
 Mode: TNodeAttachMode;
 NText: string;
begin
if Url.Text = "" then Exit;
Node.ImageIndex := 1;
Node.SelectedIndex := 3;
NText := Url.Text;
if (Favor.Selected.ImageIndex = 0) or (Favor.Selected.Index = 0) then Mode := naAddChild
else Mode := naAdd;
Favor.Items.AddNode(Node, Favor.Selected, NText, nil, Mode);
Url.Clear;
end;


 
MU   (2005-03-06 11:03) [1]

Node.ImageIndex := 1;
Здесь ошибка?
а Node := TTreeNode.create(...) не надо делать


 
Checist [root]   (2005-03-06 11:13) [2]

Благодарю... Совсем забыл!



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

Текущий архив: 2005.03.20;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.032 c
1-1109259183
George
2005-02-24 18:33
2005.03.20
Помогите с графикой Gerber файла.


1-1110198971
MU
2005-03-07 15:36
2005.03.20
FreeVCS ->JediVCS


6-1105999407
Новичек
2005-01-18 01:03
2005.03.20
Информация от сервера.


8-1101799315
vlad_ri
2004-11-30 10:21
2005.03.20
Линия типа "бегущии муравьи"


3-1109040283
Киря
2005-02-22 05:44
2005.03.20
Как перегнать базу данных из PARADOX в ACCESS?