salut tous encore un petit probleme
je dois modifier de données dans un query mais j'ai une erreur avec les champs dates ? voici mon code
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
procedure TModifPatients.Button1Click(Sender: TObject);
begin
 
//----------Enregistre les nouvelles données---------------
 
Query2.SQL.Clear;
Query2.SQL.Add('Update patients.DB set Nom = '+ QuotedStr(Nom.Text)+',Prenom = '+ QuotedStr(Prenom.Text)+',Service = '+ QuotedStr(Service.Text)+',Uf = '+ QuotedStr(Codeuf.Text)+',Lieu = '+ QuotedStr(Lieu.Text)+',Num = '+ QuotedStr(Numtube.Text)+',Dateprelevement = '+ quotedStr(DatePrelevement.Date)+'where Idpatient ='+ QuotedStr(Idpatient.Caption)+'');
Query2.ExecSQL;
 
// ----------Fin d'enregistrement--------------------------
end;
et mon erreur est :
Type incompatible : String et TDate
merci de votre aide