Вниз
Скачать: CL | DM;

Двунаправленные списки   Найти похожие ветки 

 
pirate ©   (2007-04-11 08:01) [0]

Доброго времени суток, многоуважаемые мастера!
Вопрос такого характера:

В паскале делал когда-то двунаправленные списки-
конструкцию подобного рода:
type TListMember=record
previous,next:^TListMember;
value:byte;
end;


А в дельфи теперь выдает что-то вроде "Тип TListMember еще не объявлен"

Как решить подобную задачу?
Дело в том, что мне нужно хранить очень длинный список значений, и иметь возможность быстро вставлять и вырезать целые группы элементов списка. Решил использовать указатели...


 
Сергей М. ©   (2007-04-11 08:07) [1]

type
 PListMember = ^TListMember;
 TListMember= packed record
   previous,next: PListMember;
   value:byte;
 end;


 
Плохиш ©   (2007-04-11 11:01) [2]


> pirate ©   (11.04.07 08:01)  
> В паскале делал когда-то двунаправленные списки-
> конструкцию подобного рода:
> type TListMember=record
> previous,next:^TListMember;
> value:byte;
> end;

Врёшь, не пропускает паскаль такого.


 
Knight ©   (2007-04-12 08:37) [3]

> [2] Плохиш ©   (11.04.07 11:01)
> Врёшь, не пропускает паскаль такого.

Не врёт... тут ключевое слово "когда-то" :)


 
StriderMan ©   (2007-04-12 08:49) [4]


> и иметь возможность быстро вставлять и вырезать целые группы
> элементов списка. Решил использовать указатели...

а чем TList не угодил?


 
Плохиш ©   (2007-04-12 10:44) [5]


> Knight ©   (12.04.07 08:37) [3]

Даже "когда-то" паскаль такого не пропускал.


 
Knight ©   (2007-04-12 10:47) [6]

> [5] Плохиш ©   (12.04.07 10:44)
> Даже "когда-то" паскаль такого не пропускал.

"когда-то" в смысле писАл, но забыл, что писАл и как писАл... а паскаль такого никогда не пропускал.



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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.041 c
1-1173168166
Ques
2007-03-06 11:02
2007.04.29
SetErrorMode(SEM_FAILCRITICALERRORS) для приложения


2-1176374431
denmin
2007-04-12 14:40
2007.04.29
Как открыть ранее сохраненный файл Quickreport a?


3-1170853130
Ламерок
2007-02-07 15:58
2007.04.29
Как вставить jpg картинку в таблицу?


8-1155203008
Мопед
2006-08-10 13:43
2007.04.29
Async Professional момент поднятия трубки КАК отловить?


2-1175509401
bagos
2007-04-02 14:23
2007.04.29
Plugins




   Наверх