Group_01/D7DJyiluda
5
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

~

Browse Source
This commit is contained in:
DESKTOP-E401PHE\Administrator 2025-10-28 10:08:11 +08:00
parent 965a99c487
commit 4a23cf6265
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
复合检验管理/U_MJManageNewFDNew.pas
View File

@ -2601,10 +2601,10 @@ begin
Application.MessageBox('取包条码最大号失败！', '提示', 0); Application.MessageBox('取包条码最大号失败！', '提示', 0);
Exit; Exit;
end; end;
baoid.Text := FBaoID; baoid.Text := FBaoID;
Edit3.Text := '√'; Edit3.Text := '√';
Edit4.Text := ''; Edit4.Text := '';
MJStr4.Text := ''; MJStr4.Text := Trim(ADOTmp.fieldbyname('GangHao').AsString);
end end
else else
begin begin