دخول

YUSSRI

(09-05-2019, 01:08 PM)B.M.AbdelAziZ كتب :
وعليكم السلام ورحمة الله وبركاته
عذرا لكن ما علاقة هذا بدلفي ؟

أستعمل delphi xe7

كود :
if StrToFloat(RZCREDIT.Text) > StrToFloat(MTFACTURE.Text) THEN
    BEGIN
     with Qry.sql do
         begin
           Qry.SQL.Clear;
           Qry.SQL.Add
             ('INSERT INTO C_005_VNTCLTS ( CODE_VENTE_005, DATE_REG_005,  MTREG_005,' +
              '  ETAT_005, CODE_AUTO_005, CODE_CLT_005)'
            + ' values(:1,:2,:3,:4,:5,:6)');
           Qry.ParamByName('1').Value := RzCODEVNT.Text;
           QRY.ParamByName('2').Value := dtpRZDATEREG.DateTime;
         ;( Qry.ParamByName('3').Value := StrToFloat(MTFACTURE.Text);
           Qry.ParamByName('4').Value := 'F';
           Qry.ParamByName('5').Value := RzCODEVNT.Text;
           Qry.ParamByName('6').Value := RzCodeClt.Text;
           Qry.ExecSQL;
     end;
           QVNT.Next; 
          QVNT.REFRESH;  
 END;

قمت بوضع هذا الكود ولكن يقوم بإدخال 93.8 فقط في مجموعة من السطور

دخول
اسم المستخدم/البريد الالكتروني :
كلمة المرور :	فقدت كلمة المرور ؟
	تذكرني بالمرة القادمة