~

打卷检验管理/U_ProductOrderLBNameSet.pas

@@ -1609,7 +1609,7 @@ begin
   mvalues := TCXTextEdit(Sender).Text;
 
   with Order_Main do
-  begin
+  begin                                   
     edit;
     fieldbyname('DJDW').Value := mvalues;
     post;
@@ -1654,10 +1654,10 @@ FReal:
         if order_Main.FieldByName('Ssel').AsBoolean = true then
         begin
           with ADOQueryCmd do
-          begin
+          begin                               
             Close;
             sql.Clear;
-            sql.Add('Update JYOrder_Sub Set DJDW=' + Trim(PiZhong.Text));
+            sql.Add('Update JYOrder_Sub Set DJDW=''' + Trim(PiZhong.Text)+'''');
             sql.Add(' where Subid=''' + Trim(Order_Main.fieldbyname('Subid').AsString) + '''');
             ExecSQL;
           end;