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

Создание Меню из DLL   Найти похожие ветки 

← →
Alkmas   (2004-05-04 12:58) [0]

Здравствуйте все!

В DLL передаю Application.
Создаю главное меню из DLL:

var
 MainMenu : TMainMenu;
 MenuItem : TMenuItem;
begin
 MainMenu := TMainMenu(Application.MainForm.FindComponent("MainMenu"));
 MainMenu := TMainMenu.Create(Application.MainForm);
 MainMenu.Name := "MainMenu";
 MainMenu.Tag := 0;
 MenuItem := TMenuItem.Create(Application.MainForm);
 MainMenu.Items.Add(MenuItem);
 MenuItem.Caption := "Файл";

Но меню не появляется.

С уважением Александр.

---

← →
Gero ©   (2004-05-04 13:01) [1]

> MainMenu := TMainMenu(Application.MainForm.FindComponent("MainMenu"));

Эта строчка не нужна.

Осталось в конец этого кода добавить Application.MainForm.Menu := MainMenu.

---

← →
Alkmas   (2004-05-04 13:07) [2]

Большое спасибо Gero!!!

Получилось !!!

---

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

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



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