diff --git a/复合检验管理/U_MJManageNewFDNew.pas b/复合检验管理/U_MJManageNewFDNew.pas index 0a099f2..a625029 100644 --- a/复合检验管理/U_MJManageNewFDNew.pas +++ b/复合检验管理/U_MJManageNewFDNew.pas @@ -1787,11 +1787,7 @@ begin // application.MessageBox('С10', 'ʾϢ', 0); // exit; // end; - if (strtofloatdef(trim(MJMaoZ.Text), 0) < 10) then - begin - application.MessageBox('ëزС10', 'ʾϢ', 0); - exit; - end; + if (Trim(Edit9.Text) = '') then begin if (strtofloatdef(trim(mjqty4.Text), 0) < 10) then @@ -1799,6 +1795,11 @@ begin application.MessageBox('زС10', 'ʾϢ', 0); exit; end; + if (strtofloatdef(trim(MJMaoZ.Text), 0) < 10) then + begin + application.MessageBox('ëزС10', 'ʾϢ', 0); + exit; + end; end; if Trim(FAPID) = '' then