Ошибка при проверке существования окна

Здравствуйте.
Никак не могу сообразить, как быть дальше, помогите...
Функции выполняются по очереди:
function OsnPost()
{
...
BK(Sotrudnik);
stat(param);
NewSpecOP();
...
}
В конце функции stat должны закрываться все окна определенного типа (это проще сделать, поскольку в зависимости от значения param этих окон может быть либо 3, либо 4):
function stat (param)
{
....
Log.Message("Закрываем открытые ранее окна");
do
{Sys.Process("ProcV8").Form("FormApp*").MDIWindow("*").Close();}
while (Sys.Process("ProcV8").Form("FormApp*").MDIWindow("*").Exists);
}

После того как закрылись все нужные окна скрипт на строке while... прерывается ошибкой: "Unable to find the object MDIWindow("*")."
Как избавиться от ошибки и продолжить выполнение основной функции?

Потому что у объекта которого не существует не может быть свойства Exists .
нужно использовать Wait

while (Sys.Process("ProcV8").Form("FormApp*").WaitMDIWindow("*",1000).Exists);

http://tctutorial.ru/synch/

Кроме Wait, мне кажется, ещё предусловие вместо постусловия будет лучше, тоесть while в начало, а то получается что Вы сначала закрываете окно, потом проверяете есть ли оно. В случае, если в начале выполнения окошек не будет, получите ошибку.

а не проще проверять объект на Nothing

на vbs это было бы так

Do While Not Sys.Process("ProcV8").Form("FormApp*").MDIWindow("*")  Is Nothing
 	Sys.Process("ProcV8").Form("FormApp*").MDIWindow("*").Close()
Loop

а не проще проверять объект на Nothing

на vbs это было бы так

Do While Not Sys.Process("ProcV8").Form("FormApp*").MDIWindow("*")  Is Nothing
 	Sys.Process("ProcV8").Form("FormApp*").MDIWindow("*").Close()
Loop

Разве это не то же самое, что и Exists?

а не проще проверять объект на Nothing

на vbs это было бы так

Do While Not Sys.Process("ProcV8").Form("FormApp*").MDIWindow("*")  Is Nothing
 	Sys.Process("ProcV8").Form("FormApp*").MDIWindow("*").Close()
Loop

Разве это не то же самое, что и Exists?

Нет. Если объект MDIWindow не существует, то получим не Nothing, а ошибку в логе. Поэтому надо использовать связку WaitMDIWindow + Exists, как в ответе XXX.

Кроме Wait, мне кажется, ещё предусловие вместо постусловия будет лучше, тоесть while в начало, а то получается что Вы сначала закрываете окно, потом проверяете есть ли оно. В случае, если в начале выполнения окошек не будет, получите ошибку.

Если While поставить в начало (такой вариант пробовала одним из первых), то неизбежно происходит зацикливание

а не проще проверять объект на Nothing

на vbs это было бы так

Do While Not Sys.Process("ProcV8").Form("FormApp*").MDIWindow("*")  Is Nothing
 	Sys.Process("ProcV8").Form("FormApp*").MDIWindow("*").Close()
Loop

Разве это не то же самое, что и Exists?

Нет. Если объект MDIWindow не существует, то получим не Nothing, а ошибку в логе. Поэтому надо использовать связку WaitMDIWindow + Exists, как в ответе XXX.

Я так и сделала - работает замечательно!:)