const fs = require('fs');
|
const path = require('path');
|
|
// 檔案路徑設定
|
const sourceFile = path.resolve(__dirname, 'CB_IMGPSScanImp.pas');
|
const outDir = path.resolve(__dirname, 'separate', 'scanImp');
|
|
if (!fs.existsSync(sourceFile)) {
|
console.error("找不到原始檔案:", sourceFile);
|
process.exit(1);
|
}
|
|
if (!fs.existsSync(outDir)) {
|
fs.mkdirSync(outDir, { recursive: true });
|
}
|
|
const content = fs.readFileSync(sourceFile, 'utf8');
|
|
const implMatch = content.match(/\bimplementation\b/i);
|
const initMatch = content.match(/\binitialization\b/i);
|
|
if (!implMatch || !initMatch) {
|
console.error("無法在檔案中找到 implementation 或 initialization 區段。");
|
process.exit(1);
|
}
|
|
const headerPart = content.substring(0, implMatch.index + implMatch[0].length);
|
let implPart = content.substring(implMatch.index + implMatch[0].length, initMatch.index);
|
const footerPart = content.substring(initMatch.index);
|
|
const usesMatch = implPart.match(/^\s*uses[\s\S]*?;/im);
|
let usesClause = "";
|
if (usesMatch) {
|
usesClause = usesMatch[0];
|
implPart = implPart.substring(usesMatch.index + usesMatch[0].length);
|
}
|
|
// 提取並保留不在方法內的實作開頭，例如 {$R *.DFM} 或是 { TCB_IMGPSScanX }
|
const methodRegex = /^(?:procedure|function)\s+TCB_IMGPSScanX\./im;
|
let otherImpl = "";
|
const firstMethodMatch = implPart.match(methodRegex);
|
|
if (firstMethodMatch) {
|
otherImpl = implPart.substring(0, firstMethodMatch.index);
|
implPart = implPart.substring(firstMethodMatch.index);
|
}
|
|
// 切割所有方法
|
const methodSplitRegex = /(?=^(?:procedure|function)\s+TCB_IMGPSScanX\.)/im;
|
const methods = implPart.split(methodSplitRegex).filter(m => m.trim().length > 0);
|
|
const uiMethods = [];
|
const scanMethods = [];
|
const dataMethods = [];
|
const utilMethods = [];
|
|
methods.forEach(m => {
|
const nameMatch = m.match(/^(?:procedure|function)\s+TCB_IMGPSScanX\.([A-Za-z0-9_]+)/i);
|
if (nameMatch) {
|
const name = nameMatch[1].toLowerCase();
|
if (/(click|mouse|key|drag|scroll|event|menu|btn|form|node|tree|view|activate|paint|resize)/.test(name)) {
|
uiMethods.push(m);
|
} else if (/(scan|acquire|image|graphic|twain|dpi|color|deskew|rotate|crop|smooth|point)/.test(name)) {
|
scanMethods.push(m);
|
} else if (/(ftp|http|trans|load|sql|server|setinf|data|ask|log|file|path|zip|dir|docno|formid|case)/.test(name)) {
|
dataMethods.push(m);
|
} else {
|
utilMethods.push(m);
|
}
|
} else {
|
utilMethods.push(m);
|
}
|
});
|
|
fs.writeFileSync(path.join(outDir, 'CB_IMGPSScanImp_UI.pas'), uiMethods.join(''), 'utf8');
|
fs.writeFileSync(path.join(outDir, 'CB_IMGPSScanImp_Scan.pas'), scanMethods.join(''), 'utf8');
|
fs.writeFileSync(path.join(outDir, 'CB_IMGPSScanImp_Data.pas'), dataMethods.join(''), 'utf8');
|
fs.writeFileSync(path.join(outDir, 'CB_IMGPSScanImp_Utils.pas'), utilMethods.join(''), 'utf8');
|
|
const mainFile = [
|
headerPart,
|
usesClause,
|
otherImpl,
|
"{$I CB_IMGPSScanImp_UI.pas}",
|
"{$I CB_IMGPSScanImp_Scan.pas}",
|
"{$I CB_IMGPSScanImp_Data.pas}",
|
"{$I CB_IMGPSScanImp_Utils.pas}",
|
footerPart
|
].join('');
|
|
fs.writeFileSync(path.join(outDir, 'CB_IMGPSScanImp_Main.pas'), mainFile, 'utf8');
|
|
console.log("拆分完成！產生的五個檔案如下：");
|
console.log("1. CB_IMGPSScanImp_Main.pas (主結構與引用)");
|
console.log("2. CB_IMGPSScanImp_UI.pas (UI事件相關:", uiMethods.length, "個方法)");
|
console.log("3. CB_IMGPSScanImp_Scan.pas (掃描影像相關:", scanMethods.length, "個方法)");
|
console.log("4. CB_IMGPSScanImp_Data.pas (資料存取與網路傳輸:", dataMethods.length, "個方法)");
|
console.log("5. CB_IMGPSScanImp_Utils.pas (工具與其他邏輯:", utilMethods.length, "個方法)");
|
