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

MDI -форма   Найти похожие ветки 

← →
explorer ©   (2003-01-27 12:39) [0]

Мастера!
На формах ничего нет, "голые".
Из главной вызываю дочернюю. Все проходит без проблем.
Но когда ее же вызываю второй раз, то при проверке:

if NOT Assigned(FormNewReg) then
FormNewReg := TFormNewReg.Create(Application);
FormNewReg.Show();

выдает ошибку(EAbstractError)!

Дочернюю форму закрываю, так :
Free;

Пробовал пошагаво пройтись.. так при втором открытии доч.формы
оператор не выполняется, как будто форма до сих пор открыта.
И тогда, естественно выдается ошибка.
Подскажите, где и чего я не учел?

---

← →
Игорь Шевченко ©   (2003-01-27 12:46) [1]

В событии OnDestroy дочерней формы надо сказать

FormNewReg := nil;

---

← →
dolmat ©   (2003-01-27 13:20) [2]

FormNewReg := TFormNewReg.Create(self);
FormNewReg.Show();

procedure FormNewReg.FormClose(Sender: TObject; var Action: TCloseAction);
begin
FormNewReg.Release;
end;

Release вместо free

---

← →
Игорь Шевченко ©   (2003-01-27 13:55) [3]

И еще, в дочерней форме на событие OnClose установить Action := caFree

---

← →
Explorer ©   (2003-01-27 14:03) [4]

спасибки!

---

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

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



Память: 0.45 MB
Время: 0.012 c