Главная страница
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.018 c
6-15198
/*Drive*/
2002-11-08 09:24
2003.01.06
ПОМОГИТЕ !!!


14-15250
Axis_of_Evil
2002-12-16 11:17
2003.01.06
А есть ли среди местных геймеры ?


1-15148
Agent
2002-12-22 20:20
2003.01.06
Мастаки Help!!!!!!


1-14997
Nikolai_S
2002-12-16 16:30
2003.01.06
Как проверить является ли имя файла допустимым?


14-15211
Дмитрий К.К.
2002-12-04 14:28
2003.01.06
Где можно скачать список ВСЕХ тэгов HTML?