|
|
#1
|
|||
|
|||
использовать DateSeparator и ShortDateFormat, ибо MS Access хочет дату вида: #mm/dd/yyyy#: (делал на лету, может и не сработать, но пример должен быть понятен)
Код:
var m_date: string; old_DateSeparator: char; old_ShortDateFormat: string; begin old_DateSeparator := DateSeparator; old_ShortDateFormat := ShortDateFormat; DateSeparator := '/'; ShortDateFormat := 'mm/dd/yyyy'; m_date := '#'+DBDAteTimeEditeh1.Text+'#'; Adoquery1.Active; Adoquery1.SQL.Text := 'SELECT [ID_товара] FROM [Склад] WHERE [Дата заказа] = ' + #39 + m_date + #39; Adoquery1.Open; DateSeparator := old_DateSeparator; ShortDateFormat := old_ShortDateFormat; end; взялся из неоткуда, ничего не прошу, помогаю просто так ICQ: 593977748 - стучать в случае КРАЙНЕЙ необходимости, ну, или если вы со Ставрополя Последний раз редактировалось Assistant, 24.04.2011 в 21:49. |