Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Преобразование типов (record<->pointer)

SAVage © (2005-02-23 14:08:00)
Столкнулся с такой проблемой. Нужно в TList добавить добавить элемент типа - запись, но т.к. он хранит указатели, то естественно нужно преобразовать тип. Пытался таким образом Pointer(..). Выдает ошибку.
Буду очень признателен за любую помощь.

Юрий Зотов (2005-02-23 15:09:00) [1]
> SAVage © (23.02.05 15:02) [5]

> Я завел дин. массив, а в Tlist храню указатели на его
> элементы.

Зачем чесать левое ухо правой рукой? Чем не устраивают решения [1] и [2]?

А если так уж хочется иметь динамический массив, то тогда зачем нужен еще и TList?

Sandman25 (2005-02-23 15:05:00) [2]
[5] SAVage © (23.02.05 15:02)
>Я завел дин. массив, а в Tlist храню указатели на его элементы.

При добавлении элементов в дин. массив он может быть перенесен в другую область памяти. Надежнее хранить индексы.

SAVage (2005-02-23 15:02:00) [3]
Всем спасибо,заработало. Я завел дин. массив, а в Tlist храню указатели на его элементы.
У меня еще один вопрос, при сортировке Тлиста возникает ошибка!
Вот код
MyList.Sort(Compare);

function Compare(Item1,Item2:Pointer): integer;//1
var a,b: Trecord;//2
begin//3
a := Trecord(Item1^); //4
b := Trecord(Item2^);//5
Result := CompareText(a.string1,b.string2);//6

end;
во время выполнения возникает исключение в строке 4. Причем не сразу, а со второго захода в эту функцию. С чем это может быть связано?

Чапаев (2005-02-23 14:30:00) [4]
> Угу. И так семь раз.
> Да ещё для локальной переменной.
Ну я специфику задачи не знаю...

DiamondShark (2005-02-23 14:13:00) [5]

> Чапаев © (23.02.05 14:11) [1]

Угу. И так семь раз.
Да ещё для локальной переменной.
;)

Чапаев (2005-02-23 14:11:00) [6]
MyList.Add(@MyRecord);
...
MyRecord:=TMyRecord(MyList[0]^);

DiamondShark (2005-02-23 14:11:00) [7]
Размещать записи в динамической памяти.
Только освобождать не забывать.

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »