From bd6327d63615dd3e4ded54440af21e55104d3634 Mon Sep 17 00:00:00 2001
From: funa <1559646174@qq.com>
Date: Sat, 17 Oct 2026 17:28:05 +0800
Subject: [PATCH] =?UTF-8?q?=E6=A3=80=E9=AA=8C?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 E03梭织坯布检验/U_TatMachInsp.pas | 5 +++++
 1 file changed, 5 insertions(+)

diff --git a/E03梭织坯布检验/U_TatMachInsp.pas b/E03梭织坯布检验/U_TatMachInsp.pas
index b5d55ff..f9976d4 100644
--- a/E03梭织坯布检验/U_TatMachInsp.pas
+++ b/E03梭织坯布检验/U_TatMachInsp.pas
@@ -1773,6 +1773,11 @@ begin
       /////////////////////////           ���泤��         /////////////////////////
       MInputLen := RoundFloat(StrToFloatdef(trim(InputLen.Text), 0), 1);
 
+      // �������δ���������ʱ���ύͬ���������λ�߼�����һλС��
+      if Trim(code_table_length.Text) <> '' then
+        code_table_length.Text :=
+          FormatFloat('0.#', RoundUpToHalf(RoundFloat(StrToFloatdef(Trim(code_table_length.Text), 0), 1)));
+
       // ��ѡ edtMax ʱ��ȡ¼�볤������������еĽϴ�ֵ���뻻��
       if Trim(edtMax.Text) = '��' then
       begin