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

Вниз

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

 
FaceToFace   (2005-02-15 13:09) [0]

Возможно ли элементу TTreeNode добавить что-то вроде свойства Tag?


 
Digitman ©   (2005-02-15 13:18) [1]

а зачем ? ведь есть же св-во TTreeNode.Data ?


 
stakan ©   (2005-02-15 13:23) [2]

Обычно создают запись со всеми необх. полями вроде свойства Tag,
создают указатель на эту запись и этот указатель присваивают св-ву Data TTreeNode


 
MetalFan ©   (2005-02-15 13:33) [3]

А еще удобнее (хотя кому как) создавать объект...


 
FaceToFace   (2005-02-15 13:33) [4]

не совсем понял, как это реализовывается.
Пример кода можно?


 
stakan ©   (2005-02-15 13:43) [5]


type
 PTreeRecord = ^TTreeRecord;
 TTreeRecord = record
   Tag: Integer;
   // другие поля
 end;
var
 TreeRecord: PTreeRecord;
begin
 ...
 New(TreeRecord);
 TreeRecord^.Tag := 1;
 TreeNode.Data := TreeRecord;
 ...
end;


 
Юрий Зотов ©   (2005-02-15 13:43) [6]

> FaceToFace   (15.02.05 13:33) [4]

var
 I: integer; // Любой целый тип длиной не более 4-х байт.
begin
 TreeNode.Data := Pointer(I);
 ...
 I := Integer(TreeNode.Data);
 ...


 
FaceToFace   (2005-02-15 14:06) [7]

to stakan, Юрий Зотов
Спасибо большое. Оба примера кстати :)


 
panov ©   (2005-02-15 14:08) [8]

Поле "Тема вопроса" не оформлено.



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

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

Наверх




Память: 0.48 MB
Время: 0.05 c
1-1108047557
ali_tash
2005-02-10 17:59
2005.02.27
ещё раз про SWAP


3-1106911040
DSKalugin
2005-01-28 14:17
2005.02.27
Использование доменов FireBird 1.5.1


1-1108037715
VladRaven
2005-02-10 15:15
2005.02.27
Perform(WM_NEXTDLGCTL, 0, 0) = следующий а как = предыдущий.?


4-1105721474
Scained
2005-01-14 19:51
2005.02.27
КАК МНЕ ОПРЕДЕЛИТЬ ЧТО ДИСКАВОД РАБОТАЕТ!


4-1105956362
lutik_
2005-01-17 13:06
2005.02.27
Опять DLL