【发布时间】:2016-01-18 02:36:55
【问题描述】:
【问题讨论】:
-
抱歉。忘了提。它在窗户上。
-
Windows 窗体还是 Windows WPF?我假设 Windows = Windows 窗体。
-
是的。它是窗体。
标签: c# winforms datetimepicker
【问题讨论】:
标签: c# winforms datetimepicker
使用windows messages approach,您可以检测月历控件显示并强制月视图,并且您可以检测视图更改并在月视图更改时关闭月历控件(选择一个月后)。
实现它的最简单方法是覆盖 DateTimePicker。
public class MonthPicker : DateTimePicker
{
// initialize Format/CustomFormat to display only month and year.
public MonthPicker()
{
Format = DateTimePickerFormat.Custom;
CustomFormat = "MMMM yyyy";
}
// override Format to redefine default value (used by designer)
[DefaultValue(DateTimePickerFormat.Custom)]
public new DateTimePickerFormat Format
{
get => base.Format;
set => base.Format = value;
}
// override CustomFormat to redefine default value (used by designer)
[DefaultValue("MMM yyyy")]
public new string CustomFormat
{
get => base.CustomFormat;
set => base.CustomFormat = value;
}
protected override void WndProc(ref Message m)
{
if (m.Msg == WM_NOFITY)
{
var nmhdr = (NMHDR)Marshal.PtrToStructure(m.LParam, typeof(NMHDR));
switch (nmhdr.code)
{
// detect pop-up display and switch view to month selection
case -950:
{
var cal = SendMessage(Handle, DTM_GETMONTHCAL, IntPtr.Zero, IntPtr.Zero);
SendMessage(cal, MCM_SETCURRENTVIEW, IntPtr.Zero, (IntPtr)1);
break;
}
// detect month selection and close the pop-up
case MCN_VIEWCHANGE:
{
var nmviewchange = (NMVIEWCHANGE)Marshal.PtrToStructure(m.LParam, typeof(NMVIEWCHANGE));
if (nmviewchange.dwOldView == 1 && nmviewchange.dwNewView == 0)
{
SendMessage(Handle, DTM_CLOSEMONTHCAL, IntPtr.Zero, IntPtr.Zero);
}
break;
}
}
}
base.WndProc(ref m);
}
private const int WM_NOFITY = 0x004e;
private const int DTM_CLOSEMONTHCAL = 0x1000 + 13;
private const int DTM_GETMONTHCAL = 0x1000 + 8;
private const int MCM_SETCURRENTVIEW = 0x1000 + 32;
private const int MCN_VIEWCHANGE = -750;
[DllImport("user32.dll")]
public static extern IntPtr SendMessage(IntPtr hWnd, int wMsg, IntPtr wParam, IntPtr lParam);
[StructLayout(LayoutKind.Sequential)]
private struct NMHDR
{
public IntPtr hwndFrom;
public IntPtr idFrom;
public int code;
}
[StructLayout(LayoutKind.Sequential)]
struct NMVIEWCHANGE
{
public NMHDR nmhdr;
public uint dwOldView;
public uint dwNewView;
}
}
【讨论】:
为什么需要这样做?如果您只想显示月份,那么更简单的方法是在 Combox 中列出月份。
不过,我在 msdn 上为您找到了一些东西。看看这里https://social.msdn.microsoft.com/Forums/en-US/7bdca56f-719e-44bf-be6d-a9600dfa8f78/wpf-datepicker-for-months-only?forum=wpf
【讨论】:
试试下面的代码:
DateTime newDateValue = new DateTime(dateTimePicker_month.Value.Year, 1, 1);
dateTimePicker_month.Value = newDateValue;
dateTimePicker_month.Format = DateTimePickerFormat.Custom;
dateTimePicker_month.CustomFormat = "MMM-yyyy";
dateTimePicker_month.ShowUpDown = true;
您必须为 28/29 天的 2 月添加 (1,1) 以确定所有月份的值。如果您希望查询选择月份。以下是一个示例:
string month = dateTimePicker_month.Value.Month.ToString();
string year = dateTimePicker_month.Value.Year.ToString();
使用以下查询选择月份:
select CAST(date AS DATE) from table where DATEPART(month, date) = '" + month + "' and DATEPART(year,date) = '" + year + "'
【讨论】:
由于在我的情况下不起作用,我修改了 Orance 的答案,将其放在继承自 DateTimePicker 的类中:
protected override void WndProc(ref Message m)
{
if (_MonthSelectStyle)
{
if (m.Msg == 0X204E) // = Win32Messages.WM_REFLECT_NOTIFY
{
var nmhdrI = (NMHDR)(Marshal.PtrToStructure(m.LParam, typeof(NMHDR)));
switch (nmhdrI.code)
{
case -754: // Win32Messages.DTN_DROPDOWN
var cal = SendMessage(m.HWnd, WinApi.Win32Messages.DTM_GETMONTHCAL, IntPtr.Zero, IntPtr.Zero);
SendMessage(cal, WinApi.Win32Messages.MCM_SETCURRENTVIEW, IntPtr.Zero, (IntPtr)1);
break;
case -759: // Win32Messages.DTN_DATETIMECHANGE
WinApi.SendMessage(Handle, WinApi.Win32Messages.DTM_CLOSEMONTHCAL, IntPtr.Zero, IntPtr.Zero);
break;
}
}
}
base.WndProc(ref m);
}
和 VB 等价物:
Protected Overrides Sub WndProc(ByRef m As Message)
If _MonthSelectStyle Then
If m.Msg = &H204E Then ' WM_REFLECT_NOTIFY '&H204E
Dim nmhdrI = CType(Marshal.PtrToStructure(m.LParam, GetType(NMHDR)), NMHDR)
Select Case nmhdrI.code
Case -754 ' Win32Messages.DTN_DROPDOWN '-754
Dim cal = SendMessage(m.HWnd, WinApi.Win32Messages.DTM_GETMONTHCAL, IntPtr.Zero, IntPtr.Zero)
SendMessage(cal, WinApi.Win32Messages.MCM_SETCURRENTVIEW, IntPtr.Zero, CType(1, IntPtr))
Case -759 ' Win32Messages.DTN_DATETIMECHANGE '-759
WinApi.SendMessage(Handle, WinApi.Win32Messages.DTM_CLOSEMONTHCAL, IntPtr.Zero, IntPtr.Zero)
End Select
End If
End If
MyBase.WndProc(m)
End Sub
【讨论】:
尝试使用格式属性:
dateTimePicker.Format = DateTimePickerFormat.Custom;
dateTimePicker.CustomFormat = "MM";
【讨论】: