Как применить 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.

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

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

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

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

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