Inaccessible value

Roman20

Всем привет. Подскажите плиз как обработать это значение.allow function calls и в Debugger options не помогает.не могу увидеть значение.Ошибка возникает в этот момент
<b>while</b> (data.id_obor <> qMod.FieldByName('id_mod').AsInteger) <b>and</b> (data.id_obor<>null) <b>do</b>
 <b>begin</b>
 node := vst.GetNextVisible(node);
 data := vst.GetNodeData(node);
 <b>end</b>;
это перерисовка дерева идет у меня и когда идет сравнение то в переменнойdata.id_obor Inaccessible valueа в qMod.FieldByName('id_mod').AsInteger 0и идет конфликт, как избежать?Спасибо
8 ответов

Roman20

а что показывает qMod.FieldByName('id_mod').AsString в этот момент?


Roman20

а что показывает qMod.FieldByName('id_mod').AsString в этот момент?
0он qMod.FieldByName('id_mod').AsIntegerизвиняюсь )это в типах)type PMyRec = ^TMyRec; TMyRec = record id_obor : integer;


Roman20

0он qMod.FieldByName('id_mod').AsIntegerизвиняюсь )это в типах)type PMyRec = ^TMyRec; TMyRec = record id_obor : integer;
Не так понял...Да со стрингом пробовал та же проблема...


Roman20

никто не сталкивался? :(


Roman20

Сделай промежуточную локальную переменную.Т.е. перед сравнением присвой ей значение, а потом используй эту переменную при сравнении.Только я вот не понимаю, как у тебя в Integer может быть Null.


Roman20

data.id_obor<>null
Почему используется null, а не 0??чему равна переменная data в строке после while ?


Roman20

а какого типа переменная data, PMyRec или TMyRec???если PMyRec, то вместо data.id_obor подставь data^.id_obor


Roman20

P.S.да и вообще у меня чувство, что эта data-переменная не проинициализирована и содержит мусор