Watermark TextBox w WinForms

Zaktualizowałem odpowiedź udzieloną przez @ Hans Passant powyżej, aby wprowadzić stałe, aby były zgodne z pinvoke.net definicje i aby Kod przeszedł walidację FxCop.

class CueTextBox : TextBox
{
    private static class NativeMethods
    {
        private const uint ECM_FIRST = 0x1500;
        internal const uint EM_SETCUEBANNER = ECM_FIRST + 1;

        [DllImport("user32.dll", CharSet = CharSet.Unicode)]
        public static extern IntPtr SendMessage(IntPtr hWnd, UInt32 Msg, IntPtr wParam, string lParam);
    }

    private string _cue;

    public string Cue
    {
        get
        {
            return _cue;
        }
        set
        {
            _cue = value;
            UpdateCue();
        }
    }

    private void UpdateCue()
    {
        if (IsHandleCreated && _cue != null)
        {
            NativeMethods.SendMessage(Handle, NativeMethods.EM_SETCUEBANNER, (IntPtr)1, _cue);
        }
    }

    protected override void OnHandleCreated(EventArgs e)
    {
        base.OnHandleCreated(e);
        UpdateCue();
    }
}

Edit: zaktualizuj wywołanie PInvoke, aby ustawić atrybut CharSet, aby Błąd po bezpiecznej stronie. Więcej informacji można znaleźć na stronie SendMessage pod adresem pinvoke.net .

[DllImport("user32.dll", CharSet = CharSet.Unicode)]
private static extern IntPtr SendMessage(IntPtr hWnd, uint Msg, IntPtr wParam, string lParam);

I stałe wiadomości:

private const uint EM_SETCUEBANNER = 0x1501;
private const uint CB_SETCUEBANNER = 0x1703;    // minimum supported client Windows Vista, minimum supported server Windows Server 2008

I imho najlepszym sposobem na jej wdrożenie jest metoda rozszerzenia.
Tak więc dla kontrolki TextBox składnia będzie:

MyTextBox.CueBanner(false, "Password");

Z kodu:

public static void CueBanner(this TextBox textbox, bool showcuewhenfocus, string cuetext)
{
    uint BOOL = 0;
    if (showcuewhenfocus == true) { BOOL = 1; }

    SendMessage(textbox.Handle, EM_SETCUEBANNER, (IntPtr)BOOL, cuetext); ;
}

Oto implementacja TextBox, która obsługuje wyświetlanie podpowiedzi (lub znaku wodnego lub cue):

• pokazuje również podpowiedź, kiedy MultiLine jest prawdą.
• opiera się na obsłudze WM_PAINT Wiadomości i rysowaniu podpowiedzi. Możesz więc po prostu dostosować podpowiedź i dodać pewne właściwości, takie jak kolor podpowiedzi, lub narysować ją od prawej do lewej lub kontrolować, kiedy pokazać podpowiedź.

using System.Drawing;
using System.Windows.Forms;
public class ExTextBox : TextBox
{
    string hint;
    public string Hint
    {
        get { return hint; }
        set { hint = value; this.Invalidate(); }
    }
    protected override void WndProc(ref Message m)
    {
        base.WndProc(ref m);
        if (m.Msg == 0xf)
        {
            if (!this.Focused && string.IsNullOrEmpty(this.Text)
                && !string.IsNullOrEmpty(this.Hint))
            {
                using (var g = this.CreateGraphics())
                {
                    TextRenderer.DrawText(g, this.Hint, this.Font,
                        this.ClientRectangle, SystemColors.GrayText , this.BackColor, 
                        TextFormatFlags.Top | TextFormatFlags.Left);
                }
            }
        }
    }
}

Jeśli użyjesz EM_SETCUEBANNER, będą 2 problemy. Tekst zawsze będzie wyświetlany w domyślnym systemie kolor. Również tekst nie będzie wyświetlany, gdy TextBox jest MultiLine.

Za pomocą rozwiązania do malowania możesz pokazać tekst w dowolnym kolorze. Możesz również pokazać znak wodny, gdy kontrolka jest wielowierszowa:

Pobierz

Możesz sklonować lub pobrać działający przykład:

• Pobierz Zip
• repozytorium Github

Możesz dodać znak wodny do pola tekstowego (wielowierszowego lub nie), który działa całkiem dobrze, rysując go w różnych zdarzeniach controls Paint. Na Przykład:

    Private Sub Panel1_Paint(sender As Object, e As PaintEventArgs) Handles Panel1.Paint
        If TextBox1.Text = "" Then
            TextBox1.CreateGraphics.DrawString("Enter Text Here", Me.Font, New SolidBrush(Color.LightGray), 0, 0)
        End If
    End Sub

- OO -

Private Sub randomSubName() Handles txtWatermark.Click
   txtWatermark.text = ""
End Sub

Ustaw domyślny tekst pola tekstowego niezależnie od tego, jaki ma być znak wodny, zakładam, że w tym przykładzie nazwiesz pole tekstowe txtWatermark