Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

MDI -форма [D7, Win2k]


explorer ©   (2003-01-27 12:39:00) 

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

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

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

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

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


Explorer   (2003-01-27 14:03:00) [1]

спасибки!


Игорь Шевченко   (2003-01-27 13:55:00) [2]

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


dolmat   (2003-01-27 13:20:00) [3]

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

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

Release вместо free


Игорь Шевченко   (2003-01-27 12:46:00) [4]

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

FormNewReg := nil;


Наверх

Титульная страница Поиск, карта сайта Написать письмо