Использование MonthCalendar
Всё нашёл сам .сори за флуд
AnsiString dat = "";
dat = Form1->MonthCalendar1->Date;
Код:
OraQuery1->ParamByName("parm_date")->AsDate = Form1->MonthCalendar1->Date;
Код:
SELECT FIELD1, FIELD2 FROM TABLE1 WHERE DATE1 = :parm_date