Можно замечать не только за собой, но и за другими> -- Иван Кузьмицкий писал(а):
> 1) Указатель перед использованием не проверяется на NIL.
Модуль StdTabViews.

## Код:
```
PROCEDURE (tv: View) Neutralize*;
   BEGIN
      IF tv.NofTabs() > 0 THEN
         tv.View(tv.Index()).Neutralize;
      END
   END Neutralize;
```


вроде бы всё логично, но суть в том, что если удалить все вкладки программно (это важно), а потом добавить первую, то модуль сначала создаёт для неё пустую ячейку в списке табсов, но не заполняет её, а посылает запрос Views.Do на выполнение операции Stores.Operation а Views - нейтрализует отображение вкладки и тут мы натыкаемся на результат вызова функции равный NIL.

Исправил на:
## Код:
```
PROCEDURE (tv: View) Neutralize*;
      VAR v: Views.View;
   BEGIN
      IF (tv.scriptLevel=0) & (tv.NofTabs() > 0) THEN
         v:=tv.View(tv.Index());
         IF v#NIL THEN v.Neutralize END
      END
   END Neutralize;
```

что не позволит отображению обрабатывать эту процедуру вообще, если вкладки находятся в режиме изменений BeginChanges/EndChanges