From 0756bf12d10cf1b7f78c571de0a9ad69cbaeb7ca Mon Sep 17 00:00:00 2001
From: curtis <curtis@i-mps.com>
Date: 星期一, 30 三月 2026 14:24:17 +0800
Subject: [PATCH] fix: 更新內部引用方法參照
---
reassemble/img/transformer.pas | 25 ++++++-------------------
1 files changed, 6 insertions(+), 19 deletions(-)
diff --git a/reassemble/img/transformer.pas b/reassemble/img/transformer.pas
index f967aa4..354cb93 100644
--- a/reassemble/img/transformer.pas
+++ b/reassemble/img/transformer.pas
@@ -2,15 +2,8 @@
方法名稱：ImageReSize_FormID
引用相依：CheckSize, FileExists, FindPoint, ImageReSize_FormID, ImageResize, L
oadFileGetMD5, LoadFromFile, SaveToFile
- 方法描述：根據表單的十字定位點或邊框 (ANCHOR/FRAME) 對掃瞄影像進行縮放調整。流
- 程如下：
- 1. 從 FORM_INF_List 取得表單預設高寬與定位類型。
- 2. 載入對應案件下的影像檔，若為補件模式則跳過原有圖檔。
- 3. 呼叫 FindPoint 尋找影像中的十字線或邊框。
- 4. 呼叫 CheckSize 計算偏移與縮放比例。
- 5. 呼叫 ImageResize 執行實際調整。
- 6. 成功縮放後，記錄檔案 MD5 並儲存更新後的影像，同時將操作記錄寫入 ReS
- ize.dat；若定位點遺失或辨識錯誤，則記錄於 AnchorError.dat。
+ 方法描述：依據定位點縮放影像。查詢表單規格，載入影像（過濾補件模式），尋找十字線或
+ 邊框定位點，執行縮放並紀錄 MD5 與日誌。
============================================================================== }
Procedure TCB_IMGPSScanX.ImageReSize_FormID(CaseID,FileName:String); //依十字定位點做縮放
var
@@ -94,11 +87,8 @@
{ ==============================================================================
方法名稱：ImageReSize_tmp
引用相依：CheckSize, ImageReSize_tmp, ImageResize, LoadFromFile, SaveToFile
- 方法描述：針對暫存影像檔案執行十字定位點縮放處理。此方法是 ImageReSize_FormID
- 的簡化版本，主要針對暫存檔 (FileName) 與指定的 FormID。邏輯包含從資料
- 庫清單查詢表單尺寸與定位模式，若符合 ANCHOR 或 FRAME 類型，則載入影像
- 並呼叫 CheckSize 檢查是否需要調整。若偵測到影像存在偏移或比例差異（Siz
- eStr 非空），則將調整後的影像直接覆蓋儲存回原始路徑。
+ 方法描述：針對暫存檔執行定位點縮放。簡化版 Resize 邏輯，若偵測到尺寸偏移則直接覆
+ 蓋原始檔案，用於處理臨時影像。
============================================================================== }
Procedure TCB_IMGPSScanX.ImageReSize_tmp(FormID,FileName:String); //依十字定位點做縮放(暫存檔)
var
@@ -130,11 +120,8 @@
{ ==============================================================================
方法名稱：CheckNeedCrop
引用相依：CheckNeedCrop, TDibGraphic
- 方法描述：判斷掃瞄影像是否為 A3 尺寸並需要進行切割（Crop）。判定邏輯有二：首先，檢
- 查影像寬度是否大於 4 倍的 DPI 閥值，藉此初步判斷為大尺寸掃瞄件；其次，
- 遍歷目前的條碼清單 (MpsBarcodeinf)，統計有效的表單代碼 (FormID) 數量。
- 如果影像寬度達標且有效表單數量正好為 2，則返回 True。這代表此張大圖實
- 際上是由兩份 A4 表單併排掃瞄而成，後續需依此旗標進行影像分割處理。
+ 方法描述：判斷影像是否需執行 A3 切割。依據影像寬度（大於 4 倍 DPI）及條碼清單中有
+ 效表單代碼的數量（需為 2 個）作為判定據。
============================================================================== }
Function TCB_IMGPSScanX.CheckNeedCrop(Graphic:TDibGraphic):Boolean; //是否是A3要切影像
Var
--
Gitblit v1.8.0