level 2
二傻忘记密码了
楼主
网上找到一个说自己写一个方法
uses DateUtils
function MyMinutesBetween(const ANow, AThen: TDateTime): integer;
begin
Result := round((MinuteSpan(ANow, AThen));
end;
or
function MyMinutesBetween(const ANow, AThen: TDateTime): integer;
begin
Result := ceil((MinuteSpan(ANow, AThen));
end;
这个方法应该添加在哪里?
2014年04月14日 08点04分
1
uses DateUtils
function MyMinutesBetween(const ANow, AThen: TDateTime): integer;
begin
Result := round((MinuteSpan(ANow, AThen));
end;
or
function MyMinutesBetween(const ANow, AThen: TDateTime): integer;
begin
Result := ceil((MinuteSpan(ANow, AThen));
end;
这个方法应该添加在哪里?