> -- Иван Денисов писал(а):
> Нашелся ли ответ на вопрос, как вы в итоге сделали проверку?Я пользовался раньше, вот такой реализацией, где-то нашел в примерах, но как оказалось она глючит, если открыто несколько окон.Точно ответить не могу --- уже не помню в какой задаче возник вопрос.

1) Где требутеся в одно "глобальное" окно, заводил глобальную переменную в модуле типа v: Views.View.
## Код:
```
VAR   log: TextModels.Model;
...
   PROCEDURE OpenLog*;
   BEGIN
      IF log = NIL THEN log := TextModels.dir.New() END;
      Views.OpenAux(TextViews.dir.New(log), "Журнал")
   END OpenLog;
```

2) В WorkWindows используется перебор по Windows.dir и заголовку окна.Пётрпро подобный вариант говорил.

А у Вас какая задача?

P.S. Реализация врят ли "глючит". Та рассылка сообщений предназначена только для перерисовки  вьюшек (видимых в данный момент). Невидимым сообщения не доходят, т.к. их перерисовывать не надо. Сам несколько раз напарывался на недопонимании/забывании этого момента.