Стандартные Action - как выполнить по ним свой код?

← →
tria (2003-12-30 20:07) [0]

Подскажите, плиз.
Есть на форме ActionList, в нем стандартные Action из раздела Edit (копирование/вставка в буфер обмена). Как сделать так, чтобы в нужных для меня случаях копировал/вставлял из буфера я (програмно), а в прочих-срабатывала системная функция?

← →
YuRock (2003-12-30 20:40) [1]

Action1.OnExecute := <имя метода типа TNotifyEvent>

← →
tria (2003-12-30 20:47) [2]

Это понятно. А как в методе <имя метода типа TNotifyEvent> выполнить стандартное действие по копированию выделенного в данный момент фрагмента в каком-то поле ввода? (мне нужно, чтобы если выделен грид, то по данной команде копировалась в буфер выделенная область, во всех остальных случаях - чтобы происходило стандартное копирование в буфер обмена).

← →
YuRock (2003-12-30 20:53) [3]

if Grid1.Focused then begin ... Edit1.CopyToClipboard; ... end;
Что-то все слишком просто. Может, я чего-то не понял?

← →
tria (2003-12-31 11:34) [4]

Вроде как нашел решение сам:

If rGr.Focused Then <делаю чего надо>
Else EditCopy1.ExecuteTarget(ActiveControl);

Поправьте меня пож., если я не разобрался.

Стандартные Action - как выполнить по ним свой код? Найти похожие ветки