Add(MainForm,2953706,56,126)
{
}
Add(CheckBox,8513868,189,126)
{
Left=140
Top=15
Width=110
}
Add(Button,805290,112,126)
{
Left=45
Top=15
Caption="Null"
link(onClick,8513868:doCheck,[])
}
Null -- не false в при ReadBool, и все это потому, что вот в этом коде
Result := (Data.Data_type<>data_int)or(Data.idata<>0);
Аргумент Data.Data_type<>data_int при данных типа Null выдает true