Функція IncMinute в Delphi прирощує змінну типу TDateTime на + або - число хвилин.
DateUtils unit
- function IncMinute (const StartDateTime : TDateTime {; NumberOfMinutes : Integer = 1}) : TDateTime;
- function IncMinute (const AValue: TDateTime; const ANumberOfMinutes: Int64): TDateTime;
Варіант 1.
Функція IncMinute повертає значення TDateTime, яке на NumberOfMinutes хвилин більше, ніж передане значення StartDateTime.
Рік, місяць, день та значення години збільшуються відповідно. Значення збільшення є довільним (за замовчуванням 1).
Варіант 2.
Функція IncMinute повертає дату та час, зрушені по відношенню до зазначеної дати AValue типу TDateTime на ANumberOfMinutes хвилин. Кількість хвилин ANumberOfMinutes типу Integer може бути негативною.
Примітка.
Функції DecMinute немає. Натомість, використовуйте IncMinute з негативним збільшенням.
Функція IncMinute: Простий приклад збільшення та декременту
var
myDate : TDateTime;
begin
// Встановлюємо нашу дату якраз перед кінцем 2000 року
myDate := EncodeDateTime(2000, 12, 31, 23, 0, 0, 0);
ShowMessage('myDate = '+DateTimeToStr(myDate));
// Додаємо 100 хвилин до цієї дати
myDate := IncMinute(myDate, 100);
ShowMessage('myDate + 100 минут = '+DateTimeToStr(myDate));
// Віднімаємо 40 хвилин з цієї дати
myDate := IncMinute(myDate, -40);
ShowMessage('myDate - 40 минут = '+DateTimeToStr(myDate));
end;Результат
myDate = 31/12/2000 23:00:00
myDate + 100 хвилин = 01/01/2001 00:40:00
myDate - 40 хвилин = 01/01/2001
Подібні функції, процедури та команди
IncDay — Збільшує змінну типу TDateTime на + або - число днів.
IncMonth — збільшує змінну TDateTime на певну кількість місяців.
IncYear — збільшує змінну TDateTime на певну кількість років.
IncSecond — збільшує змінну типу TDateTime на + або - число секунд.
IncMillisecond — прирощує змінну типу TDateTime на + або – число мілісекунд.
Пригостити автора кавою