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

Вниз

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

 
ser_ega   (2004-11-08 23:11) [0]

Я создал форму Form1 и для нее FormStyle:=FsMDIForm, А для Form2.Formstyle:=fsMDIchild! Но теперь при запуске программы сразу появляется Form2. Что нужно сделать чтобы Form2 появлялась только по нажатии  кнопки на Form1?


 
GanibalLector ©   (2004-11-08 23:12) [1]

Удали ее из DPR(файла проекта)


 
ser_ega   (2004-11-08 23:32) [2]

Так теперь при вызове ее Form2.Show выскакивает ошибка!


 
GanibalLector ©   (2004-11-08 23:49) [3]

>Так теперь при вызове ее Form2.Show выскакивает ошибка!

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


 
ser_ega   (2004-11-09 00:03) [4]

А почему у меня кнопка на Form1, при открытии Form2, находится поверх Form2?


 
GanibalLector ©   (2004-11-09 00:06) [5]

А книгу взять в руку?Максимум 5 страниц уделятся MDI интерфейсу...и вопросы сразу исчезнут


 
ser_ega   (2004-11-09 00:06) [6]

Нееееее, это по моему плохой способ! При повторном нажатии на кнопку фома уже не открывается!
Еще варианты будут?


 
GanibalLector ©   (2004-11-09 00:15) [7]

>При повторном нажатии на кнопку фома уже не открывается!

procedure TForm2.FormClose(Sender: TObject; var Action: TCloseAction);
begin
Form2:=nil;
action:=cafree;
end;

>Еще варианты будут?
В книгах...


 
GanibalLector ©   (2004-11-09 00:18) [8]

>При повторном нажатии на кнопку фома уже не открывается!
А что тебе их нужно несколько???Тогда удали  (not assigned(Form2))
З.Ы. Все я забил...книги помогут



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

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

Наверх




Память: 0.45 MB
Время: 0.037 c
14-1099862089
Некто
2004-11-08 00:14
2004.11.21
Администрирование.


1-1099495453
Виктор
2004-11-03 18:24
2004.11.21
Добавить в PageControl TabSheet из программы.


4-1097596116
F1
2004-10-12 19:48
2004.11.21
Как рисовать прямо на экране?


1-1099447161
jack128
2004-11-03 04:59
2004.11.21
Отрисовка метки и FocusRect


1-1099664180
Cosinus
2004-11-05 17:16
2004.11.21
Runtime create PoupMemu Items... Не разберусь с OnDrawItem...





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский