|
|
RecodeTime
Функция |
Изменяет только время переменной TDateTime |
DateUtils unit |
| function RecodeTime ( const SourceDate : TDateTime; const Hour, Min, Sec, MSec : Word ) : TDateTime;
| |
|
| Описание |
|
Delphi функция RecodeTime позволяет изменять Час, Минуту, Секунду, Ммиллисекунду переменной TDateTime, переменная изменится без затрагивания времени.
|
|
| Похожие команды |
DecodeDate Извлекает значения года, месяца, дня из TDateTime переменной
DecodeDateTime Разбивает TDateTime переменную на ее части даты/времени
DecodeTime Разбивает значение TDateTime на отдельные значения времени
EncodeDate Формирует значение TDateTime из значений года, месяца и дня
EncodeDateTime Формирует значение TDateTime из значений времени и дня
EncodeTime Формирует значение TDateTime из значений часа, минуты, секунды и миллисеккунды
RecodeDate Изменяет только дату переменной TDateTime
ReplaceDate Изменяет только часть даты TDateTime переменной
ReplaceTime Изменяет только часть времени TDateTime переменной
| |
|
| Пример кода : Изменение времени не затрагивая дату |
var
myDate : TDateTime;
begin
// Установка даты в 29/10/2002 12:34:56
myDate := EncodeDateTime(2002, 10, 29, 12, 34, 56, 0);
ShowMessage('Начальная дата/время = '+DateTimeToStr(myDate));
// Теперь измените часть даты, не
касаясь времени
myDate := RecodeTime(myDate, 7, 35, 22, 0);
ShowMessage('Новая дата/время = '+DateTimeToStr(myDate));
end;
|
Начальная дата/время = 29/10/2002 12:34:56
Новая дата/время = 29/10/2002 07:35:22
|
| | |
Copyright © 2004-2024 "Delphi Sources" by BrokenByte Software (источник – "DelphiBasics")
|
