ЗАпись

← →
jiura (2003-01-17 14:24) [0]

Есть запись,обьявленная следующим образом:
"""""""""""""""""
useroptions=record
blockKolvo:Integer;
{}
MaxRows:Byte;
MaxCols:byte;
{}
VertSizeWithBlocks:Byte;{
HorizSizeWithBlocks:byte;
{}
BlockHeight:Byte;
BlockWidht:byte;
ZeroYrName:String[200];
ZeroYrBlockColor:integer;
ZeroYrBlockFontColor:integer;
BlockName:array[1..50,1..40] of string[200];
BlockColor:array[1..50,1..40] of integer;
BlockFontColor:array[1..50,1..40] of integer;
CreateYesNO:array[1..50,1..40] of Boolean;
BlockTagRow:array[1..20] of integer;
BlockTagCol:array[1..20] of integer;
End;

Так аот.Почему то Delphi не видит последние две записи ( BlockTagRow и BlockTagCol).Т.е. после точки,когда высвечивается список всех этих обьявлений этих двух нет (вернее почти всегда нет,иногда он их все-таки определяет).Если я забиваю на список и пишу вручную,то при выполнении строк,где есть эти два обьявления
возникает критическая ошибка:
Заглавие:Debugger Exception Notification
И текст:
Project Sss.exe raised exception class EAccessViolation with message "Access violation at address 00434C70" in module sss.exe.Read of address 00000048.Process stopped.Use Step or Run to continue.
Что это такое????И как с этим бороться?

← →
Skier (2003-01-17 14:26) [1]

VertSizeWithBlocks:Byte; { ?

← →
Skier (2003-01-17 14:28) [2]

Да и ещё...для типов данных и классов хорошим стилем считается
использование префикса T (type)

useroptions -> TUserOptions

← →
Lord Warlock (2003-01-17 14:30) [3]

У тебя странная дельфя. Моя все видит корректно.
Пример
a.BlockTagCol[1]:=1;
ShowMessage(IntToStr(a.BlockTagCol[1]));

Вообще то очень желательно сделать объявление так:

useroptions=packed record

← →
Digitman (2003-01-17 14:33) [4]

> 00434C70

что за строчка исх.текста у тебя по адресу 00434C70 ?

ЗАпись Найти похожие ветки