| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Помогите разобраться с деревом, PLZ! [D6, Win2k]
GobliNGuT © (2002-12-19 15:00:00)Пишу клиента для сервера новостей, и из полученных данных (группа новостей, а в ней заголовки) формирую дерево. Узлы первого уровня - Группы, второго - заголовки. Проблема заключается в следующем. Первый уровень формируется нормально, а вот со вторым ... где-то идет ошибка формирования данных узла.
Вот собственно код каким я формирую:
procedure TForm1.NNTPHeaderList(Sender: TObject);
Var
pHR:^TPostRecordType;
begin
New(pHR);
pHR^:=NNTP.HeaderRecord;
Tree.Items.AddChildObject(Tree.Selected,pHR^.PrSubject,pHR);
Tree.Update;
Tree.Selected.Expand(true);
end;
В дереве все отображается нормально. Но потом при попытке обратиться к Node.Data, я получаю данные последней новости.
GobliNGuT (2002-12-30 19:07:00) [1]Все, заработало. А глюк был почему-то из-за использования типа TPostRecordType. Сделал свой тип и все заработало ...
Cobalt (2002-12-22 14:38:00) [2]попробуй вместо New - Getmem, или вместо record использовать class. У меня была похожая трабла с записями. перешел на классы - все пучком, дерево заработало.
GobliNGuT (2002-12-22 09:44:00) [3]TPostRecordType - стандартный тип заголовка новости
NNTP.HeaderRecord собственно сам заголовок этого типа. я просто выделяю память под заголовок, дублирую его данные. Первый дубликат будет изменен при следующей новости, а продублированный заносится в дерево (а именно Node.Data)
Skier (2002-12-19 16:40:00) [4]>GobliNGuT
1) как объявлена TPostRecordType ?
2) И что есть NNTP.HeaderRecord ?
| |
