关于 DateTimePicker1 控件问题 急急急。。。。。。 请问,有奶位大虾知道,怎样控制 DateTimePicker1 在输入或修改日期时,不能超出最大日期和最小日期。 请给予明示,谢谢 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 procedure TForm1.DateTimePicker1Change(Sender: TObject);begin if FormatDateTime('YYYY-MM-DD', DateTimePicker1.Date) > '2004-01-01' then DateTimePicker1.Date := Date;end;OnChange事件。 可設置DateTimePicker1.MaxDateDateTimePicker1.MinDate DateTimePicker1.MaxDate:=strtodate('2004-01-01');DateTimePicker1.MinDate:=StrtoDate(''2000-01-01'); 哎,又被aiirii(ari) 抢先了 当然有办法了,就是太麻烦了,告诉你一下思路吧,在KeyPress事件中,就取得了刚才用户输入的键值,然后判断一下,当前用户选择修改的是哪个部分,年还是月,还是日,然后拼装一下,看看将成为新的日期是不是超过了控制的范围就行了。 DateTimePicker1.MaxDateDateTimePicker1.MinDate是它的父类的属性所以他也可以用的 設直它的MaxDate為最大日期.設直它的MinDate為最小日期. 晕,我告诉你吧,你的要求是可以达到的,就是在keypress里边处理,最大的难度是在怎么知道当前的选择是年还是月还是日,有一个办法,就是用canvas把那个控件所在的位置图像保存到bmp中,然后用scanline去判断一下位置(因为选中的时候颜色是不一样的),再接着把读取到的key值重新平装一下判断一下,行就什么也不做,不行就要把可以设置为#0。 rave报表设计遇到个小问题 小问题请叫了.不好意思 散分... 数据库长度? InputBox的问题,在线等!!! 急急急。。。。请教各位大哥大姐:关于TreeView控件的用法(动态添加)。 如何一下删除Dbgrid中多行记录,而不需一行一行删除? 串口通信问题 如何用Delphi制作一个Flash播放器实现写文件功能? 怎么在主窗体中关闭所有子窗体 TreeView问题,在线 怎样设置quickreport的打印纸张为横向的,还有用户可以自己进行页面设置吗?
begin
if FormatDateTime('YYYY-MM-DD', DateTimePicker1.Date) > '2004-01-01' then
DateTimePicker1.Date := Date;
end;OnChange事件。
DateTimePicker1.MaxDate
DateTimePicker1.MinDate
DateTimePicker1.MinDate:=StrtoDate(''2000-01-01');
DateTimePicker1.MinDate
是它的父类的属性所以他也可以用的
設直它的MinDate為最小日期.