设计器

优化
2022-11-21 17:07:17 +08:00
parent fd9ebea849
commit ed11a1ca8f
2 changed files with 8 additions and 46 deletions
@@ -4465,7 +4465,7 @@ type TcustomToolButton=class(tcomponent)
            begin
                if d=ShortCut then
                begin
-                    DoOnClick(self,new tuieventbase(0,0,0,0));
+                    DoOnClick(self(true),new tuieventbase(0,0,0,0));
                    return "havedoshortcut";
                end
            end