3
votes
Vote
Fun With Testing DateUtils.pas #6
Nick Hodges
– Okay, so when we last left off, IncMillisecond was still failing in certain circumstances. Let’s take a look at that. Note, too, that I have this crazy notion that if you have a function called IncMillisecond, then it should be able to, you know, increment a millisecond. Here is the IncMilliseconds that you very likely have on your computer: function IncMilliSecond(const AValue: TDateTime; const ANumberOfMilliSeconds: Int64): TDateTime; begin if AValue > 0 then Result := ((AValue * MSecsPerDay) + ANumberOfMilliSeconds) / MSecsPerDay else Result := ((AValue * MSecsPerDay) ...
Statistics
|
Visits by Source |
User Actions |
Users who voted for this posting
Primoz Gabrijelcic
stukelly
Tier777
