Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Проблема с указателем на запись [D7, Win2k]


Papa ©   (2006-03-07 02:03:00) 

При компиляции этого исходника выпадает ошибка "TRecList is not a type identifier". Как только убираю одно из полей записи TRec - все гуд. Как показал эксперимент тип поля вроде бы роли не играет. Помогите понять в чем проблема, ответов пока нигде не нашел :(


unit Unit1;

interface

const
  MaxListSize = Maxint div 16;

type

TRec = record
 a: string;
 b:string;
 d:string;
 c:string;
 end;
TRecList = array[0..MaxListSize] of TRec;

PRec  = ^TRecList;

implementation
end.


evvcom   (2006-03-07 08:39:00) [1]


> MaxListSize = Maxint div 16 - 1;

Более соответствует смыслу имен:
TRecList = array[0..MaxListSize-1] of TRec;


Papa   (2006-03-07 03:42:00) [2]

> Вылез за размер блока

То, что вылез-то, это точно, сам уже допер :). Но запись MaxListSize = Maxint div 16; взята из сорцов TStringList, а они созданы на основе подобных записей. Единственное, чего я не учел, это то, что куча стрингов в полях, сожрут весь блок и даже больше. Так что "-1", это слегка маловато :) Вобщем, спасибо за помощь, Плохиш.


Плохиш   (2006-03-07 02:15:00) [3]


> const
>   MaxListSize = Maxint div 16 - 1;

Вылез за размер блока.


Наверх

Титульная страница Поиск, карта сайта Написать письмо