[Delphi] Как убрать пустое пространство в полях даты между днями, месяцами и годами?

[Ann1234567890]

Добрый день, ребята! Столкнулась с такой проблемой (смотреть на рисунок). Подскажите пожалуйста, как это пространство можно убрать?

И подскажите пожалуйста, как написать код сброса заданных параметров?

Код для кнопки применения дат:

procedure TForm6.btn3Click(Sender: TObject);
begin
DataModule5.tblPostavka.Filter :='Дата_поставки>=#'+DateToStr(dtp1.Date)+'# and Дата_поставки<=#'+DateToStr(dtp2.Date)+'#';
DataModule5.tblPostavka.Filtered :=True;
end;
end.

Спасибо огромное!

[Arigato]

Предположение: уменьшить размер поля.

[Аватар]

Format исправить или вообще очистить