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

Вниз

Проблема с указателем на запись   Найти похожие ветки 

 
Papa   (2006-03-07 02:03) [0]

При компиляции этого исходника выпадает ошибка "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.


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


> const
>   MaxListSize = Maxint div 16 - 1;

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


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

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

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


 
evvcom ©   (2006-03-07 08:39) [3]


> MaxListSize = Maxint div 16 - 1;

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



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

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

Наверх




Память: 0.47 MB
Время: 0.048 c
3-1140019073
Ольга
2006-02-15 18:57
2006.04.09
Странное сообщение SQL-сервера


15-1142836788
Yanis
2006-03-20 09:39
2006.04.09
На тему VB vs. Delphi


10-1116429022
Santrope
2005-05-18 19:10
2006.04.09
Как распечатать Excel документ при помощи PrintDialog ?


3-1139988605
Ткаченко Сергей
2006-02-15 10:30
2006.04.09
Древовидный просмотр из БД...


6-1129439025
Nike
2005-10-16 09:03
2006.04.09
Не могу передать данные посредством idUDPClient/idUDPServer