Узнать текущее время и дату

Автор: Борисов Сергей

Tweet

Очень просто. Существует функция Time в модуле SysUtils.

function Time: TDateTime;

Возвращает функция значение типа TDateTime. А его преобразовать в строку? Так же просто:

var s:String;
s:=TimeToStr(SysUtils.Time);

Существует и обратная операция:

var T:TTime;
T:=StrToTime('13:15:25');

Аналогичные операции можно проделать и с датой:

function Date: TDateTime;

Преобразовать в строку:

var s:String;
s:=DateToStr(SysUtils.Date);

Так же существует и обратная операция:

var D:TDate;
D:=StrToDate('10.08.2008');

• Клоун на час

  Афиша выступлений. Условия доставки.

  gnom.su

• Копии часов

  Каталог магазинов и интернет-магазинов Казани. Описания, фотографии и цены.

  richmanshop.ru

Просмотров: 7952

Обсудить на форуме

---

Имя *:
Email:
Все смайлы
Код *:

Copyright © 2008-2012 Программирование на Delphi для начинающих и не только

Полнота авторских прав на все материалы, опубликованные на сервере DelphiDevelop.ru принадлежит их авторам

Перепечатка материалов разрешается с указанием авторства и гиперссылки на первоисточник информации

Хостинг от uCoz

Автор проекта: Борисов Сергей

e-mail: save-x@yandex.ru

Связь с администрацией сайта

Гостевая книга