Do not activate pad with TButton

Author: linev

modules/gpad/TCanvasPainter.mjs

@@ -621,12 +621,12 @@ class TCanvasPainter extends TPadPainter {
    selectActivePad(pad_painter, obj_painter, click_pos) {
       if (!this.snapid || !pad_painter) return; // only interactive canvas
 
-      let arg = null, ischanged = false;
+      let arg = null, ischanged = false, is_button = pad_painter.matchObjectType('TButton');
 
       if (pad_painter.snapid && this._websocket)
          arg = { _typename: 'TWebPadClick', padid: pad_painter.snapid.toString(), objid: '', x: -1, y: -1, dbl: false };
 
-      if (!pad_painter.is_active_pad) {
+      if (!pad_painter.is_active_pad && !is_button) {
          ischanged = true;
          this.forEachPainterInPad(pp => pp.drawActiveBorder(null, pp === pad_painter), 'pads');
       }
@@ -643,7 +643,7 @@ class TCanvasPainter extends TPadPainter {
          if (click_pos.dbl) arg.dbl = true;
       }
 
-      if (arg && ischanged)
+      if (arg && (ischanged || is_button))
          this.sendWebsocket('PADCLICKED:' + toJSON(arg));
    }