ошибка, если поле в DBEdit11 пусто

[ГОСЕАН]

begin
//  DBEdit11.Field.AsInteger:=0;
  Query5.Close;
  Query5.Prepare;
  Query5.ParamByName('vd').Value:=DBEdit4.Field.AsString;
  Query5.Open;
  if DBEdit11.Field.AsInteger=null Then
  Begin
  DBEdit11.Field.AsInteger:=1
  end
  Else
  Begin
  DBEdit5.Field.AsInteger:=DBEdit11.Field.AsInteger+1;
  end;

___________
Код нужно оформлять по правилам:
тегом [CODE]..[/СODE] (это кнопочка с решёточкой #)
Не забывайте об этом!
Модератор.

[JUDAS]

if DBEdit11.Field.AsInteger=null Then

жесть, как может быть AsInteger = null ?
---
Советую попробовать вот так

if DBEdit11.Field.IsNull then

[ГОСЕАН]

Сообщение от JUDAS

жесть, как может быть AsInteger = null ?
---
Советую попробовать вот так

if DBEdit11.Field.IsNull then

Спасибо, помогло!!!