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




Вниз

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


Jaxtor   (2002-04-11 11:35) [0]

Подскажите, пожалуйста, как программно закрыть форму MDIChild.
Она создается при нажатии кнопки Create Window типа TButton на
главной форме c помощью конструктора TMDIChildForm.Create(Application).
Нажав на кнопку закрытия окна MDIChild, форма закрывается
с помощью Action:=caFree. А другим способом - например,
чтобы эта форма закрывалась при нажатии на другую кнопку
Close Window типа TButton на главной форме не получается.
Пытался закрыть форму MDIChild вызвав метод, который выполняется при
нажатии кнопки закрытия этого окна :
TMDIChildForm.MDIChildFormClose(Sender,Action).
Выдается ошибка: Types of actual and formal var parameters
must be identical. А метод MDIChildForm.Сlose вызывает исключительную
ситуацию EAccessViolation.



Виктор Щербаков   (2002-04-11 11:39) [1]

Close



Jaxtor   (2002-04-11 11:42) [2]

Не подходит!
Метод Close Вызывает исключительную ситуацию!!!



Alx2   (2002-04-11 11:45) [3]

SomeMDIChild.free?



Виктор Щербаков   (2002-04-11 11:49) [4]

Элементарный пример:
1. Генерим с пом. визарда MDI-приложение.
2. Добавляем на панель инструментов кнопку.
3. Добавляем обработчик события OnClick для неё:
procedure TMainForm.Button1Click(Sender: TObject);
begin
ActiveMDIChild.Close;
end;


Запускаем и наслаждаемся.



Jaxtor   (2002-04-11 11:51) [5]

Ладно, попробую!
Спасибо.




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




Наверх





Память: 0.72 MB
Время: 0.016 c
14-81039          ProgMan               2002-03-11 14:35  2002.04.25  
9 способов пеpеступить закон падающего бутеpбpода


3-80822           Mikeee                2002-04-05 09:16  2002.04.25  
Вот вопросик...


3-80765           IronHawk              2002-04-02 11:34  2002.04.25  
Приветствую Мастеров ! Как удалять одинаковые строки в базе 2 ?


14-81045          DimaIv                2002-03-18 17:19  2002.04.25  
Имеется винчестер с кучей Bad Blockов можно ли сделать


1-81009           Demon Ltd             2002-04-13 00:05  2002.04.25  
Работа повторно с меню