if (Query1.FieldByName('Sor_Szam').AsInteger < 1) and (Query1.FieldByName('Sor_Szam').IsNull = false) then
    begin
      Query1.Edit;
      Query1.FieldByName('Sor_Szam').AsInteger:=1;
      Query1.Post;
      Query1.Next;