~

2025-09-06 16:31:30 +08:00 · 2025-09-06 16:31:30 +08:00 · afbbb4c509
commit afbbb4c509
parent c9da7c1770
1 changed files with 7 additions and 7 deletions
--- a/复合检验管理/U_MJManageNewFDNew.pas
+++ b/复合检验管理/U_MJManageNewFDNew.pas
@ -2625,7 +2625,7 @@ begin
    baoid.Text := FBaoID;
    Edit3.Text := '¡Ì';
    Edit4.Text := '';
-    MJStr4.Text := '';
+    MJStr4.Text := Trim(ADOTmp.fieldbyname('GangHao').AsString);
  end
  else
  begin