Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.01.06;
Скачать: CL | DM;

Вниз

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

 
Chupa-chups ©   (2002-12-24 12:00) [0]

Свойство FormStyle формы многооконного приложения =fsMDIChild. При закрытии формы оно сворачивается. Если указать Action=caHide, то ошибка "Cannot hide an MDIChild form". Как спрятать форму??????


 
jee ©   (2002-12-24 12:05) [1]

в событии формы OnClose ставть Action := caFree;


 
Chupa-chups ©   (2002-12-24 12:17) [2]

Но как её создать , если она потом снова понадобится?


 
mrcat ©   (2002-12-24 12:21) [3]

File -> New -> Other... -> Projects -> MDI Application

подробный пример по MDI


 
Chupa-chups ©   (2002-12-24 12:28) [4]

Пояснение:В ходе реализации программы форма может вызываться не один раз и закрываться тоже.


 
myor ©   (2002-12-24 12:37) [5]

Action := caFree
потом show
потом опять
Action := caFree
потом опять show


 
jee ©   (2002-12-24 12:43) [6]

Я делал так:
При вызове формы
if PatientFormIsNotRunned then begin
PatientForm := TPatientForm.Create(MainForm);
****блабла***********
end
else PatientForm.Show();


 
Chupa-chups ©   (2002-12-24 12:49) [7]

На второе Show ошибка Access violation...


 
myor ©   (2002-12-24 13:47) [8]

посмотри (переделай под себя и используй) mdiapplication из репозитория file>new>other>projects>mdiapplication


 
Woolen ©   (2002-12-24 14:11) [9]

Блин, пишешь обычный CreateForm, и она у тебя генерится. Засунь в нажатие кнопки или еще меню какого-то. TChildWnd в данном случае класс окна, которое ты лепишиь в Delphi визуально (или невизуально)
Типа этого:
procedure TMainWnd.CreateNewForm;
var
NewChildWindow: TChildWnd;
begin
NewChildWindow := TChildWnd.Create(Application);
NewChildWindow.Caption := "Новый документ";
end;

А в обработчике события OnClose дочерней формы пишешь: Action := caFree, потому что по умолчанию форма сворачивается и с ней, кроме свертки еще что-то можно сделать по вызову закрытия, вот одно из этого "что-то" - это уничтожение формы. Присвоение переменной Action значения caFree означает, что ты хочешь форму уничтожить.

procedure TChildWnd.FormClose(Sender: TObject; var Action: TCloseAction);
begin
Action := caFree;
end;

Все будет работать безо всяких там Access Violation"ов.


 
MXA   (2002-12-24 14:41) [10]

в крайнем случае можно делать DoHide
но лучше как написал Woolen



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

Текущий архив: 2003.01.06;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.024 c
1-15103
atmospheric
2002-12-20 13:19
2003.01.06
ListView тормозит...


7-15321
Sirus
2002-10-23 07:12
2003.01.06
Народ... Как узнать что файл копируется кудо-то???


1-15146
adolf_99
2002-12-23 19:10
2003.01.06
Помогите


14-15306
KidMan
2002-12-13 22:35
2003.01.06
Инсталяшка проги


7-15319
zalviko
2002-10-27 16:16
2003.01.06
Вопрос