1:怎样得到某一天在一段时间中是第几天
如9月1日是在3月23日开始的第几天2:怎样响应datatimepicker和monthcalendar中日期改变的事件?
如设置一个时钟,每隔2分钟使上述控件中天数加一,程序响应并作一次运算3:datatimepicker和monthcalendar如何因程序运算使自身日期改变并显示出来?4:这两个控件与数据库中数据的结合、互动?
如9月1日是在3月23日开始的第几天2:怎样响应datatimepicker和monthcalendar中日期改变的事件?
如设置一个时钟,每隔2分钟使上述控件中天数加一,程序响应并作一次运算3:datatimepicker和monthcalendar如何因程序运算使自身日期改变并显示出来?4:这两个控件与数据库中数据的结合、互动?
uses DateUtils;procedure TForm1.Button1Click(Sender: TObject);
var
Date1, Date2: TDate;
begin
Date1 := Date + 100;
Date2 := Date;
ShowMessage(IntToStr(DaysBetween(Date2, Date1)));
end;
2、OnChange事件
3、DateTimePicker1.Date := DateTimePicker1.Date + 1;
4、自己开发数据敏感控件TDBDataTimePicker————————————————————————————————————
宠辱不惊,看庭前花开花落,去留无意;毁誉由人,望天上云卷云舒,聚散任风。
————————————————————————————————————