16.45.2. function Date function Date: TDateTime; Возвращает только текущую дату, без времени (т.е. время в такой дате всегда будет равно 00:00:00) Пример: begin AddToLog(DateToStr(Date)); end. В примере использовались: AddToLog, DateToStr