let
_Pointer_DblClick4 : keysym = 0xFEF2