我需要删除按钮焦点矩形,因为在单击按钮后它在TBitBtn字形上看起来很糟糕.
解决方法
您可以为TBitBtn创建一个Interposer类并覆盖SetButtonStyle,防止它的内部IsFocused变量被设置：
type
TBitBtn = class(Buttons.TBitBtn)
protected
procedure SetButtonStyle(ADefault: Boolean); override;
end;
...
implementation
procedure TBitBtn.SetButtonStyle(ADefault: Boolean);
begin
inherited SetButtonStyle(False);
end;