Вниз
Скачать: CL | DM;

Как применить TAction одновременно к меню и кнопке?   Найти похожие ветки 

 
ЮРИЙ_К ©   (2003-02-27 08:49) [0]

Решил попробовать применить TAction. Только как прописать действия для пункта меню и кнопки на тулбаре, если у меню пункт должен получить ся Checked, а кнопка Down???


 
Юрий Зотов ©   (2003-02-27 09:24) [1]

Все действия производите не напрямую с кнопкой или пунктом меню, а с Action:

Action.Checked := True;
Action.Enabled := False;
и т.д.

Все это отобразится на кнопке и пункте меню автоматически.



 
ЮРИЙ_К ©   (2003-02-27 10:35) [2]

>> Юрий Зотов
В том-то и дело, что пункт меню имеет свойство Checked, а кнопка должна принять Down. Я же не могу на Action повесить два свойства 8-(((


 
Wind2000   (2003-02-27 10:56) [3]

Просто и к пункту меню и к кнопке на тулбаре в свойство Action прописываешь название твоего экшна. После этого визуальное отображение и пункта меню и кнопки зависит от состояния экшна.


 
100ляров   (2003-02-27 10:59) [4]

Если кнопка тулбара и пункт меню связаны с объектом TAction, то свойство Checked у TAction обпределяет нажата ли кнопка и отмечен ли пункт меню.
Для кнопки лучше еще прописать свойство Style:=tbsCheck.


 
Subforest ©   (2003-02-27 11:22) [5]

Вообщето всё замечательно работает

procedure TForm1.Action1Execute(Sender: TObject);
begin
Action1.Checked:=not(Action1.Checked);
end;

изменяет нажатие/выделение как на кнопке, так и в пункте меню, даже ToolButton.Style в tbsCheck ставить не обязательно



 
ЮРИЙ_К ©   (2003-02-27 13:31) [6]

Други мои! Ну не работает ни хрена. Нажимаю на кнопку тулбара - она становится в Down и на меню появляется птица. На жимаю на пункт меню - птица появляется, однако кнопка тулбара не даунится зараза. 8-((( Неуж-то Action может распознать, кому галочку впихнуть, а кого задаунить ???



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

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



Память: 0.46 MB
Время: 0.011 c
1-29813
SeNtiMeL
2003-02-23 00:20
2003.03.10
Как читать коммандную строку ????


14-30009
kofman
2003-02-22 00:10
2003.03.10
Компиляция chm-файлов


14-30048
Alexanders
2003-02-20 12:02
2003.03.10
Уровень записи


7-30156
Big_Rom
2003-01-01 18:57
2003.03.10
печать квитанции с максимальной скоростью


14-30058
Supreme
2003-02-18 14:36
2003.03.10
Как усовершенствовать приобретённые навыки?




   Наверх