Invalid use of keyword. Token .....

[Gelson62]

Delphi-Quellcode:

procedure TForm1.Button3Click(Sender: TObject); 
begin 
  DBGrid1.DataSource := DataSource4; 
  with Query1 do 
  begin 
    SQL.Text := 'Select * from Kunde.DB where Request_Formular = :datum';
    Params.ParamByName('datum').AsDateTime := Trunc(DateTimePicker3.Date);
    Open;
  end; 
end;

Der sieht so aus