Скачать: CL | DM;

MDI интерфейс   Найти похожие ветки 

← →
alexey_mas ©   (2007-03-07 16:31) [0]

Прошу помочь с несколькими вопросами по MDI интерфейсу.
Есть MDIForm форма и несколько MDIChild форм.
нужно чтобы MDIChild форма запускалась один раз только.
делаю так:

procedure TMainForm.Work_stationClick(Sender: TObject);
var
f:Tadmin_station;
begin

if Assigned(admin_station) then
   admin_station.BringToFront
 else
 begin
   f:= Tadmin_station.Create(Application);
   f.Show;
 end;
end;

//admin_station- имя MDIChild формы

В результате на сторку admin_station.BringToFront никогда не попадаю. Assigned всегда false. И создается несколько форм. Почему Assigned всегда false?

Также на главную форму кидаю Panel. При появлении окон MDIChild панель перекрывает их(т.е. панель всегда получается сверху). Как сделать чтобы панель была видна только на главном окне?

Заранее спасибо.

---

← →
SlymRO ©   (2007-03-07 16:34) [1]

procedure TMainForm.Work_stationClick(Sender: TObject);
begin
if Assigned(admin_station) then
  admin_station.BringToFront
else
begin
  admin_station:= Tadmin_station.Create(Application);
end;
end;

---

← →
alexey_mas ©   (2007-03-07 16:41) [2]

спасибо получилось.
а по поводу панели не подскажешь?

---

← →
NiGGa ©   (2007-03-07 17:06) [3]

Свойство Parent у дочерних форм есть
MDIChildForm.Parent := MDIForm.Panel

---

← →
Плохиш ©   (2007-03-07 17:07) [4]

MDIMainForm не преднозначена для кидания на неё в область отображения MDIChildForm каких-либо визуальных компонентов.

---

← →
NiGGa ©   (2007-03-07 17:17) [5]

Соврал, прошу прощения

---

← →
Amoeba ©   (2007-03-07 19:09) [6]

> alexey_mas ©   (07.03.07 16:31)
>
> Прошу помочь с несколькими вопросами по MDI интерфейсу.
> Есть MDIForm форма и несколько MDIChild форм.
> нужно чтобы MDIChild форма запускалась один раз только.
> делаю так:

Задача изначально противоречит идеологии  MDI.

---

← →
Аноним   (2007-03-07 20:04) [7]

> Amoeba ©


> Задача изначально противоречит идеологии  MDI.

Не обязательно.
Один класс чайлда может и правда быть максимум в одном экземпляре, а другие уже во многих

---

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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.013 c