ReplaceTime

Replace the time part

Declaration

Source position: datih.inc line 201

  procedure ReplaceTime(var dati: TDateTime; NewTime: TDateTime);

Description

ReplaceTime replaces the time part in dati with NewTime. The date part remains untouched.