Уважаемые коллеги ! Как сделать так, чтобы при закрытии формы по крестику в правом верхнем углу и при потере формой фокуса ( форма немодальная ), проверялось некое условие и при его невыполнении форма не закрывалась ( не теряла фокус ) ? В какой метод формы загнать проверку условия при закрытии формы ? Заранее всем признателен.

if thisform.QueryUnload()
thisform.release()
endif

Большое спасибо !

Вопрос добавлен в FAQ

Как перехватить нажатие на крестик в правом верхнем углу формы

Hi Коматозник!

Потерю фокуса формой предотвратить невозможно. Максимум что можно сделать, так это в каком-то контроле написать в обработчике события LostFocus.
Или по иному фокус "вернуть". Будет дёргаться конечно...
И самое важное - это IMHO очень недружественно к пользователю. Блокируй возможность сделать Save введённым данным если они некорректны (пусть по закрытию будет диалог и если уж надо закрывать, а данные кривы - всё "пропадёт впустую"), но не делай подобного "зависания" программы! Это напрягает пользователя - тем более если выход из такого состояния будет им совершенно неочевиден. Уж лучше тогда использовать модальную форму!