Вниз
Скачать: 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
4-30198
viper
2003-01-20 14:43
2003.03.10
Запущено ли приложение..


1-29863
Sandman
2003-02-28 11:28
2003.03.10
OLE: OpenText и Dialog.Show в Excel.Workbooks


7-30171
rover
2003-01-09 15:39
2003.03.10
Кассовый аппарат


1-29805
Шурик Ш
2003-02-27 18:15
2003.03.10
А можно ли выровнять колонку StringGrid а по правому краю?


14-30112
Anar
2003-02-22 23:57
2003.03.10
Где достать красивые шрифты?




   Наверх