Цитата:
|
Сообщение от poison-bla
Пишет Undeclared identifier: 'AsDate'
|
А если так?:
Код:
DataModuleUnit.AdoQuery1.Parameters[6].Value := Form9.DateTimePicker1.Date;
А вообще к параметрам лучше добираться не по индексу, а по имени параметра.
Пример:
Код:
DataModuleUnit.AdoQuery1.Close;
DataModuleUnit.AdoQuery1.SQL.Text := 'SELECT * FROM MyTable WHERE MyDate >= :Date1 AND MyDate < :Date2';
DataModuleUnit.AdoQuery1.Parameters.ParamByName('Date1').Value := Form9.DateTimePicker1.Date;
DataModuleUnit.AdoQuery1.Parameters.ParamByName('Date2').Value := Form9.DateTimePicker2.Date;
DataModuleUnit.AdoQuery1.Open;