RecodeTime

function RecodeTime(const AValue: TDateTime; const AHour, AMinute, ASecond, AMilliSecond: Word): TDateTime;

Funkcja zamienia wartość czasu przekazaną w parametrze AValue na wartości parametrów AHour (godzina), AMinute (minuta), ASecond (sekunda), AMilliSecond (milisekunda).

Przykład:

program Foo;
 
{$APPTYPE CONSOLE}
 
uses
  DateUtils, SysUtils;
 
var
  ANow : TDateTime;
begin
  ANow := Now;
  Writeln('Zmiana wartości czasu: ', DateTimeToStr(RecodeTime(ANow, 8, 12, 12, 999)));
  Readln;
end.

Zobacz też:

• RecodeDate
• ReplaceDate