TDateTimePicker 如何响应双击消息？

[biemowobenz]

Form上面放个TDateTimePicker，控件本身有个双击事件，但试用无效，怎么能响应了？

[缘中人]

用了重载消息，但是没有效果 http://blog.csdn.net/cb168/article/details/8575375

[缘中人]

变相实现了双击

private: // User declarations
	void __fastcall myWindowProc(Messages::TMessage &Message); // 增加
	Classes::TWndMethod OldWindowProc; // 增加



void __fastcall TForm3::myWindowProc(Messages::TMessage &Message)
{
	if (Message.Msg == WM_LBUTTONUP)
	{
		static int a = 0;
		a++;
		if (a % 2 == 0)
			Caption = Now();
	}

	else
		OldWindowProc(Message);
}
// ------------------------------------a---------------------------------------

void __fastcall TForm3::FormCreate(TObject *Sender)
{
	OldWindowProc = DateTimePicker1->WindowProc;
	DateTimePicker1->WindowProc = myWindowProc;
}

[biemowobenz]

我也这么弄了的，这个实现应该消息是左键单击吧？用户需要双击，否则点到即发生，不符合友好性啊。 估计在控件实现日期更改时候对消息处理了。。。

[缘中人]

自己再判断一下两次单击的时间间隔 也可以达到完美效果