Функция StrToTime – конвертирует строку с временем в значение с типом TDateTime

Функция StrToTime в Delphi конвертирует строку с временем в значение с типом TDateTime.

Функция StrToTime: Пример кода

var
  myTime : TDateTime;

begin
  myTime := StrToTime('3PM');
  ShowMessage('3PM      = '+TimeToStr(mytime));
  myTime := StrToTime('15');
  ShowMessage('15       = '+TimeToStr(mytime));
  myTime := StrToTime('15:03');
  ShowMessage('15:03    = '+TimeToStr(mytime));
  myTime := StrToTime('15:03:45');
  ShowMessage('15:03:45 = '+TimeToStr(mytime));
end;

Main Menu