DateTimePicker: как сделать, чтобы сохранялась и выводилась только дата, без времени?

@Sofochka · Регистрация: 19.12.2013

Author24 — интернет-сервис помощи студентам

Delphi

1	DataModule3.ZakazeTable.FieldByName('ДатаЗаказа').AsDateTime := DateTimer2.Date;

Вот строчка из кода. При вводе выбираю только дату, но в саму БД вносится дата со временем. Как сделать, чтобы сохранялась и выводилась только дата?

@andrey_k3 · 04.12.2014, 22:21

Delphi

1
2
3

uses dateutils;
...
DataModule3.ZakazeTable.FieldByName('ДатаЗаказа').AsDateTime := DateOf(DateTimer2.Date);

@Sergio Leone · 04.12.2014, 22:36

как вариант:

Delphi

var dt1 : TDateTime;
begin
....
  dt1 := trunc( DateTimer2.Date );
  DataModule3.ZakazeTable.FieldByName('ДатаЗаказа').AsDateTime := dt1;

Добавлено через 1 минуту
впрочем, это то же самое.
открыл посмотреть исходники функции DateOf()
и увидел:

Delphi

function DateOf(const AValue: TDateTime): TDateTime;
begin
  Result := Trunc(AValue);
end;

@xxbesoxx · 04.12.2014, 23:34

Сообщение от Sofochka

Как сделать, чтобы сохранялась и выводилась только дата?

Пускай будеть хранить тоже время . Вы можете отображать только " Дата " и каком формате вы его хотите . из свойстве DisplayFormat пишите dd.mm.yyyy = день . месяц . год

@xxbesoxx 1134 / 615 / 129 Регистрация: 13.02.2009 Сообщений: 3,553
	04.12.2014, 23:34	4
	Сообщение от Sofochka Как сделать, чтобы сохранялась и выводилась только дата? Пускай будеть хранить тоже время . Вы можете отображать только " Дата " и каком формате вы его хотите . из свойстве DisplayFormat пишите dd.mm.yyyy = день . месяц . год Миниатюры 0

DateTimePicker: как сделать, чтобы сохранялась и выводилась только дата, без времени?

Решение