Цитата:
|
Сообщение от alexusankov
Все, дописал, вроде работает нормально.
Подскажите пожалуйста, отчего :
edit1.Text := DateToStr(Yesterday);
Выдает 30.12.1899? Время и дата в системе стоят нормальные.
Как получить дату вчерашнего дня еще можно?
|
Подозреваю что Yesterday это просто переменная которую ты сам и объявил? Если так тогда понятно почему даёт такую дату.
То же самое получишь если сделаешь так:
Код:
edit1.Text := DateToStr(0);
А чтобы получить вчерашнюю дату, нужно использовать функцию Yesterday из модуля DateUtils (т.е. в uses нужно добавить DateUtils, а свою переменную Yesterday убрать).
Ещё вчерашнюю дату можно получить так:
Код:
edit1.Text := DateToStr(Date - 1);