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

Вниз

Реакция на MenuItem.OnClick   Найти похожие ветки 

 
GrayWolf   (2003-03-24 09:22) [0]

Суть такова: динамически создаю пункт меню в DLL для основного окна приложения, которое грузит эту библиотеку. Для него создаю подпункт и ставлю на событие OnClick некую реакцию. Прикол вот в чем: если я ставлю событие на первый пункт меню, то тогда все нормально, все работает. А вот если ставлю на второй, дочерний по отношению к первому, пункт меню, то ничерта не выходит. Причем, как выяснилось, это актуально для любых пунктов, созданых не первыми! Если кто подскажет в чем дело, буду очень признателен... Ну и собственно, код:

procedure Connect(MainApp: TApplication; MainMenu: TMainMenu);
begin
Application:=MainApp;
{создаем "родительский" пункт меню RootMenuItem}
...
{создаем "дочерний" пункт меню}
ChildMenuItem:=TMenuItem.Create(MainMenu);
ChildMenuItem.Caption:="Название";
with TMethod(LHandler) do
begin
Data:=nil;
Code:=@ShowMainForm;
end;
ChildMenuItem.OnClick:=LHandler;
RootMenuItem.Add(ChildMenuItem);
end;


 
GrayWolf   (2003-03-25 15:42) [1]

Тяжелый, видно, вопрос... :(
Или просто сюда никто не заглядывал?



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

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

Наверх




Память: 0.46 MB
Время: 0.037 c
4-19931
Donatas
2003-02-07 11:39
2003.04.07
mesages


1-19585
Tornado
2003-03-28 14:14
2003.04.07
Memo


3-19421
galexis
2003-03-17 18:40
2003.04.07
Запрос SQL с конвертацией типа переменно


3-19473
Дмитрий К.К.
2003-03-18 06:29
2003.04.07
Еще раз о BDE


7-19876
shane54
2003-02-12 00:46
2003.04.07
Размер task bar а