TDateTimePicker

[Ensoph]

Подскажите, как можно установить по умолчанию дату не сегодняшнего дня, а вчерашнего?

[ОДИНОЧЕСТВО В СЕТИ]

dtp1.date:= now-1;

вчерашний день

[S@fer]

DateTimePicker1.Date:=Date-1

[lexaltd]

function Yesterday : TDateTime;

[mutabor]

function Yesterday: TDateTime;
begin
  Result := Date - 1;
end;

VCL иногда до маразма доходит, чтобы отнять единицу мне вовсе не обязательно помнить что для этого оказывается есть специальная функция.