Set a menu Shortcut yo EditClear

I wanded a Shortcut to EditClear on MacOS, then remember that I need it macOS âbdkWindwos.

This is what I finally get:

Sub Opening() Handles Opening

  #If TargetWindows
    EditClear.Shortcut = "Ctrl+Delete"
  #ElseIf TargetMacOS
    EditClear.Shortcut = "Cmd-Backspace"
  #EndIf
End Sub

On the Windows Laptop (Toshiba), the suppr key worked fine with Ctrl+Delete.
I wa not able to get the Delete Key (another key <> from suppr working.

What do you use to get the WIndows Delete keynerasing the selection ?

Tested with WIndows 10 (I think) / Xojo 2025r1.