Вниз
Скачать: CL | DM;

Эксперимент   Найти похожие ветки 

← →
DeadMeat ©   (2007-05-30 16:02) [0]

Здравсте опять.
Не пойму одну вещь. Либо я идиёт, либо все таки проблема с лыжами.
Открываю чистый проект в Turbo Delphi 2006 (кстати может быть в версии проблема?). Добавляю окно. На обоих окнах по одной кнопке. В первом, в обработчике кнопки ставлю Form2.ShowModal. Во втором, на кнопку вешаю ModalResult := mrOk. В обработчике OnCloseQuery у второго окна ставлю Sleep(40000).
Теперь запускаю. Нажимаю первую кнопку. Появляется окно. Нажимаю вторую. Идет пауза и окно после 40 секунд закрывается. Все замечательно.
И сам эксперимент.
Запускаю программу. Нажимаю первую кнопку. Появляется окно. Нажимаю вторую. Теперь... пока идут эти 40 секунд, надо пооткрывать разных окон в системе (Мои документы, Мой компьютер, Ексель.. вообщем всего подряд). И попереключаться между ними. Туда.. Сюда.. Проходят 40 секунд. Смотрим на приложение. Оба окна остались видимыми. При этом можно оба из них двигать. Но вот при обращении к элементам второго, приложение виснет. Если этого не делать и сразу закрыть первое, то оно закрывается благополучно.
Проверялось на 2х компьютерах с Windows XP SP2 и одном Windows Vista Final. Под ХР глюк есть, под Vista - нету.

Вопрос.
Чей глюк? Sleep стоит в качестве простого "эмулятора" длительных действий при закрытии модального окна.

ЗЫ. Понятно, что можно его просто обойти, не делая подобные задержки при закрытии, но вот если "нада"?
ЗЗЫ. Примерная причина (мое мнение) - таймаут? В смысле который определяет, что то или иное окно не реагирует на сообщения. Может с ним прикол?


← →
Anatoly Podgoretsky ©   (2007-05-30 16:07) [1]

> DeadMeat  (30.05.2007 16:02:00)  [0]

20 секунд задача не реагировала на запросы, значит повисла


← →
DeadMeat ©   (2007-05-30 17:40) [2]

Ну т.е. догадка подтвердилась. Получается что все же надо исключить подобные ситуации? В смысле по возможности ставить Application.ProcessMessages ?


← →
VirEx ©   (2007-05-30 18:22) [3]


>  [2] DeadMeat ©   (30.05.07 17:40)

замени sleep реализацией нити



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.013 c
15-1180543534
Курдль
2007-05-30 20:45
2007.07.01
Эх, бросить бы все дела, да махнуть в Урюпинск!..


2-1181201129
Snane
2007-06-07 11:25
2007.07.01
Замена DBNavigator


2-1180944925
iXT
2007-06-04 12:15
2007.07.01
Потомок TMemo


15-1180541400
Max Ivanych
2007-05-30 20:10
2007.07.01
На что пересаживать с Access?


2-1180967367
GLXV
2007-06-04 18:29
2007.07.01
DriveList (ListBox) --> на ListView




   Наверх