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

Вниз

MainMenu - ActionList , замена свойства Caption   Найти похожие ветки 

 
NKT   (2007-08-14 16:41) [0]

Добрый день господа !
Есть MainMenu , при клике на пункт 1 , 2 и т.д. выполняется  одно и то же действие , чтобы не обрабатывать у каждого пункта меню, использую   ActionList .
Необходимо , чтобы свойство Caption менялось :
with Sender as TMenuItem do begin
  case Tag of
  1:Action7.Caption := "AAAAAA";
  2: Action7.Caption := "DDDDDDD";
  end;
 end;

на строке with Sender as TMenuItem do begin
выдает ошибку : Invalid class typecast .

В чем причина ?
Всем спасибо .


 
MBo ©   (2007-08-14 16:44) [1]

>В чем причина ?
В том, что Sender - TAction
см. TAction.ActionComponent



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

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

Наверх




Память: 0.46 MB
Время: 0.018 c
2-1191758472
schaps
2007-10-07 16:01
2007.10.28
Вопрос по Exlib. Не выводит сумму в Edit15


15-1191481433
boriskb
2007-10-04 11:03
2007.10.28
Не новая тема. Напоминалка


1-1186853373
JanMihail
2007-08-11 21:29
2007.10.28
Как определить запущенные приложения в Windows?


2-1191351217
Pacific
2007-10-02 22:53
2007.10.28
нажатие


2-1191492265
031178
2007-10-04 14:04
2007.10.28
ACCESS & DELPHI