如何使自定义 ComboBox (OwnerDrawFixed) 看起来像标准 ComboBox 一样 3D?
我正在制作一个自定义 ComboBox,继承自 Winforms 的标准 ComboBox。对于我的自定义 ComboBox,我将 DrawMode
设置为 OwnerDrawFixed
,将 DropDownStyle
设置为 DropDownList
。然后我编写自己的 OnDrawItem
方法。但我最终是这样的:
如何使我的自定义组合框看起来像标准组合框?
更新1:ButtonRenderer
在四处搜索后,我发现了 <代码>ButtonRenderer类。它提供了一个 DrawButton
静态/共享方法——顾名思义——绘制正确的 3D 按钮。我现在正在尝试。
更新 2:什么会覆盖我的控件?
我尝试使用我能想到的各种对象的 Graphics 属性,但总是失败。最后,我尝试了表单的图形,显然有东西覆盖了我的按钮。
代码如下:
Protected Overrides Sub OnDrawItem(ByVal e As System.Windows.Forms.DrawItemEventArgs)
Dim TextToDraw As String = _DefaultText
__Brush_Window.Color = Color.FromKnownColor(KnownColor.Window)
__Brush_Disabled.Color = Color.FromKnownColor(KnownColor.GrayText)
__Brush_Enabled.Color = Color.FromKnownColor(KnownColor.WindowText)
If e.Index >= 0 Then
TextToDraw = _DataSource.ItemText(e.Index)
End If
If TextToDraw.StartsWith("---") Then TextToDraw = StrDup(3, ChrW(&H2500)) ' U+2500 is "Box Drawing Light Horizontal"
If (e.State And DrawItemState.ComboBoxEdit) > 0 Then
'ButtonRenderer.DrawButton(e.Graphics, e.Bounds, VisualStyles.PushButtonState.Default)
Else
e.DrawBackground()
End If
With e
If _IsEnabled(.Index) Then
.Graphics.DrawString(TextToDraw, Me.Font, __Brush_Enabled, .Bounds.X, .Bounds.Y)
Else
'.Graphics.FillRectangle(__Brush_Window, .Bounds)
.Graphics.DrawString(TextToDraw, Me.Font, __Brush_Disabled, .Bounds.X, .Bounds.Y)
End If
End With
TextToDraw = Nothing
ButtonRenderer.DrawButton(Me.Parent.CreateGraphics, Me.ClientRectangle, VisualStyles.PushButtonState.Default)
'MyBase.OnDrawItem(e)
End Sub
结果如下:
将 Me.Parent.CreateGraphics
替换为 < code>e.Graphics 给了我这个:
并执行上述操作 + 替换 Me。 ClientRectangle
和 e.Bounds
给了我这个:
谁能指点我我必须将谁的 Graphics 用于 ButtonRenderer.DrawButton
方法?
PS:蓝色边框是由于我使用 PushButtonState.Default 而不是 PushButtonState.Normal
我找到了答案! (见下文)
I am making a custom ComboBox, inherited from Winforms' standard ComboBox. For my custom ComboBox, I set DrawMode
to OwnerDrawFixed
and DropDownStyle
to DropDownList
. Then I write my own OnDrawItem
method. But I ended up like this:
How do I make my Custom ComboBox to look like the Standard one?
Update 1: ButtonRenderer
After searching all around, I found the ButtonRenderer
class. It provides a DrawButton
static/shared method which -- as the name implies -- draws the proper 3D button. I'm experimenting with it now.
Update 2: What overwrites my control?
I tried using the Graphics properties of various objects I can think of, but I always fail. Finally, I tried the Graphics of the form, and apparently something is overwriting my button.
Here's the code:
Protected Overrides Sub OnDrawItem(ByVal e As System.Windows.Forms.DrawItemEventArgs)
Dim TextToDraw As String = _DefaultText
__Brush_Window.Color = Color.FromKnownColor(KnownColor.Window)
__Brush_Disabled.Color = Color.FromKnownColor(KnownColor.GrayText)
__Brush_Enabled.Color = Color.FromKnownColor(KnownColor.WindowText)
If e.Index >= 0 Then
TextToDraw = _DataSource.ItemText(e.Index)
End If
If TextToDraw.StartsWith("---") Then TextToDraw = StrDup(3, ChrW(&H2500)) ' U+2500 is "Box Drawing Light Horizontal"
If (e.State And DrawItemState.ComboBoxEdit) > 0 Then
'ButtonRenderer.DrawButton(e.Graphics, e.Bounds, VisualStyles.PushButtonState.Default)
Else
e.DrawBackground()
End If
With e
If _IsEnabled(.Index) Then
.Graphics.DrawString(TextToDraw, Me.Font, __Brush_Enabled, .Bounds.X, .Bounds.Y)
Else
'.Graphics.FillRectangle(__Brush_Window, .Bounds)
.Graphics.DrawString(TextToDraw, Me.Font, __Brush_Disabled, .Bounds.X, .Bounds.Y)
End If
End With
TextToDraw = Nothing
ButtonRenderer.DrawButton(Me.Parent.CreateGraphics, Me.ClientRectangle, VisualStyles.PushButtonState.Default)
'MyBase.OnDrawItem(e)
End Sub
And here's the result:
Replacing Me.Parent.CreateGraphics
with e.Graphics
got me this:
And doing the above + replacing Me.ClientRectangle
with e.Bounds
got me this:
Can anyone point me whose Graphics I must use for the ButtonRenderer.DrawButton
method?
PS: The bluish border is due to my using PushButtonState.Default instead of PushButtonState.Normal
I Found An Answer! (see below)
如果你对这篇内容有疑问,欢迎到本站社区发帖提问 参与讨论,获取更多帮助,或者扫码二维码加入 Web 技术交流群。
绑定邮箱获取回复消息
由于您还没有绑定你的真实邮箱,如果其他用户或者作者回复了您的评论,将不能在第一时间通知您!
发布评论
评论(2)
我忘记了在哪里找到答案...当我记得时我会编辑这个答案。
但显然,我需要设置
Systems.Windows.Forms.ControlStyles
标志。特别是ControlStyles.UserPaint
标志。所以,我的
New()
现在看起来像这样:现在我可以挂接到
OnPaint
事件:注意: 是的,
_ButtonArea
矩形必须向各个方向(上、下、左、右)放大 1 像素,否则会有 1 像素的“周长” ' 在显示垃圾的 ButtonRenderer 周围。让我疯狂了一段时间,直到我读到我必须放大控件的ButtonRenderer 的矩形。I forgot where I found the answer... I'll edit this answer when I remember.
But apparently, I need to set the
Systems.Windows.Forms.ControlStyles
flags. Especially theControlStyles.UserPaint
flag.So, my
New()
now looks like this:And now I can hook into the
OnPaint
event:Note: Yes, the
_ButtonArea
rectangle must be enlarged by 1 pixel to all directions (up, down, left, right), or else there will be a 1-pixel 'perimeter' around the ButtonRenderer that shows garbage. Made me crazy for awhile until I read that I must enlarge the Control's rect for ButtonRenderer.我自己也遇到了这个问题,回复由pepoluan 让我开始了。我仍然认为为了获得外观和行为类似于具有 DropDownStyle=DropDownList 的标准 ComboBox 的 ComboBox,还缺少一些东西。
下拉箭头
我们还需要绘制 DropDownArrow。我尝试了 ComboBoxRenderer,但它在下拉箭头区域周围绘制了一个黑色边框,因此不起作用。
我的最终解决方案是简单地绘制一个类似的箭头并将其渲染到 OnPaint 方法中的按钮上。
热门商品行为
我们还需要确保我们的 ComboBox 具有与标准 ComboBox 类似的热门项目行为。我不知道有什么简单可靠的方法可以知道鼠标何时不再位于控件之上。因此,我建议使用计时器在每次滴答时检查鼠标是否仍在控件上。
编辑
刚刚添加了一个 KeyUp 事件处理程序,以确保使用键盘进行选择时控件能够正确更新。还对文本的呈现位置进行了细微的修正,以确保它更类似于香草组合框的文本定位。
下面是我定制的ComboBox的完整代码。它允许您在每个项目上显示图像,并且始终以 DropDownList 样式呈现,但希望它应该很容易将代码适应您自己的解决方案。
I had this problem myself and the reply by pepoluan got me started. I still think a few things are missing in order to get a ComboBox with looks and behavior similar to the standard ComboBox with DropDownStyle=DropDownList though.
DropDownArrow
We also need to draw the DropDownArrow. I played around with the ComboBoxRenderer, but it draws a dark border around the area of the drop down arrow so that didn't work.
My final solution was to simply draw a similar arrow and render it onto the button in the OnPaint method.
Hot Item Behavior
We also need to ensure our ComboBox has a hot item behavior similar to the standard ComboBox. I don't know of any simple and reliable method to know when a mouse is no longer above the control. Therefore I suggest using a Timer that checks at each tick whether the mouse is still over the control.
Edit
Just added a KeyUp event handler to make sure the control would update correctly when a selection was made using the keyboard. Also made a minor correction of where the text was rendered, to ensure it is more similar to the vanilla combobox' text positioning.
Below is the full code of my customized ComboBox. It allows you to display images on each item and is always rendered as in the DropDownList style, but hopefully it should be easy to accommodate the code to your own solution.