WinForms 文本框内的按钮

Question

WinForms 文本框是否有任何属性可以使嵌入按钮在框的末尾成为可能？

类似于 Chrome 地址框上的收藏按钮：

我还在一些 Excel 表单中看到类似以下内容：

---

编辑

我已经按照 Hans Passant 的回答添加了一个点击事件处理程序，它似乎工作正常：

protected override void OnLoad(EventArgs e) {
    var btn = new Button();
    btn.Size = new Size(25, textBoxFolder.ClientSize.Height + 2);
    btn.Location = new Point(textBoxFolder.ClientSize.Width - btn.Width, -1);
    btn.Cursor = Cursors.Default;
    btn.Image = Properties.Resources.arrow_diagright;
    btn.Click += btn_Click;     
    textBoxFolder.Controls.Add(btn);
    // Send EM_SETMARGINS to prevent text from disappearing underneath the button
    SendMessage(textBoxFolder.Handle, 0xd3, (IntPtr)2, (IntPtr)(btn.Width << 16));
    base.OnLoad(e);
}

[System.Runtime.InteropServices.DllImport("user32.dll")]
private static extern IntPtr SendMessage(IntPtr hWnd, int msg, IntPtr wp, IntPtr lp);

private void btn_Click(object sender, EventArgs e) {
    MessageBox.Show("hello world");
}

Answer 1

获取 TextBox 内的按钮只需将其添加到框的 Controls 集合中。您还需要做一些合理的事情来防止框内的文本消失在按钮下方；这需要一点点pinvoke。像这样：

    protected override void OnLoad(EventArgs e) {
        var btn = new Button();
        btn.Size = new Size(25, textBox1.ClientSize.Height + 2);
        btn.Location = new Point(textBox1.ClientSize.Width - btn.Width, -1);
        btn.Cursor = Cursors.Default;
        btn.Image = Properties.Resources.star;
        textBox1.Controls.Add(btn);
        // Send EM_SETMARGINS to prevent text from disappearing underneath the button
        SendMessage(textBox1.Handle, 0xd3, (IntPtr)2, (IntPtr)(btn.Width << 16));
        base.OnLoad(e);  
    }

    [System.Runtime.InteropServices.DllImport("user32.dll")]
    private static extern IntPtr SendMessage(IntPtr hWnd, int msg, IntPtr wp, IntPtr lp);

当我测试右边距时看起来像这样（应该选择更漂亮的位图）：

Answer 2

这是包含在 TextBox 子类中的答案。

public class ButtonTextBox : TextBox {
    private readonly Button _button;

    public event EventHandler ButtonClick { add { _button.Click += value; } remove { _button.Click -= value; } }

    public ButtonTextBox() {
        _button = new Button {Cursor = Cursors.Default};
        _button.SizeChanged += (o, e) => OnResize(e);
        this.Controls.Add(_button); 
    }

    public Button Button {
        get {
            return _button;
        }
    }

    protected override void OnResize(EventArgs e) {
        base.OnResize(e);
        _button.Size = new Size(_button.Width, this.ClientSize.Height + 2);
        _button.Location = new Point(this.ClientSize.Width - _button.Width, -1);
        // Send EM_SETMARGINS to prevent text from disappearing underneath the button
        SendMessage(this.Handle, 0xd3, (IntPtr)2, (IntPtr)(_button.Width << 16));
    }

    [System.Runtime.InteropServices.DllImport("user32.dll")]
    private static extern IntPtr SendMessage(IntPtr hWnd, int msg, IntPtr wp, IntPtr lp);

}

Answer 3

我在 Reflector 中看到 Control 包含“SendMessage(int,int,int)”方法，我找到了另一种方法。

using System;
using System.Reflection;
using System.Windows.Forms;

static class ControlExtensions
{
    static BindingFlags flags = BindingFlags.Instance | BindingFlags.NonPublic;
    static Type[] SendMessageSig = new Type[] { typeof(int), typeof(int), typeof(int) };

    internal static IntPtr SendMessage(this Control control, int msg, int wparam, int lparam)
    {
        MethodInfo MethodInfo = control.GetType().GetMethod("SendMessage", flags, null, SendMessageSig, null);

        return (IntPtr)MethodInfo.Invoke(control, new object[] { msg, wparam, lparam });
    }
}

现在通过重写ButtonTextBox中的WndProc我们可以达到预期的效果。

public class ButtonTextBox : TextBox
{
    Button button;

    public ButtonTextBox()
    {
        this.button = new Button();
        this.button.Dock = DockStyle.Right;
        this.button.BackColor = SystemColors.Control;
        this.button.Width = 21;
        this.Controls.Add(this.button);
    }

    protected override void WndProc(ref Message m)
    {
        base.WndProc(ref m);

        switch (m.Msg)
        {
            case 0x30:
                int num = this.button.Width + 3;
                this.SendMessage(0xd3, 2, num << 16);
                return;
        }
    }
}

而且我认为这是更安全的方式。

Answer 4

如果您愿意添加对另一个库的引用，可以考虑使用 Krypton Toolkit（可在 https://github.com/ComponentFactory/Krypton 获得）。您应该能够免费使用的基本工具包（没有功能区、导航器或工作区功能）允许您将“按钮规格”添加到各种控件（包括文本框），这些控件在视觉上与您描述的一样。

Answer 5

只需对已接受的解决方案进行小幅扩展，就需要对按钮进行一些调整。以下是搜索框的调整：

    private static readonly int SEARCH_BUTTON_WIDTH = 25;

    private void ConfigureSearchBox()
    {
        var btn = new Button();
        btn.Size = new Size(SEARCH_BUTTON_WIDTH, searchBox.ClientSize.Height + 2);
        btn.Dock = DockStyle.Right;
        btn.Cursor = Cursors.Default;
        btn.Image = Properties.Resources.Find_5650;
        btn.FlatStyle = FlatStyle.Flat;
        btn.ForeColor = Color.White;
        btn.FlatAppearance.BorderSize = 0;
        btn.Click += btn_Click;
        searchBox.Controls.Add(btn);
        this.AcceptButton = btn;
        // Send EM_SETMARGINS to prevent text from disappearing underneath the button
        SendMessage(searchBox.Handle, 0xd3, (IntPtr)2, (IntPtr)(btn.Width << 16));
    }

    [System.Runtime.InteropServices.DllImport("user32.dll")]
    private static extern IntPtr SendMessage(IntPtr hWnd, int msg, IntPtr wp, IntPtr lp);

    private void btn_Click(object sender, EventArgs e)
    {
        MessageBox.Show("hello world");
    }

Answer 6

没有。为了做类似的事情，您需要创建自己的用户控件。它可以很容易地从文本框和按钮组合在一起。困难在于，如果您想要与文本框类似的属性，则需要创建所有这些属性。最后是很多代码。

Answer 7

对 Hans Passant 的好主意的一个小补充 - 如果文本框是可调整大小的，您可以添加一个绑定到底层按钮，以便它的 Location 也可以根据 ClientSize 的变化进行调整：

    //Adjust the Location of the button on Size Changes of the containing textBox.
    var binding = new Binding("Location", textBox1, "ClientSize");
    binding.Format += (s, e) => e.Value = e.Value is Size ? new Point(((Size)e.Value).Width - btn.Width, -1) : new Point(0, 0);
    btn.DataBindings.Add(binding);