.net - Delphi Prism 中 EncodeTime 或 DecodeTime 的替换

Question

在 Delphi Win32 中，您有 EncodeTime 和 DecodeTime 函数来操作 DateTime 数据或变量。DELPHI Prism中是否有类似的功能？如果没有，你会怎么做？

例如，您想在 B 增加一天后将两个日期时间变量（A 和 B）加在一起。

谢谢，

Answer 1

您必须使用该DateTime类型，此类有许多构造函数，您可以使用这些构造函数对日期时间进行编码。

对 DateTime 进行编码的示例

Var
  ADateTime : DateTime;
begin
  //to enconde 29 August 2011
  ADateTime:=new DateTime(2011,8,29);

  //to enconde 29 August 2011 , 23:30 
  ADateTime:=new DateTime(2011,8,29,23,30,0);

要解码 DateTime，您必须使用属性 Year、Month、Day、Minute 和 Second。

  var AYear : Integer:= ADateTime.Year;
  var AMonth : Integer:= ADateTime.Month;
  var ADay : Integer:= ADateTime.Day;

现在要修改 Datetime 添加天数、年数或其他范围，您可以使用方法AddYears,AddMonths等AddDays。

//add a year to the date stored in the ADateTime variable
Var NewDateTime: DateTime:=  ADateTime.AddYears(1);

//substract a month to the date stored in the ADateTime variable
Var NewDateTime: DateTime:=  ADateTime.AddMonths(-1);