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

Шлифую баги с модальными формами   Найти похожие ветки 

← →
Макс ©   (2001-12-29 11:01) [0]

Показываю форму методом showmodal, возвращаю значение в modalresult. Когда это происходит перывый раз всё проходит OK, но при повторной попытке опять показываю её showmodal, она показывается, а на закрытие вываливается "Cannot make a visible window modal".

---

← →
Vitaly ©   (2001-12-29 11:12) [1]

Покажи строку вызова модального окна и его закрытия (где присваиваешь modalresult).

---

← →
Макс ©   (2001-12-29 11:28) [2]

if PSWForm.ShowModal = 6 then
begin
......
end;

а закрываю просто присваивая переменной ModalResult какое-либо значение

---

← →
Макс ©   (2001-12-29 11:29) [3]

procedure TPswForm.ButtonOKClick(Sender: TObject);
begin

.....

ModalResult := 6;
end;

---

← →
Vitaly ©   (2001-12-29 11:32) [4]

А, если попробовать mrOk вместо 6?

---

← →
Vitaly ©   (2001-12-29 11:38) [5]

Попробовал с 6.
Всё нормально.
Давай побольше кода.
И в каком именно месте вылетает.

---

← →
McSimm ©   (2001-12-29 11:54) [6]

Кода явно недостаточно.
Как создается форма? Где уничтожается (и уничтожается ли).
Нужен код (если есть) событий OnClose, OnCloseQuery, OnDestroy модальной формы

---

← →
Макс ©   (2001-12-29 11:58) [7]

Всё разобрался, вызов модальной формы висел на OnFormActivate основной формы. Соответственно при повторном вызове при закрытии мод. формы вызывалось это событие, которое в свою очередь снова пыталось открыть мод. форму.

Вообщем кривые руки=грабли в программе, а за помощь спасибо. :-)

---

← →
DK ©   (2001-12-31 03:04) [8]

Макс © (29.12.01 11:28)
Попробуй закрывать просто по Сlose;

---

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

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



Память: 0.46 MB
Время: 0.005 c