+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : سؤال و جواب حول دلفي (https://delphi4arab.net/forum/forumdisplay.php?fid=15)
+--- الموضوع : تصحيح الكود (/showthread.php?tid=10586)
تصحيح الكود - dahmane26 - 22-12-2019
السلام عليكم من فضلكم تصحيح هذا الكود
PHP كود :
begin
DFM.Qadd.Close;
DFM.Qadd.SQL.Clear;
DFM.Qadd.SQL.Add('insert into S_Jour(DATE_JOURNNEE,SERIE_DU,SERIE_AU,QUITTANCE_DU,QUITTANCE_AU,') ;
DFM.Qadd.SQL.Add ('MONTANT_NUMERAIRE,MONTANT_BANCAIRE,MONTANT_CCP,APPLICATION');
DFM.Qadd.SQL.add(''''+form1.maskedit3.text+''','''+dbedit1.text+''','''+dbedit2.text+''',');
DFM.Qadd.SQL.add(' '''+dbedit3.text+''','''+dbedit4.text+''','''+dbedit5.text+''','''+dbedit6.text+''','''+dbedit7.text+''','''+dbedit21.text+'''');
DFM.Qadd.ExecSQL;
DFM.Qadd.Close;
DFM.Qadd.SQL.Clear;
DFM.Qadd.SQL.Add('select from S_Jour * order by SERIEDATE_JOURNNEE');
DFM.Qadd.Open;
end;
end;
begin
DFM.Qadd.Close;
DFM.Qadd.SQL.Clear;
DFM.Qadd.SQL.Add('insert into S_Jour(DATE_JOURNNEE,SERIE_DU,SERIE_AU,QUITTANCE_DU,QUITTANCE_AU,') ;
DFM.Qadd.SQL.Add ('MONTANT_NUMERAIRE,MONTANT_BANCAIRE,MONTANT_CCP,APPLICATION');
DFM.Qadd.SQL.add(''''+form1.maskedit3.text+''','''+dbedit1.text+''','''+dbedit2.text+''',');
DFM.Qadd.SQL.add(' '''+dbedit3.text+''','''+dbedit4.text+''','''+dbedit5.text+''','''+dbedit6.text+''','''+dbedit7.text+''','''+dbedit21.text+'''');
DFM.Qadd.ExecSQL;
DFM.Qadd.Close;
DFM.Qadd.SQL.Clear;
DFM.Qadd.SQL.Add('select from S_Jour * order by SERIEDATE_JOURNNEE');
DFM.Qadd.Open;
end;
end;
المشكل المطروح هو
http://delphi4arab.net/forum/attachment.php?aid=4169
RE: تصحيح الكود - merouane - 22-12-2019
PHP كود :
INSERT INTO table_name (column1, column2, column3, ...)
VALUES (value1, value2, value3, ...);
RE: تصحيح الكود - Mr.DOS - 15-01-2020
السلام عليكم
MONTANT_NUMERAIRE
MONTANT_BANCAIRE
MONTANT_CCP
APPLICATION ....
واين دوال التحويل ؟؟ strtoint , strtofloat , strtocurr