delphi - 如何修复 TComboBox Ctl3D 属性错误？

Question

这是来自 TForm 的图像，其中顶部有一个 TEdit ，下面有一个 TComboBox 。

正如您所看到的，TEdit 没有 Windows 控件默认主题的经典 3D 边框。这是因为我将该组件的 Ctl3D 属性 设置为 False。然后您会看到 TComboBox 具有正常的 3D 边框，但在本例中，我还将该组件的 Ctl3D 属性 设置为 False，但它仍然显示 3D 边框.

这似乎是开发级别的 Delphi 错误。我怎样才能在代码中解决这个问题？

<小时/>

测试 RRUZ 答案后，BevelKind=bkFlat，结果如下:

我不知道为什么它如此不同......而且很奇怪。 :-/

Answer 1

您可以删除 3D 边框设置 BevelKind TComboBox的属性(property)到bkFlat。