From b49d84b0c7a9de702781a385aea551cc641e4076 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?=E7=AD=B1=E5=82=91?= Date: Tue, 31 May 2022 09:13:39 +0800 Subject: [PATCH] Add TextBoxXP.cs --- .../Controls/TextBoxTip.cs | 0 WinForm/Controls/TextBoxXP.cs | 390 ++++++++++++++++++ 2 files changed, 390 insertions(+) rename TextBoxTip.cs => WinForm/Controls/TextBoxTip.cs (100%) create mode 100644 WinForm/Controls/TextBoxXP.cs diff --git a/TextBoxTip.cs b/WinForm/Controls/TextBoxTip.cs similarity index 100% rename from TextBoxTip.cs rename to WinForm/Controls/TextBoxTip.cs diff --git a/WinForm/Controls/TextBoxXP.cs b/WinForm/Controls/TextBoxXP.cs new file mode 100644 index 0000000..c8105d4 --- /dev/null +++ b/WinForm/Controls/TextBoxXP.cs @@ -0,0 +1,390 @@ +using System; +using System.ComponentModel; +using System.Drawing; +using System.Runtime.InteropServices; +using System.Windows.Forms; + +namespace JumperPelvicFloorTraining.MyControls +{ + [ToolboxItem(true)] + public class TextBoxXP : System.Windows.Forms.TextBox + { + /// + /// 获得当前进程，以便重绘控件 + /// + /// + /// + [DllImport("user32.dll")] + private static extern IntPtr GetWindowDC(IntPtr hWnd); + + [DllImport("user32.dll")] + private static extern int ReleaseDC(IntPtr hWnd, IntPtr hDC); + + private const int EM_SETCUEBANNER = 0x1501; + + [DllImport("user32.dll", CharSet = CharSet.Auto)] + private static extern Int32 SendMessage + (IntPtr hWnd, int msg, int wParam, [MarshalAs(UnmanagedType.LPWStr)] string lParam); + + /// + /// 是否启用热点效果 + /// + private bool _HotTrack = true; + + /// + /// 边框颜色 + /// + private Color _BorderColor = Color.FromArgb(0xFF, 0x77, 0x95); + + /// + /// 热点边框颜色 + /// + private Color _HotColor = Color.FromArgb(0xFF, 0x30, 0x60); + + /// + /// 水印文本 + /// + private string _Watermark = ""; + + /// + /// 是否鼠标MouseOver状态 + /// + private bool _IsMouseOver = false; + + private float maximum; + private float minimum; + + #region 属性 + + /// + /// 是否启用热点效果 + /// + [Category("外观"), + Description("获取或设置输入框水印文本"), + DefaultValue("")] + public string Watermark + { + get + { + return this._Watermark; + } + set + { + this._Watermark = value; + SendMessage(Handle, EM_SETCUEBANNER, 0, _Watermark); + this.Invalidate(); + } + } + + /// + /// 是否启用热点效果 + /// + [Category("行为"), + Description("获得或设置一个值，指示当鼠标经过控件时控件边框是否发生变化。只在控件的BorderStyle为FixedSingle时有效"), + DefaultValue(true)] + public bool HotTrack + { + get + { + return this._HotTrack; + } + set + { + this._HotTrack = value; + //在该值发生变化时重绘控件，下同 + //在设计模式下，更改该属性时，如果不调用该语句， + //则不能立即看到设计试图中该控件相应的变化 + this.Invalidate(); + } + } + + /// + /// 边框颜色 + /// + [Category("外观"), + Description("获得或设置控件的边框颜色"), + DefaultValue(typeof(Color), "#FF7795")] + public Color BorderColor + { + get + { + return this._BorderColor; + } + set + { + this._BorderColor = value; + this.Invalidate(); + } + } + + /// + /// 热点时边框颜色 + /// + [Category("外观"), + Description("获得或设置当鼠标经过控件时控件的边框颜色。只在控件的BorderStyle为FixedSingle时有效"), + DefaultValue(typeof(Color), "#F55378")] + public Color HotColor + { + get + { + return this._HotColor; + } + set + { + this._HotColor = value; + this.Invalidate(); + } + } + + /// + /// 是否只能输入数字 + /// + [Category("行为"), + Description("获取或设置TextBox是否只允许输入数字"), + DefaultValue(false)] + public bool DigitOnly { get; set; } + + /// + /// 转为数值 + /// + public float Number + { + get + { + if (float.TryParse(Text, out float value)) + return value; + else + return 0f; + } + } + + [Category("数据")] + [DefaultValue(0)] + [Description("指示小数点后位数")] + public int DecimalPlaces { get; set; } + + [Category("数据")] + [Description("获取或设置限制的最大值")] + public float Maximum + { + get + { + return maximum; + } + set + { + maximum = value; + if (minimum > maximum) + { + minimum = maximum; + } + } + } + + [Category("数据")] + [Description("获取或设置限制的最小值")] + public float Minimum + { + get + { + return minimum; + } + set + { + minimum = value; + if (minimum > maximum) + { + maximum = value; + } + } + } + + #endregion 属性 + + /// + /// + /// + public TextBoxXP() + : base() + { + BorderStyle = BorderStyle.FixedSingle; + Font = Styles.StaticResources.DefaultFont; + } + + /// + /// 鼠标移动到该控件上时 + /// + /// + protected override void OnMouseMove(MouseEventArgs e) + { + //鼠标状态 + this._IsMouseOver = true; + //如果启用HotTrack，则开始重绘 + //如果不加判断这里不加判断，则当不启用HotTrack， + //鼠标在控件上移动时，控件边框会不断重绘， + //导致控件边框闪烁。下同 + //谁有更好的办法？Please tell me , Thanks。 + if (this._HotTrack) + { + //重绘 + this.Invalidate(); + } + base.OnMouseMove(e); + } + + /// + /// 当鼠标从该控件移开时 + /// + /// + protected override void OnMouseLeave(EventArgs e) + { + this._IsMouseOver = false; + + if (this._HotTrack) + { + //重绘 + this.Invalidate(); + } + base.OnMouseLeave(e); + } + + /// + /// 当该控件获得焦点时 + /// + /// + protected override void OnGotFocus(EventArgs e) + { + if (this._HotTrack) + { + //重绘 + this.Invalidate(); + } + base.OnGotFocus(e); + } + + /// + /// 当该控件失去焦点时 + /// + /// + protected override void OnLostFocus(EventArgs e) + { + if (this._HotTrack) + { + //重绘 + this.Invalidate(); + } + base.OnLostFocus(e); + } + + protected override void OnKeyPress(KeyPressEventArgs e) + { + base.OnKeyPress(e); + // 如果只允许输入数字，则判断输入是否为退格或者数字 + if (DigitOnly) + { + //IsNumber：指定字符串中位于指定位置的字符是否属于数字类别 + //IsPunctuation：指定字符串中位于指定位置的字符是否属于标点符号类别 + //IsControl：指定字符串中位于指定位置的字符是否属于控制字符类别 + if (!Char.IsNumber(e.KeyChar) && !Char.IsPunctuation(e.KeyChar) && !Char.IsControl(e.KeyChar)) + { + e.Handled = true; //获取或设置一个值，指示是否处理过System.Windows.Forms.Control.KeyPress事件 + } + else if (Char.IsPunctuation(e.KeyChar) && DecimalPlaces > 0) + { + if (e.KeyChar == '.') + { + if (Text.LastIndexOf('.') != -1) + { + e.Handled = true; + } + } + else + { + e.Handled = true; + } + } + } + } + + protected override void OnLeave(EventArgs e) + { + base.OnLeave(e); + + if (DigitOnly) + { + if (!string.IsNullOrWhiteSpace(Text)) + { + if (Number > Maximum) + Text = Maximum.ToString("F" + DecimalPlaces); + if (Number < Minimum) + Text = Minimum.ToString("F" + DecimalPlaces); + } + } + } + + /// + /// 获得操作系统消息 + /// + /// + protected override void WndProc(ref Message m) + { + base.WndProc(ref m); + if (m.Msg == 0xf || m.Msg == 0x133) + { + //拦截系统消息，获得当前控件进程以便重绘。 + //一些控件（如TextBox、Button等）是由系统进程绘制，重载OnPaint方法将不起作用. + //所有这里并没有使用重载OnPaint方法绘制TextBox边框。 + // + //MSDN:重写 OnPaint 将禁止修改所有控件的外观。 + //那些由 Windows 完成其所有绘图的控件（例如 Textbox）从不调用它们的 OnPaint 方法， + //因此将永远不会使用自定义代码。请参见您要修改的特定控件的文档， + //查看 OnPaint 方法是否可用。如果某个控件未将 OnPaint 作为成员方法列出， + //则您无法通过重写此方法改变其外观。 + // + //MSDN:要了解可用的 Message.Msg、Message.LParam 和 Message.WParam 值， + //请参考位于 MSDN Library 中的 Platform SDK 文档参考。可在 Platform SDK（“Core SDK”一节） + //下载中包含的 windows.h 头文件中找到实际常数值，该文件也可在 MSDN 上找到。 + IntPtr hDC = GetWindowDC(m.HWnd); + if (hDC.ToInt32() == 0) + { + return; + } + + //只有在边框样式为FixedSingle时自定义边框样式才有效 + if (this.BorderStyle == BorderStyle.FixedSingle) + { + //边框Width为1个像素 + System.Drawing.Pen pen = new Pen(this._BorderColor, 1); ; + + if (this._HotTrack) + { + if (this.Focused) + { + pen.Color = this._HotColor; + } + else + { + if (this._IsMouseOver) + { + pen.Color = this._HotColor; + } + else + { + pen.Color = this._BorderColor; + } + } + } + //绘制边框 + System.Drawing.Graphics g = Graphics.FromHdc(hDC); + g.SmoothingMode = System.Drawing.Drawing2D.SmoothingMode.AntiAlias; + g.DrawRectangle(pen, 0, 0, this.Width - 1, this.Height - 1); + pen.Dispose(); + } + //返回结果 + m.Result = IntPtr.Zero; + //释放 + ReleaseDC(m.HWnd, hDC); + } + } + } +} \ No newline at end of file