请教一下怎么让button在获得焦点的时候不显示虚线框

请问一下如何让button在获得焦点的时候不显示虚线框?
请问一下如何让button在获得焦点的时候不显示虚线框?

------解决方案--------------------
在OnEnter事件中，使用DrawFocusRect()。
代码：
var
m_DC: HDC;
...
m_DC:= GetDC(btnControl.handle);
DrawFocusRect(m_DC, Rect(0,0, btncontrol.width, btncontrol.height));