VPF::Зависание программы - Форум программистов

PsiMagistr

Дата 4.7.2011, 08:19 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 479
Регистрация: 31.12.2009

Репутация: 1
Всего: 1

Одной своей знакомой дал потестить игру. Говорит зависла при закрытии одного из окон. На своей машине я этого никогда не наблюдал.
Никаких циклов и сложных вычислений в событии закрытия нет, там вообще ничего нет.
Ребята я отлично понимаю всю размытость вопроса, но все же как можно отловить такую ошибку.

Форма динамическая. Уничтожается через FreeAndNil.

Код


if ProvForm = true then
begin
Battl:= TBattl.Create(fMainMenu); //Создали
Battl.ShowModal; //Показали модально
FreeAndNil(Battl); //Уничтожили.
end;

Battl-имя формы. fMainMenu - другой.

Это сообщение отредактировал(а) PsiMagistr - 4.7.2011, 08:29

--------------------

"Арфы нет? Возьмите бубен!

Ребята, будем жить!"

(с) "В бой идут одни старики"

---

"ИЕ" - один из самых сумасшедших браузеров в нашей галактике.

CodeMonkey

Дата 4.7.2011, 14:11 (ссылка)

(голосов:2)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 1839
Регистрация: 24.6.2008
Где: Россия, Тверь

Репутация: 29
Всего: 89

http://www.gunsmoker.ru/2010/06/blog-post_08.html

--------------------

Опытный программист на C++ легко решает любые не существующие в Паскале проблемы.

PsiMagistr

Дата 4.7.2011, 14:34 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 479
Регистрация: 31.12.2009

Репутация: 1
Всего: 1

CodeMonkey, спасибо, читаю.

Но зависания на своей машине мне добиться так и не удалось. Равно как и зависания на машине моего друга. Прогу чуть ли не наизнанку вывернул, не висит. Да и банально нечему там висеть. Может это с системой связано?

--------------------

Poseidon

Дата 12.7.2011, 14:29 (ссылка)

(нет голосов)

Загрузка ...

Delphi developer

Профиль
Группа: Комодератор
Сообщений: 5273
Регистрация: 4.2.2005
Где: Гомель, Беларусь

Репутация: 9
Всего: 133

Цитата(PsiMagistr @ 4.7.2011, 08:19

)

Одной своей знакомой дал потестить игру. Говорит зависла при закрытии одного из окон.

У знакомой этот зависание постоянно? Есть какая-то последовательность действия? Иначе ты ищешь иголку. Может у нее в этот момент память глюканула и все вообще зависло. Тут так просто не разберешься.

--------------------

Если хочешь, что бы что-то работало - используй написанное,
если хочешь что-то понять - пиши сам...

Akella

Дата 12.7.2011, 22:51 (ссылка)

(нет голосов)

Загрузка ...

Творец

Профиль
Группа: Модератор
Сообщений: 18485
Регистрация: 14.5.2003
Где: Корусант

Репутация: 8
Всего: 329

Для чистоты эксперимента нужно отключить/удалить антивирус(ы).

Добавлено через 1 минуту и 2 секунды
Возможно ты привёл не весь код.
Бывает, что забыл чего-то. Может у тебя динамически создается событие на закрытие формы.

Добавлено через 6 минут и 37 секунд

Цитата(PsiMagistr @ 4.7.2011, 08:19

)

Говорит зависла

Зависла и зависает - две разные вещи smile

. Вот если это проявляется систематически...
Мало того. Что там за винда? Если какая-то левая сборка типа суппер-буппер-мега-блэк-эдишен, то сам понимаешь, чем такие сборки могут быть напичканы. Я сам столкнулся с тем, что у клиента программа не запускается. При запуске сразу валится. Винда выдает, что программа выдала недопустимую ошибку и будет закрыта с предложением отправить отчёт в M$. Винда была только-то установлена. Все драйверы были установлены. Оказалось, что у клиента была Windows Black Edition. Как только установили нормальную, чистую лицензионную винду, программа моментально запустилась и работает, как часы.

Добавлено через 10 минут и 7 секунд
Если систематически и нет возможности использовать удалённый отладчик, то можно сделать что-то вроде отладочной версии с ShowMessage.

Код


if ProvForm = true then
begin
  ShowMessage('1');
  Battl:= TBattl.Create(fMainMenu); //Создали
  ShowMessage('2');
  Battl.ShowModal; //Показали модально
//ещё несколько   ShowMessage внутри модуля повесь на кнопку закрытия - OK или Cancel или чем там закрывается

  ShowMessage('x');
  FreeAndNil(Battl); //Уничтожили.
  ShowMessage('y');
end;

Да, может OnClose нету, но есть OnCloseQuery?

PsiMagistr

Дата 24.7.2011, 06:59 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 479
Регистрация: 31.12.2009

Репутация: 1
Всего: 1

Спасибо большое.

--------------------

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Для новичков \| Следующая тема »