[voron_paa]

Код:

procedure TForm3.DateTimePicker1Change(Sender: TObject);  
  begin
    with ADOQuery3 do begin
      Close;
      SQL.Clear;
      SQL.Add('SELECT * FROM  propuski');
      SQL.Add('WHERE Data = :p');
      SQL.Add('ORDER BY Data');
      ParamByName('p').AsDateTime := DateTimePicker1.Date;         
      Open;
     end;
  end;

на будущее... совет так сказать ... читай официальную литературу.. от Borland ... лучше на англицком..
есть допущения при переводе...