From 3e6e7e4a843fa62b10d36bf2d1405786a03d5b03 Mon Sep 17 00:00:00 2001 From: "DESKTOP-E401PHE\\Administrator" Date: Sat, 30 Aug 2025 16:54:22 +0800 Subject: [PATCH] ~ --- 打卷检验管理/U_JYOrderCDOne.dfm | 1 - 打卷检验管理/U_JYOrderCDOne.pas | 4 ++-- 2 files changed, 2 insertions(+), 3 deletions(-) diff --git a/打卷检验管理/U_JYOrderCDOne.dfm b/打卷检验管理/U_JYOrderCDOne.dfm index 22f3f62..1634c0c 100644 --- a/打卷检验管理/U_JYOrderCDOne.dfm +++ b/打卷检验管理/U_JYOrderCDOne.dfm @@ -802,7 +802,6 @@ object frmJYOrderCDOne: TfrmJYOrderCDOne OnCellDblClick = Tv1CellDblClick DataController.DataSource = DataSource1 DataController.Filter.AutoDataSetFilter = True - DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost] DataController.Summary.DefaultGroupSummaryItems = <> DataController.Summary.FooterSummaryItems = < item diff --git a/打卷检验管理/U_JYOrderCDOne.pas b/打卷检验管理/U_JYOrderCDOne.pas index e22f27e..4fcbb12 100644 --- a/打卷检验管理/U_JYOrderCDOne.pas +++ b/打卷检验管理/U_JYOrderCDOne.pas @@ -1,7 +1,7 @@ unit U_JYOrderCDOne; interface - + uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ExtCtrls, ComCtrls, ToolWin, cxStyles, cxCustomData, @@ -1674,7 +1674,7 @@ begin begin Close; sql.Clear; - sql.add('exec P_Do_PrintMd_HZ '); + sql.add('exec P_Do_PrintMd_HZ '); sql.add('@mainID=' + quotedstr(Trim(''))); sql.add(',@DName=' + quotedstr(Trim(DCode))); sql.add(',@flag=''2'' ');