651

А вот такой глюк.

Итак есть три Объекта.Форма, она же Окно номер 1Форма, она же Окно номер 2ДЛЛ файл содержащий СУПЕРФУНК.Итак я Статически линкую СУПЕРФУНК.Форма 1 содержит ApplicationEvents где на idleEvent складывает 2 переменные.Форма 1 содержит кнопку ЗАПУСК которая проверяет если создана Форма 2 и если нет создает! форму 2.Потом делает ShowModal Форм 2.Форма 2 содержит кнопку СУПЕР которая вызывает спрашивает до бесконечности "Запустить?, да\нет", если да то запускает функцию СУПЕРФУНК и еще раз спрашивает, если нет то все.Форма 2 содержит кнопку Кансел, которая Выводит МессаджБокс и закрывает Форм 2.СУПЕРФУНК - функция которая ждет 10 секунд а потом ретурн.Теперь Глюк:Форм 1:нажимаю ЗАПУСК.Форма 2: нажимаю СУПЕР и говорю ДА. СУПЕРФУНК начинает *работать* и приложение *зависает*.Теперь внимание: Переключаюсь на какую нибудь другую задачу. Т.е. кликаю мимо форм на окно например експлорера. Жду некоторое время и переключаюсь обратно. И вот эффект, который появляется НЕ всегда.Окно проявляется, перерисовывается нормально, но ДИАЛОГ НЕ ПОЯВЛЯЕТСЯ ! мало того, кнопки работают и Нажимаются ! НО при нажатии КАНСЕЛ появляется МессаджБокс и Форма НЕ ЗАКРЫВАЕТСЯ. Прошу заметить операторы ShowMessage и Close идут друг за другом, срабатывает только Шоу.В общем я в шоке!Как лечить?Пример утрированный, но глюк воспроизведен точно, *работает* в такой конфигурации 100%.
0