Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2003.05.01;
Скачать: [xml.tar.bz2];

Вниз

MDIChild   Найти похожие ветки 

 
Viktor Tsoy   (2003-04-18 02:08) [0]

Помогите мастера. Создаю форму, ставлю
FormStyle := fsMDIForm;
добавляю кнопку, вторую форму
по нажатию на кнопку вызываю вторую форму
Form2.FormStyle := fsMDIChild;
Form2.Show;
Затем закрываю Child и обрабатываю OnClose
Action := caFree;
(пока все работает)
вызываю еще раз и выскакивает ошибка
я понимаю что необходимо Action := caNone или caMinimize
но где не знаю.


 
Deadlock   (2003-04-18 03:43) [1]

Action := caFree; уничтожает форму...а ты ее опять вызываешь...
если хочешь просто свернуть, тогда Action := caMinimize


 
Viktor Tsoy   (2003-04-18 05:09) [2]

Так что, мне ее просто спрятать (типа caHide)?


 
Shirson   (2003-04-18 07:47) [3]

Action := caFree; Уничтожает форму, но оставляет
идентификатор.
Пиши
Action := caFree;
Form2:=nil;


Теперь нужно чуть-чуть подшаманить вызов окна.

if not assigned (Form2) then Application.CreateForm(TForm2, Form2);
Form2.Show;


Теперь строку Application.CreateForm(TForm2, Form2); можно выкинуть из кода проекта - форма будет создаваться только когда нужна.

Если же тебе нужно прятать MDI окно, без уничтожения, то это немного другая история :)



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

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

Наверх





Память: 0.44 MB
Время: 0.006 c
3-482
Term
2003-04-14 17:08
2003.05.01
Файл-серверное приложение. Возникла такая проблема если открываю


14-735
ddd
2003-04-14 10:03
2003.05.01
Подскажите какой-нить нормальный компонент для работы с базами на


1-637
Igorek
2003-04-18 21:06
2003.05.01
Два вопроса по интерфейсам


1-643
exo
2003-04-19 15:21
2003.05.01
перевести на делфи


3-400
Nichls
2003-04-11 13:14
2003.05.01
Пронумеровать порядковый номер после измения





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский