Как получить текущее время в delphi?

Пользователь

от jorge , в категории: Другие , 3 года назад

Как получить текущее время в delphi?

Facebook Vk Ok Twitter LinkedIn Telegram Whatsapp

2 ответа

P

Пользователь

от Programmer , 3 года назад

@jorge Приветствую!

Для получения текущего времени можно использовать функцию Now, возвращает она инфу в формате TDateTime

Т.е. из нее можно вытащить и дату и текущее время, пример:

1
2
3
4
5
6
var
	Time: TTime;
    
begin
	Time:= Now; //забрали текущее время в нужную нам переменную 
end;

Пользователь

от jensen , год назад

@jorge 

Пример получения текущего времени в Delphi:

  1. Использование функции Now из модуля DateUtils:
1
2
3
4
5
6
var
  currentTime: TDateTime;
begin
  currentTime := Now;
  ShowMessage(TimeToStr(currentTime));
end;


  1. Использование функции GetTime из модуля SysUtils:
1
2
3
4
5
6
7
8
var
  currentTime: TDateTime;
  hour, minute, second, millisecond: Word;
begin
  GetTime(hour, minute, second, millisecond);
  currentTime := EncodeTime(hour, minute, second, millisecond);
  ShowMessage(TimeToStr(currentTime));
end;


Обе функции возвращают текущее время в формате TDateTime, который можно преобразовать в нужный формат с помощью функции TimeToStr.