首页 相关文章 关于时间函数

关于时间函数

  在工程文件中Application.Run语句之前加入下面语句,可不让主Form在运行时显示:
   Application.ShowMainForm := False;

  显示设置时间的对话框
   ShellExecute(Handle, 'open', 'control', 'date/time', nil, SW_SHOW);

  FormatDateTime('yyyy mmmm',MyDate) 返回如

  //获得日期 Date := Trunc( DateTime );
   //获得时间 Time := Frac( DateTime );

  计算任意月份的天数
   procedure TForm1.Button10Click(Sender: TObject);
   function DaysInMonth(ADate:TDateTime):Integer;
   var MyYear,MyMonth,MyDay : Word;
   ...[ 查看全文 ]

2016-02-19 标签:

关于时间函数的相关文章

手机页面
收藏网站 回到头部