Форум: "Основная";
Текущий архив: 2002.03.11;
Скачать: [xml.tar.bz2];
ВнизTreeview Найти похожие ветки
← →
Igor Nikolaev (2002-02-24 09:40) [0]Здраствуите
У меня проблема, создается Item и в дальнеишем нужно добавлять в него child. Делаю так, но при каждом сообщений создается вновь Item "Open Ports", а мне нужно чтобы все добавлялось в один Item(без содания в дальнеишим итемов c именем "Open Ports").
Как осуществить?
procedure TMainForm.WMFoundPort(var Msg: TMessage);
var
Info: TFoundPortInfo;
TI,K: TElTreeItem;
begin
Info := Pointer(Msg.WParam);
TI := Info2.Items.add(TI, "Open Ports"); //Add Items in Treeview
TI.ImageIndex := 35;
TI := Info2.items.AddChild(TI, Inttostr(Info.Port)+" [" + Info.Description + "]"); //Add Child
TI.ImageIndex := 0;
Info.Free;
← →
Song (2002-02-24 10:11) [1]Сделай TI глобальной переменной. Сначала создай "Open Ports", а потом при каждом обращении в эту процедуру делай добавление ветвей в TI
TI2:=TI.AddChild(...)
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2002.03.11;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.004 c