Вопросы DateTimePicker

[Askat]

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

[Баламут]

procedure TForm1.DateTimePicker1Change(Sender: TObject);
begin
DateTimePicker2.DateTime := DateTimePicker1.DateTime;
end;

[Pitbull]

Сообщение от Баламут

procedure TForm1.DateTimePicker1Change(Sender: TObject);
begin
DateTimePicker2.DateTime := DateTimePicker1.DateTime;
end;

Баламутик, вопрос тебе по существу.... Чтобы в DateTimePicker не приплюсовывалось время, нужно просто писать DateTimePicker2.DateTime1.date?

[Баламут]

DateTimePicker2.DateTime1.date - это что за конструкция такая?
Если не нужно время, то пишем примерно так
DateTimePicker1.Date := Date;
или
DateTimePicker1.Date := DateTimePicker2.Date;

[Pitbull]

Сообщение от Баламут

DateTimePicker2.DateTime1.date - это что за конструкция такая?
Если не нужно время, то пишем примерно так
DateTimePicker1.Date := Date;
или
DateTimePicker1.Date := DateTimePicker2.Date;

братка, у меня с датой какая-то лажа.... Я хочу , чтобы через DateTimePicker1 я передавал дату, а по этому параметру искало в базе..... Но у меня не выдает ничего.... Хотя в SQL запрос нормально работает...
Может быть проблема с драйвером ОDBC?

[Pitbull]

Сообщение от Баламут

DateTimePicker2.DateTime1.date - это что за конструкция такая?
Если не нужно время, то пишем примерно так
DateTimePicker1.Date := Date;
или
DateTimePicker1.Date := DateTimePicker2.Date;

та я так и хотел написать.. Просто спешил и не так скопировал..сорри

[Баламут]

Как выглядит запрос? Как в него передается дата?

[Askat]

Как в DateTimePicker1 даты сделать системными?

[eremin]

Как в DateTimePicker1 даты сделать системными?

DateTimePicker1.Date := Now;

[Pitbull]

Сообщение от Баламут

Как выглядит запрос? Как в него передается дата?

query.active := false;
query.sql.clear;
Query1.SQL.Add('select * from proezd_main');
Query1.SQL.Add('where data_reg like ');
Query1.Prepare;
Query1.Params[0].value := DateTimePicker1.date; // писал :=dateTostr(DateTimePicker1.date)
Query1.ExecSQL;