probleme Update chiffre a virgule

Question

salut tous j'ai un problème avec un update sur chiffre a virgule,chiffre sans virgule pas de problème la modification s'effectue quand je veux enregistrer un chiffre a virgule erreur :(Difference de type dans une expresion)
voici mon code:
procedure TAjoutPaiement.SpeedButton2Click(Sender: TObject);
var
som:Double; cot:Double; pai:Double;
Stg:string;
F: TextFile;
begin
som:=StrToFloat(Sommes.Text); //Prix
cot:=StrToFloat(cotisation.Caption); //Prix
pai:=StrToFloat(Paiement.Caption); //Prix
paie:=pai+som;
paiementfini.caption:=floattostr(paie);
PrixReste:=cot-(pai+som);
reste.caption:=floattostr(PrixReste);

begin
Query1.SQL.Clear;
Query1.SQL.Add('Update assos_membre.DB set Paiement = '+ QuotedStr(paiementfini.Caption)
+',Reste = '+ QuotedStr(reste.Caption)
+' where Idmembre ='+ QuotedStr(id.Caption)+'');
Query1.ExecSQL;

merci de votre aide ,et de votre compréhension je ne suis vraiment pas un champion du delphi .Merci

fbalien · Answer

Bonjour

çà plante à quel niveau ?

A+

cs_pascal57 · Answer

plantage au niveau du query j'ai le message
(difference de type dans une expression)

fbalien · Answer

Faudrait tenter
1 sans Quotedstr
2 voir si la "," n'est pas à remplacer par "."
A+

cs_pascal57 · Answer

j'ai fais les deux mais c pas ok

cs_pers · Answer

fais un showmessage de ton sql.text ce sera sans doute intéressant ...

Probleme Update chiffre a virgule

5 réponses

Votre réponse

Discussions similaires