Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.04.25;
Скачать: [xml.tar.bz2];




Вниз

Закрытие формы MDIChild программным методом 


Jaxtor   (2002-04-12 11:21) [0]

Подскажите, пожалуйста, как программно закрыть форму MDIChild.
Она создается при нажатии кнопки Create Window типа TButton на
главной форме c помощью конструктора TMDIChildForm.Create(Application).
Нажав на кнопку закрытия окна MDIChild, форма закрывается
с помощью Action:=caFree. А другим способом - например,
чтобы эта форма закрывалась при нажатии на другую кнопку
Close Window типа TButton на главной форме не получается.
Пытался закрыть форму MDIChild вызвав метод, который выполняется при
нажатии кнопки закрытия этого окна :
TMDIChildForm.MDIChildFormClose(Sender,Action).
Выдается ошибка компиляции. А метод MDIChildForm.Сlose вызывает исключительную
ситуацию. MDI wizard не помогает, т.к. у меня
большая программа (я описал только ядро проблемы) и переписывать
ее через этот визард займет очень много времени. Я добавил деструктор
Free, а затем метод Close. После Close появл. искл. ситуация.



Игорь Шевченко   (2002-04-12 11:33) [1]

День добрый,

Почему не получается, получается. Хоть все MDI-формы можно закрыть, к примеру,


while ActiveMDIChild <> nil do begin
ActiveMDIChild.Release();
Application.ProcessMessages();
end;


Если надо закрыть конкретную форму, то для начала ее надо найти,
а потом выполнить myMdiChildForm.Close().

С уважением,



Jaxtor   (2002-04-12 11:38) [2]

Спасибо за помощь!
Все работает.




Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.04.25;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.72 MB
Время: 0.019 c
1-80941           JibSkeart             2002-04-11 16:13  2002.04.25  
Как запустить видео файлы программно


14-81057          fliz                  2002-03-20 09:22  2002.04.25  
Если на машине нет и никогда не было установлено Access, то через BDE можно работать с аксесовской базой. Или я что-то путую?


1-81000           stormick              2002-04-12 19:35  2002.04.25  
Кнопка на рабочем столе....


6-81012           Татьяна               2002-02-07 08:01  2002.04.25  
Как соединть сервер, программированный на D4 с клиентом под DOS по IPX


4-81103           hair_fly              2002-02-19 18:06  2002.04.25  
Как отличить NT от 2000 ?