возникающая редко ошиба
function TfrxDBDataset.GetValue
стоит
{$ENDIF}
end
else
v := TField(Fields.Objects).Value
тут всегда у меня возникает ошибка
нужно стаивть проверку
if Fields.Objects<> Nil then
v := TField(Fields.Objects).Value
else v := Null;
тогда проходит.
Из версии в версию это кочует..
стоит
{$ENDIF}
end
else
v := TField(Fields.Objects).Value
тут всегда у меня возникает ошибка
нужно стаивть проверку
if Fields.Objects<> Nil then
v := TField(Fields.Objects).Value
else v := Null;
тогда проходит.
Из версии в версию это кочует..