From b134b0ca25edb1b6de7602d4356ab95e6a08e1b1 Mon Sep 17 00:00:00 2001 From: "DESKTOP-E401PHE\\Administrator" Date: Tue, 29 Jul 2025 16:39:45 +0800 Subject: [PATCH] ~ --- 打卷检验管理/U_JYOrderCDOne.pas | 16 +++++++++++++--- 1 file changed, 13 insertions(+), 3 deletions(-) diff --git a/打卷检验管理/U_JYOrderCDOne.pas b/打卷检验管理/U_JYOrderCDOne.pas index 86cd332..6c2141f 100644 --- a/打卷检验管理/U_JYOrderCDOne.pas +++ b/打卷检验管理/U_JYOrderCDOne.pas @@ -1471,7 +1471,7 @@ begin SInitCDSData20(ADOQueryCmd, CDS_HZ); end else if LBName = '鱨ͨ(ķ)' then - begin + begin with ADOQueryCmd do begin Close; @@ -1740,7 +1740,7 @@ begin // end; // end; - if (trim(ComboBox1.Text) = '뵥') or (trim(ComboBox1.Text) = '뵥()') or (trim(ComboBox1.Text) = '뵥(ë)') or (trim(ComboBox1.Text) = '뵥(+ë)') or (trim(ComboBox1.Text) = '뵥(ӡ)') or (trim(ComboBox1.Text) = '뵥()') then + if (trim(ComboBox1.Text) = '뵥') or (trim(ComboBox1.Text) = '뵥()') or (trim(ComboBox1.Text) = '뵥(ë)') or (trim(ComboBox1.Text) = '뵥(+ë)') or (trim(ComboBox1.Text) = '뵥(ӡ)') or (trim(ComboBox1.Text) = '뵥()') or (trim(ComboBox1.Text) = '뵥(ʵ)') or (trim(ComboBox1.Text) = '뵥()') then begin with ADOQueryTemp do begin @@ -1755,12 +1755,22 @@ begin with ADOQueryPrint do begin - Close; + Close; sql.Clear; sql.add('exec P_Do_PrintMd_HZ '); sql.add('@mainID=' + quotedstr(Trim(''))); sql.add(',@DName=' + quotedstr(Trim(DCode))); sql.add(',@flag=''2'' '); + Open; + end; + with ADOQuery1 do + begin + Close; + sql.Clear; + sql.add('exec P_Do_PrintMd_HZ_GH '); + sql.add('@mainID=' + quotedstr(Trim(''))); + sql.add(',@DName=' + quotedstr(Trim(DCode))); + sql.add(',@flag=''2'' '); Open; end; end;