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

Вниз

MDI формы   Найти похожие ветки 

 
MZ   (2007-04-02 08:59) [0]

Как проверить создана или нет MDI форма, и если создана - сделать ее активной, если нет создать...


 
Сергей М. ©   (2007-04-02 09:34) [1]

if MainForm.MDIChildCount > 0 then
  как минимум одна MDIChild-форма существует


> сделать ее активной


Кого "ее"-то ?

"Их" аж MDIChildCount штук существует - ты о какой из них речь ведешь ?


 
MZ   (2007-04-02 09:50) [2]


> "Их" аж MDIChildCount штук существует - ты о какой из них
> речь ведешь ?
>

К примеру есть MDI форма MyForm.  Если она не создана - по нажатию на buttoh делаю TMyForm.Create(OwnerForm), если создана делаю ее активной. Пробовал
if not (MYForm=nil) then
 MyForm.SetFocus
else TMyForm.Create(OwnerForm)

даже если MyForm существует, создается второй экземпляр... Что я делаю не так?


 
Рамиль ©   (2007-04-02 10:01) [3]

Проверять на nil бесполезно. особенно при таком создании
> else TMyForm.Create(OwnerForm)


 
MZ   (2007-04-02 10:05) [4]


> Проверять на nil бесполезно. особенно при таком создании
> > else TMyForm.Create(OwnerForm)

и какой выход?


 
Рамиль ©   (2007-04-02 10:06) [5]

Ну, зависит от задачи. Если может быть только одна форма данного класса, то искать по классу.


 
Сергей М. ©   (2007-04-02 10:28) [6]


> MZ


Объясни, зачем нужно MDI-приложение с одной-единственной MDIChild-формой ?


 
Плохиш ©   (2007-04-02 10:57) [7]


> MZ   (02.04.07 10:05) [4]
>
> > Проверять на nil бесполезно. особенно при таком создании
> > > else TMyForm.Create(OwnerForm)
>
> и какой выход?

Присваивать переменной, которую проверяешь, ссылку на форму...


 
MZ   (2007-04-02 11:42) [8]


> Объясни, зачем нужно MDI-приложение с одной-единственной
> MDIChild-формой ?

MDI форма не одна. Должно бать не mjktt одной MDI-формы одного класса. Уже разобрался. Всем спасибо. Особенно Рамиль.



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

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

Наверх




Память: 0.48 MB
Время: 0.031 c
2-1178813708
Angelka
2007-05-10 20:15
2007.05.27
Рабочая группа компьютера


1-1175582214
kyn66
2007-04-03 10:36
2007.05.27
Многоэтажные строки DBGrigEh


1-1174310573
kodov
2007-03-19 16:22
2007.05.27
Поиск в ListBox


3-1173777363
Bk
2007-03-13 12:16
2007.05.27
FIBPlus - выдать список таблиц из БД


2-1178283424
ElectriC
2007-05-04 16:57
2007.05.27
RandomRange