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

Организация MDI проектов или меню, толбары в MDI приложениях.   Найти похожие ветки 

← →
Sectey ©   (2002-11-15 11:20) [0]

Доброе время суток уважаемые мастера.
Если вас это не затруднит, я бы хотел выслушать ваше мнение.
Я нахожусь на распутье и не могу понять каким путем двигаться.
Необходимо написать MDI приложение, в котором есть окон у которых есть индивидуальные и общие функции.
Вот мои мысли:
1. MainMenu - при активизации все функции которые есть в Основно окне заменяются дочерними, если нет то добавляются. А при потере фокуса все возвращается на прежнее место.
2. ToolBar (тобишь кнопки)
а. При активизаци дочерней формы ToolBar переносить на родительскую, а при потере фокуса делать невидемым. Недостатки моргания ToolBar при смене окна.
б. Подход 1С вывести все кнопки в зависимости от панели, а потом в зависимости от окна, активизировать требуемые. Недостатки необходимо в ручную переопредилять комбинацию рабочих кнопок.

Хотелось бы знать кто как делает.
Мысли другого человека дают мысли для размышления.
Зараее блогадарен за любой ответ.

---

← →
Reindeer Moss Eater   (2002-11-15 12:09) [1]

Чтобы у MDIChild было меню:
Добавляем TMainMenu, TToolBar(пустой) и после создания MDIChild выполняем:

SetToolBarFromMenu(ToolBar1,MainMenu1.Items);

procedure SetToolBarFromMenu(ToolBar: TToolBar; Items: TMenuItem);
var i: integer; Button: TToolButton;
begin
for i := Pred(Items.Count) downto 0 do
begin
Button := TToolButton.Create(ToolBar.Owner);
with Button do
begin
Parent := ToolBar;
MenuItem := Items[i];
Grouped := True;
AutoSize := True;
end;
end;
ToolBar.Font.Assign(Screen.MenuFont);
end;

---

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

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



Память: 0.45 MB
Время: 0.012 c