Что-то не получается в TPopumMenu один из TMenuItem сделать

← →
Вован (2003-09-09 11:57) [0]

как Checked.
Может кто подскажет последовательность движений?
TMenuItem привязан к TAction.

← →
Skier (2003-09-09 12:02) [1]

Покажи как делаешь

← →
stone (2003-09-09 12:07) [2]

> как Checked.

нужно делать
> TAction.

← →
Вован (2003-09-09 12:21) [3]

У меня на форме TActionList с TAction который выбран в TMenuItem
и мне надо чтобы когда я правой кнопкой нажимаю на гриде, к котрому прицеплен TPopupMenu в котором сидит TMenuItem, этот TMenuItem был то с галочкой в зависимости от данных из TDataSet прикрученного к TDBGrid.

← →
Вован (2003-09-09 12:23) [4]

А выставлять Checked в TMenuItem я так понял надо в OnPopup у TPopupMenu

← →
clickmaker (2003-09-09 12:29) [5]

if <Данные из TDataSet прикрученного к TDBGrid удовл. условию> then
MenuItem.Action.Checked := true;

Можно еще в TAction.OnUpdate это делать, скажем, в зависимости от текущей записи в гриде

← →
Вован (2003-09-09 12:54) [6]

Отрабатывется вот этот код:
if (Optinos and dro_Fixed)=dro_Fixed then
TAction(MISwitchFixed.Action).Checked:=true

а галочка, не поялвяется, чегото, моджнт гдето надо что-то еще?

← →
Вован (2003-09-09 13:09) [7]

Может что-то надо с AutoCheck сделать?

Что-то не получается в TPopumMenu один из TMenuItem сделать Найти похожие ветки