Delphi/C++Builder アクションリストやメニューにコピペなんかのショートカットキーを割り付けると

アクションリストやメニューにコピペなんかのショートカットキーを割り付けると、Ctrl + X/C/V のイベントを全部持ってかれて、ちょっと表示した検索エディット等でペーストできなかったりするので、目的のコントロール以外は、(貼り付けの場合)WM_PASTE を送っておく

view plainprint?

1. // Paste  
2. if (ActiveControl = HogeControl) then begin  
3.   
4. end else begin  
5.     SendMessage(ActiveControl.Handle, WM_PASTE, 0, 0);  
6. end;  

    // Paste
    if (ActiveControl = HogeControl) then begin

    end else begin
        SendMessage(ActiveControl.Handle, WM_PASTE, 0, 0);
    end;