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: 更新內部引用方法參照
---
doc/curtis/prompt/scanimpl_analysis/step1_raw_methods.json | 2417 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
1 files changed, 2,417 insertions(+), 0 deletions(-)
diff --git a/doc/curtis/prompt/scanimpl_analysis/step1_raw_methods.json b/doc/curtis/prompt/scanimpl_analysis/step1_raw_methods.json
new file mode 100644
index 0000000..069933b
--- /dev/null
+++ b/doc/curtis/prompt/scanimpl_analysis/step1_raw_methods.json
@@ -0,0 +1,2417 @@
+[
+ {
+ "matcher": "function TCB_IMGPSScanX.GetCurrentVersionNo: String; //獲取自身版本號所需要",
+ "lIndex": 1052,
+ "rIndex": 1085
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.WMMOUSEWHEEL(var message: TWMMouseWheel);",
+ "lIndex": 1086,
+ "rIndex": 1171
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.WNoteBtnClick(Sender: TObject);",
+ "lIndex": 1172,
+ "rIndex": 1246
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.DefinePropertyPages(DefinePropertyPage: TDefinePropertyPage);",
+ "lIndex": 1247,
+ "rIndex": 1253
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.EventSinkChanged(const EventSink: IUnknown);",
+ "lIndex": 1254,
+ "rIndex": 1259
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.FC0Click(Sender: TObject);",
+ "lIndex": 1260,
+ "rIndex": 1270
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.FC1Click(Sender: TObject);",
+ "lIndex": 1271,
+ "rIndex": 1281
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.FC2Click(Sender: TObject);",
+ "lIndex": 1282,
+ "rIndex": 1292
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.FC3Click(Sender: TObject);",
+ "lIndex": 1293,
+ "rIndex": 1303
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.FC4Click(Sender: TObject);",
+ "lIndex": 1304,
+ "rIndex": 1314
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.FC5Click(Sender: TObject);",
+ "lIndex": 1315,
+ "rIndex": 1325
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.FC6Click(Sender: TObject);",
+ "lIndex": 1326,
+ "rIndex": 1337
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.InitExistImgList(casepath: String);",
+ "lIndex": 1338,
+ "rIndex": 1362
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.Initialize;",
+ "lIndex": 1363,
+ "rIndex": 1386
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.ISB1Click(Sender: TObject);",
+ "lIndex": 1387,
+ "rIndex": 1406
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.ISB1EndScroll(Sender: TObject);",
+ "lIndex": 1407,
+ "rIndex": 1421
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.ISB1Enter(Sender: TObject);",
+ "lIndex": 1422,
+ "rIndex": 1426
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.ISB1ImageMouseDown(Sender: TObject; Button: TMouseButton;",
+ "lIndex": 1427,
+ "rIndex": 1463
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.ISB1ImageMouseMove(Sender: TObject; Shift: TShiftState;",
+ "lIndex": 1464,
+ "rIndex": 1489
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.ISB1ImageMouseUp(Sender: TObject; Button: TMouseButton;",
+ "lIndex": 1490,
+ "rIndex": 1524
+ },
+ {
+ "matcher": "function TCB_IMGPSScanX.Get_Active: WordBool;",
+ "lIndex": 1525,
+ "rIndex": 1529
+ },
+ {
+ "matcher": "function TCB_IMGPSScanX.Get_AlignDisabled: WordBool;",
+ "lIndex": 1530,
+ "rIndex": 1534
+ },
+ {
+ "matcher": "function TCB_IMGPSScanX.Get_AlignWithMargins: WordBool;",
+ "lIndex": 1535,
+ "rIndex": 1539
+ },
+ {
+ "matcher": "function TCB_IMGPSScanX.Get_AutoScroll: WordBool;",
+ "lIndex": 1540,
+ "rIndex": 1544
+ },
+ {
+ "matcher": "function TCB_IMGPSScanX.Get_AutoSize: WordBool;",
+ "lIndex": 1545,
+ "rIndex": 1549
+ },
+ {
+ "matcher": "function TCB_IMGPSScanX.Get_AxBorderStyle: TxActiveFormBorderStyle;",
+ "lIndex": 1550,
+ "rIndex": 1554
+ },
+ {
+ "matcher": "function TCB_IMGPSScanX.Get_Caption: WideString;",
+ "lIndex": 1555,
+ "rIndex": 1559
+ },
+ {
+ "matcher": "function TCB_IMGPSScanX.Get_Color: OLE_COLOR;",
+ "lIndex": 1560,
+ "rIndex": 1564
+ },
+ {
+ "matcher": "function TCB_IMGPSScanX.Get_DockSite: WordBool;",
+ "lIndex": 1565,
+ "rIndex": 1569
+ },
+ {
+ "matcher": "function TCB_IMGPSScanX.Get_DoubleBuffered: WordBool;",
+ "lIndex": 1570,
+ "rIndex": 1574
+ },
+ {
+ "matcher": "function TCB_IMGPSScanX.Get_DropTarget: WordBool;",
+ "lIndex": 1575,
+ "rIndex": 1579
+ },
+ {
+ "matcher": "function TCB_IMGPSScanX.Get_Enabled: WordBool;",
+ "lIndex": 1580,
+ "rIndex": 1584
+ },
+ {
+ "matcher": "function TCB_IMGPSScanX.Get_ExplicitHeight: Integer;",
+ "lIndex": 1585,
+ "rIndex": 1589
+ },
+ {
+ "matcher": "function TCB_IMGPSScanX.Get_ExplicitLeft: Integer;",
+ "lIndex": 1590,
+ "rIndex": 1594
+ },
+ {
+ "matcher": "function TCB_IMGPSScanX.Get_ExplicitTop: Integer;",
+ "lIndex": 1595,
+ "rIndex": 1599
+ },
+ {
+ "matcher": "function TCB_IMGPSScanX.Get_ExplicitWidth: Integer;",
+ "lIndex": 1600,
+ "rIndex": 1604
+ },
+ {
+ "matcher": "function TCB_IMGPSScanX.Get_Font: IFontDisp;",
+ "lIndex": 1605,
+ "rIndex": 1609
+ },
+ {
+ "matcher": "function TCB_IMGPSScanX.Get_HelpFile: WideString;",
+ "lIndex": 1610,
+ "rIndex": 1614
+ },
+ {
+ "matcher": "function TCB_IMGPSScanX.Get_KeyPreview: WordBool;",
+ "lIndex": 1615,
+ "rIndex": 1619
+ },
+ {
+ "matcher": "function TCB_IMGPSScanX.Get_MouseInClient: WordBool;",
+ "lIndex": 1620,
+ "rIndex": 1624
+ },
+ {
+ "matcher": "function TCB_IMGPSScanX.Get_ParentCustomHint: WordBool;",
+ "lIndex": 1625,
+ "rIndex": 1629
+ },
+ {
+ "matcher": "function TCB_IMGPSScanX.Get_ParentDoubleBuffered: WordBool;",
+ "lIndex": 1630,
+ "rIndex": 1634
+ },
+ {
+ "matcher": "function TCB_IMGPSScanX.Get_PixelsPerInch: Integer;",
+ "lIndex": 1635,
+ "rIndex": 1639
+ },
+ {
+ "matcher": "function TCB_IMGPSScanX.Get_PopupMode: TxPopupMode;",
+ "lIndex": 1640,
+ "rIndex": 1644
+ },
+ {
+ "matcher": "function TCB_IMGPSScanX.Get_PrintScale: TxPrintScale;",
+ "lIndex": 1645,
+ "rIndex": 1649
+ },
+ {
+ "matcher": "function TCB_IMGPSScanX.Get_Scaled: WordBool;",
+ "lIndex": 1650,
+ "rIndex": 1654
+ },
+ {
+ "matcher": "function TCB_IMGPSScanX.Get_ScreenSnap: WordBool;",
+ "lIndex": 1655,
+ "rIndex": 1659
+ },
+ {
+ "matcher": "function TCB_IMGPSScanX.Get_SnapBuffer: Integer;",
+ "lIndex": 1660,
+ "rIndex": 1664
+ },
+ {
+ "matcher": "function TCB_IMGPSScanX.Get_UseDockManager: WordBool;",
+ "lIndex": 1665,
+ "rIndex": 1669
+ },
+ {
+ "matcher": "function TCB_IMGPSScanX.Get_Visible: WordBool;",
+ "lIndex": 1670,
+ "rIndex": 1674
+ },
+ {
+ "matcher": "function TCB_IMGPSScanX.Get_VisibleDockClientCount: Integer;",
+ "lIndex": 1675,
+ "rIndex": 1679
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX._Set_Font(var Value: IFontDisp);",
+ "lIndex": 1680,
+ "rIndex": 1684
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.ActivateEvent(Sender: TObject);",
+ "lIndex": 1685,
+ "rIndex": 1689
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.ClickEvent(Sender: TObject);",
+ "lIndex": 1690,
+ "rIndex": 1694
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.CreateEvent(Sender: TObject);",
+ "lIndex": 1695,
+ "rIndex": 1699
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.DblClickEvent(Sender: TObject);",
+ "lIndex": 1700,
+ "rIndex": 1704
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.DeactivateEvent(Sender: TObject);",
+ "lIndex": 1705,
+ "rIndex": 1709
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.DestroyEvent(Sender: TObject);",
+ "lIndex": 1710,
+ "rIndex": 1755
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.KeyPressEvent(Sender: TObject; var Key: Char);",
+ "lIndex": 1756,
+ "rIndex": 1764
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.mode1Click(Sender: TObject);",
+ "lIndex": 1765,
+ "rIndex": 1772
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.mode2Click(Sender: TObject);",
+ "lIndex": 1773,
+ "rIndex": 1780
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.mode3Click(Sender: TObject);",
+ "lIndex": 1781,
+ "rIndex": 1787
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.mode4Click(Sender: TObject);",
+ "lIndex": 1788,
+ "rIndex": 1794
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.MouseEnterEvent(Sender: TObject);",
+ "lIndex": 1795,
+ "rIndex": 1799
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.MouseLeaveEvent(Sender: TObject);",
+ "lIndex": 1800,
+ "rIndex": 1804
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.PaintEvent(Sender: TObject);",
+ "lIndex": 1805,
+ "rIndex": 1809
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.Set_AlignWithMargins(Value: WordBool);",
+ "lIndex": 1810,
+ "rIndex": 1814
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.Set_AutoScroll(Value: WordBool);",
+ "lIndex": 1815,
+ "rIndex": 1819
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.Set_AutoSize(Value: WordBool);",
+ "lIndex": 1820,
+ "rIndex": 1824
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.Set_AxBorderStyle(Value: TxActiveFormBorderStyle);",
+ "lIndex": 1825,
+ "rIndex": 1829
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.Set_Caption(const Value: WideString);",
+ "lIndex": 1830,
+ "rIndex": 1834
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.Set_Color(Value: OLE_COLOR);",
+ "lIndex": 1835,
+ "rIndex": 1839
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.Set_DockSite(Value: WordBool);",
+ "lIndex": 1840,
+ "rIndex": 1844
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.Set_DoubleBuffered(Value: WordBool);",
+ "lIndex": 1845,
+ "rIndex": 1849
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.Set_DropTarget(Value: WordBool);",
+ "lIndex": 1850,
+ "rIndex": 1854
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.Set_Enabled(Value: WordBool);",
+ "lIndex": 1855,
+ "rIndex": 1859
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.Set_Font(const Value: IFontDisp);",
+ "lIndex": 1860,
+ "rIndex": 1864
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.Set_HelpFile(const Value: WideString);",
+ "lIndex": 1865,
+ "rIndex": 1869
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.Set_KeyPreview(Value: WordBool);",
+ "lIndex": 1870,
+ "rIndex": 1874
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.Set_ParentCustomHint(Value: WordBool);",
+ "lIndex": 1875,
+ "rIndex": 1879
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.Set_ParentDoubleBuffered(Value: WordBool);",
+ "lIndex": 1880,
+ "rIndex": 1884
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.Set_PixelsPerInch(Value: Integer);",
+ "lIndex": 1885,
+ "rIndex": 1889
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.Set_PopupMode(Value: TxPopupMode);",
+ "lIndex": 1890,
+ "rIndex": 1894
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.Set_PrintScale(Value: TxPrintScale);",
+ "lIndex": 1895,
+ "rIndex": 1899
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.Set_Scaled(Value: WordBool);",
+ "lIndex": 1900,
+ "rIndex": 1904
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.Set_ScreenSnap(Value: WordBool);",
+ "lIndex": 1905,
+ "rIndex": 1909
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.Set_SnapBuffer(Value: Integer);",
+ "lIndex": 1910,
+ "rIndex": 1914
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.Set_UseDockManager(Value: WordBool);",
+ "lIndex": 1915,
+ "rIndex": 1919
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.Set_Visible(Value: WordBool);",
+ "lIndex": 1920,
+ "rIndex": 1924
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.PM401Click(Sender: TObject);",
+ "lIndex": 1925,
+ "rIndex": 1978
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.PM402Click(Sender: TObject);",
+ "lIndex": 1979,
+ "rIndex": 1988
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.PM403Click(Sender: TObject);",
+ "lIndex": 1989,
+ "rIndex": 1998
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.PM404Click(Sender: TObject);",
+ "lIndex": 1999,
+ "rIndex": 2067
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.PM601Click(Sender: TObject);",
+ "lIndex": 2068,
+ "rIndex": 2221
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.PM602Click(Sender: TObject);",
+ "lIndex": 2222,
+ "rIndex": 2300
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.PM604Click(Sender: TObject);",
+ "lIndex": 2301,
+ "rIndex": 2323
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.PM605Click(Sender: TObject);",
+ "lIndex": 2324,
+ "rIndex": 2361
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.N1Click(Sender: TObject);",
+ "lIndex": 2362,
+ "rIndex": 2372
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.N51Click(Sender: TObject);",
+ "lIndex": 2373,
+ "rIndex": 2379
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.NewScanBtnClick(Sender: TObject);",
+ "lIndex": 2380,
+ "rIndex": 2427
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.NextPageBtnClick(Sender: TObject);",
+ "lIndex": 2428,
+ "rIndex": 2450
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.OptionBtnClick(Sender: TObject);",
+ "lIndex": 2451,
+ "rIndex": 2527
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.PageLVClick(Sender: TObject);",
+ "lIndex": 2528,
+ "rIndex": 2535
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.PageLVKeyUp(Sender: TObject; var Key: Word;",
+ "lIndex": 2536,
+ "rIndex": 2542
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.PageLVMouseDown(Sender: TObject; Button: TMouseButton;",
+ "lIndex": 2543,
+ "rIndex": 2554
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.Panel11DblClick(Sender: TObject);",
+ "lIndex": 2555,
+ "rIndex": 2561
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.Panel1DblClick(Sender: TObject);",
+ "lIndex": 2562,
+ "rIndex": 2567
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.Panel9Resize(Sender: TObject);",
+ "lIndex": 2568,
+ "rIndex": 2572
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.PM101Click(Sender: TObject);",
+ "lIndex": 2573,
+ "rIndex": 2677
+ },
+ {
+ "matcher": "function TCB_IMGPSScanX.DocNoIsExistImg(DocNopath:String):boolean;",
+ "lIndex": 2678,
+ "rIndex": 2701
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX._DelTreeForExistImg(ASourceDir:String);",
+ "lIndex": 2702,
+ "rIndex": 2709
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.PM102Click(Sender: TObject);",
+ "lIndex": 2710,
+ "rIndex": 2750
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.PM103Click(Sender: TObject);",
+ "lIndex": 2751,
+ "rIndex": 2788
+ },
+ {
+ "matcher": "Procedure TCB_IMGPSScanX.PM104Click(Sender: TObject);",
+ "lIndex": 2789,
+ "rIndex": 3186
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.PM106Click(Sender: TObject);",
+ "lIndex": 3187,
+ "rIndex": 3280
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.PM107Click(Sender: TObject);",
+ "lIndex": 3281,
+ "rIndex": 3285
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.PM108Click(Sender: TObject);",
+ "lIndex": 3286,
+ "rIndex": 3381
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.PM109Click(Sender: TObject);",
+ "lIndex": 3382,
+ "rIndex": 3411
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.PM110Click(Sender: TObject);",
+ "lIndex": 3412,
+ "rIndex": 3441
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.PM111Click(Sender: TObject);",
+ "lIndex": 3442,
+ "rIndex": 3472
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.PM301Click(Sender: TObject);",
+ "lIndex": 3473,
+ "rIndex": 3480
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.PM302Click(Sender: TObject);",
+ "lIndex": 3481,
+ "rIndex": 3489
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.PM303Click(Sender: TObject);",
+ "lIndex": 3490,
+ "rIndex": 3498
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.PM501Click(Sender: TObject);",
+ "lIndex": 3499,
+ "rIndex": 3505
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.PM502Click(Sender: TObject);",
+ "lIndex": 3506,
+ "rIndex": 3512
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.PM503Click(Sender: TObject);",
+ "lIndex": 3513,
+ "rIndex": 3519
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.PM504Click(Sender: TObject);",
+ "lIndex": 3520,
+ "rIndex": 3526
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.PM505Click(Sender: TObject);",
+ "lIndex": 3527,
+ "rIndex": 3547
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.PM507Click(Sender: TObject);",
+ "lIndex": 3548,
+ "rIndex": 3615
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.PM508Click(Sender: TObject);",
+ "lIndex": 3616,
+ "rIndex": 3656
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.PM509Click(Sender: TObject);",
+ "lIndex": 3657,
+ "rIndex": 3661
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.PM510Click(Sender: TObject);",
+ "lIndex": 3662,
+ "rIndex": 3668
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.PopupMenu1Popup(Sender: TObject);",
+ "lIndex": 3669,
+ "rIndex": 3826
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.PopupMenu4Popup(Sender: TObject);",
+ "lIndex": 3827,
+ "rIndex": 3844
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.PopupMenu5Popup(Sender: TObject);",
+ "lIndex": 3845,
+ "rIndex": 3874
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.PopupMenu6Popup(Sender: TObject);",
+ "lIndex": 3875,
+ "rIndex": 3924
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.PrePageBtnClick(Sender: TObject);",
+ "lIndex": 3925,
+ "rIndex": 3952
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.SampleScanBtnClick(Sender: TObject);",
+ "lIndex": 3953,
+ "rIndex": 4068
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.ScrollBar1Change(Sender: TObject);",
+ "lIndex": 4069,
+ "rIndex": 4086
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.ScrollBox1MouseEnter(Sender: TObject);",
+ "lIndex": 4087,
+ "rIndex": 4091
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.SelectScanBtnClick(Sender: TObject);",
+ "lIndex": 4092,
+ "rIndex": 4100
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.StatusBar1DblClick(Sender: TObject);",
+ "lIndex": 4101,
+ "rIndex": 4116
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.ActiveFormCreate(Sender: TObject);",
+ "lIndex": 4117,
+ "rIndex": 4138
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.ActiveFormKeyUp(Sender: TObject; var Key: Word;",
+ "lIndex": 4139,
+ "rIndex": 4164
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.AddAttFileLBClick(Sender: TObject);",
+ "lIndex": 4165,
+ "rIndex": 4194
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.AddCredit1RGClick(Sender: TObject);",
+ "lIndex": 4195,
+ "rIndex": 4207
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.AddScanBtnClick(Sender: TObject);",
+ "lIndex": 4208,
+ "rIndex": 4249
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.AttListBoxClick(Sender: TObject);",
+ "lIndex": 4250,
+ "rIndex": 4256
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.AttListBoxDblClick(Sender: TObject);",
+ "lIndex": 4257,
+ "rIndex": 4269
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.BtnMouseEnter(Sender: TObject);",
+ "lIndex": 4270,
+ "rIndex": 4274
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.Button3Click(Sender: TObject);",
+ "lIndex": 4275,
+ "rIndex": 4334
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.Button4Click(Sender: TObject);",
+ "lIndex": 4335,
+ "rIndex": 4369
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.Button5Click(Sender: TObject);",
+ "lIndex": 4370,
+ "rIndex": 4378
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.Button6Click(Sender: TObject);",
+ "lIndex": 4379,
+ "rIndex": 4389
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.StatrTwainScan;",
+ "lIndex": 4390,
+ "rIndex": 4443
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.OnAcquire( const DibHandle : THandle;",
+ "lIndex": 4444,
+ "rIndex": 4683
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.PageDone;",
+ "lIndex": 4684,
+ "rIndex": 4733
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.PageEnd;",
+ "lIndex": 4734,
+ "rIndex": 4950
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.ExportBtClick(Sender: TObject);",
+ "lIndex": 4951,
+ "rIndex": 5013
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.ImportBtClick(Sender: TObject);",
+ "lIndex": 5014,
+ "rIndex": 5089
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.HotKeyDown (var Msg : TMessage);",
+ "lIndex": 5090,
+ "rIndex": 5094
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.InitialLanguage(Sender: TObject);",
+ "lIndex": 5095,
+ "rIndex": 5172
+ },
+ {
+ "matcher": "function TCB_IMGPSScanX.GetSiteOMR(FileName,Site:String;bt: Integer): Integer;",
+ "lIndex": 5173,
+ "rIndex": 5227
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.FindISB2View(Vmode:Integer):TImageScrollBox; //找空的ISB來顯示",
+ "lIndex": 5228,
+ "rIndex": 5253
+ },
+ {
+ "matcher": "Procedure TCB_IMGPSScanX.R_W_Scanini(Mode:Char); //'R'讀取;'W'寫入",
+ "lIndex": 5254,
+ "rIndex": 5295
+ },
+ {
+ "matcher": "Procedure TCB_IMGPSScanX.GetDefScanIni; //取得掃瞄的預設值",
+ "lIndex": 5296,
+ "rIndex": 5472
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.HTTPSClientCertificateValidate(Sender: TObject;",
+ "lIndex": 5473,
+ "rIndex": 5478
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.HTTPSClientRedirection(Sender: TObject;",
+ "lIndex": 5479,
+ "rIndex": 5484
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.EnableImage(v:integer;Sender : TObject);",
+ "lIndex": 5485,
+ "rIndex": 5498
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.DesableImage;",
+ "lIndex": 5499,
+ "rIndex": 5518
+ },
+ {
+ "matcher": "Procedure TCB_IMGPSScanX.ViewMouseMode(v:Integer);",
+ "lIndex": 5519,
+ "rIndex": 5543
+ },
+ {
+ "matcher": "Procedure TCB_IMGPSScanX.GoViewMode;",
+ "lIndex": 5544,
+ "rIndex": 5555
+ },
+ {
+ "matcher": "Procedure TCB_IMGPSScanX.DisplayMode(index,H_Count,W_Count:Integer;BasePanel:TPanel);",
+ "lIndex": 5556,
+ "rIndex": 5599
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.GetServerDate : Boolean;",
+ "lIndex": 5600,
+ "rIndex": 5631
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.GetSampleInf : Boolean;",
+ "lIndex": 5632,
+ "rIndex": 5664
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.GetSetInf1 : Boolean; //取系統設定資訊Mode1 DOC_INF",
+ "lIndex": 5665,
+ "rIndex": 5707
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.GetSetInf2 : Boolean; //取系統設定資訊Mode2 DM_FORM_INF",
+ "lIndex": 5708,
+ "rIndex": 5746
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.GetSetInf3 : Boolean; //取系統設定資訊mode3 FORM_INF",
+ "lIndex": 5747,
+ "rIndex": 5786
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.GetSetInf4 : Boolean; //取系統設定資訊mode4 CHECK_RULE_INF",
+ "lIndex": 5787,
+ "rIndex": 5827
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.GetSetInf5 : Boolean; //取系統設定資訊mode5 MEMO_INF",
+ "lIndex": 5828,
+ "rIndex": 5866
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.GetSetInf6 : Boolean; //取系統設定資訊mode5 WORK_INF",
+ "lIndex": 5867,
+ "rIndex": 5906
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.GetSetInf7 : Boolean; //取系統設定資訊mode5 LASTEST_FORM_INF",
+ "lIndex": 5907,
+ "rIndex": 5946
+ },
+ {
+ "matcher": "Procedure TCB_IMGPSScanX.SetFormID_DocNo; //將FormID及Docno抽出來另存入list裡 20130403增加",
+ "lIndex": 5947,
+ "rIndex": 5958
+ },
+ {
+ "matcher": "Procedure TCB_IMGPSScanX.SetIn_WH_DocNo; //將要入庫的DocNo抽出來另存入list裡",
+ "lIndex": 5959,
+ "rIndex": 5972
+ },
+ {
+ "matcher": "function TCB_IMGPSScanX.CheckRequiredColumnValues(workno, caseno:String): Boolean;",
+ "lIndex": 5973,
+ "rIndex": 5982
+ },
+ {
+ "matcher": "Procedure TCB_IMGPSScanX.CheckRule2OMRErrInfo; //檢核規則填入OMRErrINFo Record",
+ "lIndex": 5983,
+ "rIndex": 6010
+ },
+ {
+ "matcher": "Procedure TCB_IMGPSScanX.ReNameContext(Path,OldName,NewName:String);",
+ "lIndex": 6011,
+ "rIndex": 6027
+ },
+ {
+ "matcher": "Procedure TCB_IMGPSScanX.DeleteImageFile(Path,FileName,CaseID:String); // 刪除檔案 (無法得到DocDir用)",
+ "lIndex": 6028,
+ "rIndex": 6059
+ },
+ {
+ "matcher": "Procedure TCB_IMGPSScanX.DeleteFormCodeFile(CaseID,DocDir,FormID:String); //刪除指定FormID文件",
+ "lIndex": 6060,
+ "rIndex": 6114
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.DeleteDocNoFile(Path,DocNo:String):Boolean; //刪除指定DocNo文件",
+ "lIndex": 6115,
+ "rIndex": 6140
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.DeleteDocNoFileForESCAN(Path,DocNo:String):Boolean; //刪除指定DocNo文件",
+ "lIndex": 6141,
+ "rIndex": 6174
+ },
+ {
+ "matcher": "Procedure TCB_IMGPSScanX.DeleteShowFile(Path:String); //刪除顯示中的影像",
+ "lIndex": 6175,
+ "rIndex": 6188
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.GetDataDocNoPage(MainDocNo,MainVersion:String):Integer; //取記錄的文件_版本頁數",
+ "lIndex": 6189,
+ "rIndex": 6203
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.CheckCaseDocNoPage(CaseID,DocNo,Version:String;Pages:Integer):Integer; //取案件裡的文件_版本頁數",
+ "lIndex": 6204,
+ "rIndex": 6277
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.FindFormCodePages(CaseID,FormCode:String):Integer; //計算案件裡FormID的頁數",
+ "lIndex": 6278,
+ "rIndex": 6308
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.GetDataFormCodePages(FormCode:String):Integer; //取記錄的FormcID的頁數",
+ "lIndex": 6309,
+ "rIndex": 6319
+ },
+ {
+ "matcher": "Procedure TCB_IMGPSScanX.CaseReSize(CaseID:String); //案件的影像縮放",
+ "lIndex": 6320,
+ "rIndex": 6342
+ },
+ {
+ "matcher": "Procedure TCB_IMGPSScanX.ImageReSize_FormID(CaseID,FileName:String); //依十字定位點做縮放",
+ "lIndex": 6343,
+ "rIndex": 6420
+ },
+ {
+ "matcher": "Procedure TCB_IMGPSScanX.ImageReSize_tmp(FormID,FileName:String); //依十字定位點做縮放(暫存檔)",
+ "lIndex": 6421,
+ "rIndex": 6446
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.ImageScrollBox1NewGraphic(const Graphic: TDibGraphic);",
+ "lIndex": 6447,
+ "rIndex": 6456
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.TransCaseID(Path,CaseID:String;MainCase:Boolean):Boolean; //傳送案件",
+ "lIndex": 6457,
+ "rIndex": 6734
+ },
+ {
+ "matcher": "Procedure TCB_IMGPSScanX.NewTreeNodeRefresh;",
+ "lIndex": 6735,
+ "rIndex": 6745
+ },
+ {
+ "matcher": "Procedure TCB_IMGPSScanX.MyTreeNode1Refresh;",
+ "lIndex": 6746,
+ "rIndex": 6753
+ },
+ {
+ "matcher": "Procedure TCB_IMGPSScanX.MyTreeNode2ReFresh(CaseID:String);",
+ "lIndex": 6754,
+ "rIndex": 6763
+ },
+ {
+ "matcher": "Procedure TCB_IMGPSScanX.MyTreeNode3ReFresh(CaseID:String);",
+ "lIndex": 6764,
+ "rIndex": 6771
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.Node2DocNo(Node2:TTreeNode):String; //MyTreeNode2取DocNo出來",
+ "lIndex": 6772,
+ "rIndex": 6785
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.Node3DocNo(Node3:TTreeNode):String; //MyTreeNode3取DocNo出來",
+ "lIndex": 6786,
+ "rIndex": 6799
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.Node3FormID(Node3:TTreeNode):String; //MyTreeNode3取FormCode出來",
+ "lIndex": 6800,
+ "rIndex": 6814
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.GetNode2Name(Node2:TTreeNode):String; //取MyTreeNode2的識別字出來(記之前點選用)",
+ "lIndex": 6815,
+ "rIndex": 6933
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.DownLoadImage(Path,CaseID:String):Boolean;",
+ "lIndex": 6934,
+ "rIndex": 6979
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.Down_Img(Path,CaseID:String):Boolean;",
+ "lIndex": 6980,
+ "rIndex": 7032
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.GetNoNameCase(Path:String):String; //取未配號XXXX",
+ "lIndex": 7033,
+ "rIndex": 7046
+ },
+ {
+ "matcher": "Procedure TCB_IMGPSScanX.CaseResort(Path:String); //案件的檔案重新排序(次文件依Docno排)",
+ "lIndex": 7047,
+ "rIndex": 7184
+ },
+ {
+ "matcher": "Procedure TCB_IMGPSScanX.CaseResort2Scanlist(Path:String); //案件的檔案重新排序給scanlist(次文件依FormID排)",
+ "lIndex": 7185,
+ "rIndex": 7306
+ },
+ {
+ "matcher": "Procedure TCB_IMGPSScanX.DistinctDocinCase(Path:String); //列出案件裡的Docno_版本",
+ "lIndex": 7307,
+ "rIndex": 7351
+ },
+ {
+ "matcher": "Procedure TCB_IMGPSScanX.DistinctDocNoinCase(Path:String); //列出案件裡的Docno",
+ "lIndex": 7352,
+ "rIndex": 7387
+ },
+ {
+ "matcher": "Procedure TCB_IMGPSScanX.ClearErrini(CaseID:String;CaseNode:TTreeNode); //清掉檢核檔案",
+ "lIndex": 7388,
+ "rIndex": 7406
+ },
+ {
+ "matcher": "Procedure TCB_IMGPSScanX.SetCaseList(Mode:Char;Index:Integer;text:String); //'A:加入,I:插入,D:刪除,E:修改'",
+ "lIndex": 7407,
+ "rIndex": 7445
+ },
+ {
+ "matcher": "Procedure TCB_IMGPSScanX.SetDocNoList(Mode:Char;Index:Integer;CaseNo,DocDir,Copies:String); //'A:加入,I:插入,D:刪除,E:修改'",
+ "lIndex": 7446,
+ "rIndex": 7516
+ },
+ {
+ "matcher": "Procedure TCB_IMGPSScanX.SetContextList(Mode:Char;Index:Integer;CaseNo,DocDir,FileName:String); //'A:加入,I:插入,D:刪除,E:修改'",
+ "lIndex": 7517,
+ "rIndex": 7565
+ },
+ {
+ "matcher": "Procedure TCB_IMGPSScanX.SetAttContextList(Mode:Char;Index:Integer;CaseNo,FileName:String); //'A:加入,I:插入,D:刪除,E:修改'",
+ "lIndex": 7566,
+ "rIndex": 7608
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.checkCaseOMRDone:Boolean; //檢查案件是否完成OMR檢核",
+ "lIndex": 7609,
+ "rIndex": 7623
+ },
+ {
+ "matcher": "function TCB_IMGPSScanX.checkFormCodeIsCustom(path, formcode: string): boolean;",
+ "lIndex": 7624,
+ "rIndex": 7644
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.CheckCaseID_OK:Boolean; //檢查是否有未配號的案件",
+ "lIndex": 7645,
+ "rIndex": 7659
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.CheckCaseAttach_OK:Boolean; //檢查是否有未歸類的案件",
+ "lIndex": 7660,
+ "rIndex": 7677
+ },
+ {
+ "matcher": "Procedure TCB_IMGPSScanX.CreateEmptyCase(Path,CaseID:String); //產生空白案號(重掃件用)",
+ "lIndex": 7678,
+ "rIndex": 7691
+ },
+ {
+ "matcher": "Procedure TCB_IMGPSScanX.InitScrollRec;",
+ "lIndex": 7692,
+ "rIndex": 7701
+ },
+ {
+ "matcher": "Procedure TCB_IMGPSScanX.GetScrollData(ISB:TImageScrollBox;Var HS,VS:Integer;Var iRate:Single);",
+ "lIndex": 7702,
+ "rIndex": 7711
+ },
+ {
+ "matcher": "Procedure TCB_IMGPSScanX.SetScrollData(ISB:TImageScrollBox;HS,VS:Integer;iRate:Single);",
+ "lIndex": 7712,
+ "rIndex": 7721
+ },
+ {
+ "matcher": "Procedure TCB_IMGPSScanX.FormIDReplace(CaseID,DocDir,OldFormID,NewFormID:String); //指定FormID更換成新的FormID",
+ "lIndex": 7722,
+ "rIndex": 7840
+ },
+ {
+ "matcher": "Procedure TCB_IMGPSScanX.ShowFileReplace(Path,NewFormID:String);//顯示的影像換成新的FormID",
+ "lIndex": 7841,
+ "rIndex": 7856
+ },
+ {
+ "matcher": "Procedure TCB_IMGPSScanX.PageReplaceFormID(Path,NowFormID,NewFormID:String); //選取頁更換FormID",
+ "lIndex": 7857,
+ "rIndex": 7906
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.ModeNeedCheck(OMRMode,ScanMode:String):Boolean; //掃瞄模式是否要做檢核",
+ "lIndex": 7907,
+ "rIndex": 7913
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.GetCasePage(Path,CaseID:String):Integer;",
+ "lIndex": 7914,
+ "rIndex": 7984
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.GetFormIDPage(FileList:TStringlist;FormID:String):Integer;",
+ "lIndex": 7985,
+ "rIndex": 7999
+ },
+ {
+ "matcher": "Procedure TCB_IMGPSScanX.SetFile2Case(CaseID,FileName:String);",
+ "lIndex": 8000,
+ "rIndex": 8013
+ },
+ {
+ "matcher": "Procedure TCB_IMGPSScanX.WriteResize(ImgName,TxtName:String); //產生Resize.dat",
+ "lIndex": 8014,
+ "rIndex": 8056
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.GetCase_PageCount(var CaseCount,PageCount:Integer):Boolean; //取出案件的數量及頁數",
+ "lIndex": 8057,
+ "rIndex": 8134
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.FindNoSaveBarCode : Boolean; //找是否有不要儲存影像的條碼",
+ "lIndex": 8135,
+ "rIndex": 8154
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.BarCode2CaseID : String; //Barcode依規則轉成CaseID",
+ "lIndex": 8155,
+ "rIndex": 8172
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.BarCode2FormID : String; //Barcode依規則轉成FormID",
+ "lIndex": 8173,
+ "rIndex": 8195
+ },
+ {
+ "matcher": "Procedure TCB_IMGPSScanX.WriteCaseIndex(Path:String);",
+ "lIndex": 8196,
+ "rIndex": 8213
+ },
+ {
+ "matcher": "Procedure TCB_IMGPSScanX.ReadCaseIndex(Path:String);",
+ "lIndex": 8214,
+ "rIndex": 8242
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.ReduceLogFile; //20171011 必免log檔掌太大",
+ "lIndex": 8243,
+ "rIndex": 8263
+ },
+ {
+ "matcher": "Procedure TCB_IMGPSScanX.ClearCaseIndex;",
+ "lIndex": 8264,
+ "rIndex": 8269
+ },
+ {
+ "matcher": "Procedure TCB_IMGPSScanX.GetSelectImageFile;",
+ "lIndex": 8270,
+ "rIndex": 8290
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.GetDocNoDir(Path,DocNo:String):String; //取出目前DocNo的份數",
+ "lIndex": 8291,
+ "rIndex": 8312
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.CheckFormIDExists(DocNoNode:TTreeNode;FormID:String):Boolean; //檢查FormID是否存在文件裡",
+ "lIndex": 8313,
+ "rIndex": 8327
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.DocNo2DocNoDir(Path,DocNo:String):String; //DocNo轉成DocNo(份數)目錄",
+ "lIndex": 8328,
+ "rIndex": 8349
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.DocNoDir2DocNo(DocNoDir:String):String; //DocNo(份數)目錄轉成DocNo",
+ "lIndex": 8350,
+ "rIndex": 8365
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.DocNoDir2Index(Path,DocNoDir:String):Integer; //DocNo(份數)目錄轉成index",
+ "lIndex": 8366,
+ "rIndex": 8387
+ },
+ {
+ "matcher": "Procedure TCB_IMGPSScanX.ZipMainFile(SoPath,DePath,ZipName:String);",
+ "lIndex": 8388,
+ "rIndex": 8460
+ },
+ {
+ "matcher": "Procedure TCB_IMGPSScanX.ZipMaskFile(SoPath,MarkPath,DePath,ZipName:String); //壓縮遮罩影像檔",
+ "lIndex": 8461,
+ "rIndex": 8494
+ },
+ {
+ "matcher": "Procedure TCB_IMGPSScanX.ParserPoint(S:String); //解析十字點的字串",
+ "lIndex": 8495,
+ "rIndex": 8525
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.CheckScanDenialTime:Boolean;",
+ "lIndex": 8526,
+ "rIndex": 8539
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.FormID2Anchor(FormID:String):String; //用FormID取出十字模式",
+ "lIndex": 8540,
+ "rIndex": 8551
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.Index2Anchor(Anchor:String):String; //十字模式 0->NONE;1->ANCHOR;2->FRAME",
+ "lIndex": 8552,
+ "rIndex": 8561
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.ScanDuplexCBClick(Sender: TObject);",
+ "lIndex": 8562,
+ "rIndex": 8567
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.ScanGrayCBClick(Sender: TObject);",
+ "lIndex": 8568,
+ "rIndex": 8596
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.GetFormatID(CaseID: string):String;",
+ "lIndex": 8597,
+ "rIndex": 8620
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.MemoInfoTransfer(Mode,Str:String;ID_S,Name_S:TStringlist):String; //註記代碼註記類別轉換 Mode 'ID':代碼轉名稱;'NAME':名稱轉代碼",
+ "lIndex": 8621,
+ "rIndex": 8650
+ },
+ {
+ "matcher": "Procedure TCB_IMGPSScanX.SetSQLData(ColumeStr:String;FromList,ToList:TStringlist); //把SQL值塞入",
+ "lIndex": 8651,
+ "rIndex": 8662
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.GetSQLData(TableList:TStringlist;Colname:String;colNo:Integer):String; //依欄位及索引取值",
+ "lIndex": 8663,
+ "rIndex": 8723
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.FindSQLData(TableList:TStringlist;ColumeStr,KeyColumeStr,KeyStr:String;ColNo:Integer;Var ResultList:TStringlist):Boolean; //找指定的資料",
+ "lIndex": 8724,
+ "rIndex": 8802
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.GetFindResult(Col:String):String;",
+ "lIndex": 8803,
+ "rIndex": 8820
+ },
+ {
+ "matcher": "Procedure TCB_IMGPSScanX.DataLoading(Loading:Boolean;UseTimer:Boolean); //資料載入中要停止點選的動作",
+ "lIndex": 8821,
+ "rIndex": 8855
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.CaseHelpBtnClick(Sender: TObject);",
+ "lIndex": 8856,
+ "rIndex": 8926
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.CheckCaseBtnClick(Sender: TObject);",
+ "lIndex": 8927,
+ "rIndex": 8965
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.ClearView(stkv:Integer);",
+ "lIndex": 8966,
+ "rIndex": 8981
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.DrawDocItem2(CaseNode : TTreenode;Caseno:String):Boolean; //畫出文件名稱的Tree",
+ "lIndex": 8982,
+ "rIndex": 9241
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.initkscan;",
+ "lIndex": 9242,
+ "rIndex": 9262
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.initParameter;",
+ "lIndex": 9263,
+ "rIndex": 9304
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.PrtLbClick(Sender: TObject);",
+ "lIndex": 9305,
+ "rIndex": 9375
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.UseOldCaseLbClick(Sender: TObject);",
+ "lIndex": 9376,
+ "rIndex": 9529
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.LastInitFormidListCreate(path: string);",
+ "lIndex": 9530,
+ "rIndex": 9550
+ },
+ {
+ "matcher": "function TCB_IMGPSScanX.LoadFileGetMD5(const filename: string): string;",
+ "lIndex": 9551,
+ "rIndex": 9574
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.LoadImgFile; //載入新件及替換件",
+ "lIndex": 9575,
+ "rIndex": 9660
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.LoadImgFile1; //載入新件及替換件",
+ "lIndex": 9661,
+ "rIndex": 9770
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.LoadAttFile(CaseID:String); //載入附加檔案",
+ "lIndex": 9771,
+ "rIndex": 9791
+ },
+ {
+ "matcher": "function TCB_IMGPSScanX.logTimeString: String;",
+ "lIndex": 9792,
+ "rIndex": 9796
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.FindDivFormCode(FormCode:String):Boolean; //找有沒有分案的條碼",
+ "lIndex": 9797,
+ "rIndex": 9824
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.CheckAvailable:Boolean; //檢查是否可使用元件",
+ "lIndex": 9825,
+ "rIndex": 9922
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.SmoothCBClick(Sender: TObject);",
+ "lIndex": 9923,
+ "rIndex": 9931
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.Case2Mask(SoPath,DePath:String):Boolean;//產生遮罩影像 20170639 發現沒用到",
+ "lIndex": 9932,
+ "rIndex": 9995
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.CheckNeedCrop(Graphic:TDibGraphic):Boolean; //是否是A3要切影像",
+ "lIndex": 9996,
+ "rIndex": 10021
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.GetNewCustomDocNo(Path,DocName:String):String; //取出未使用的自訂文件代號",
+ "lIndex": 10022,
+ "rIndex": 10086
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.GetCustomDocName(Path,DocNo:String):String; //取出自定文件名稱",
+ "lIndex": 10087,
+ "rIndex": 10098
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.GetCustomFormID(Path,DocNo:String):String; //取出自定文件FormID",
+ "lIndex": 10099,
+ "rIndex": 10110
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.GetCustomDocDir(Path,DocName:String):String; //取出自定文件DocDir",
+ "lIndex": 10111,
+ "rIndex": 10137
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.FindCustomDocName(Path,DocName:String):Boolean; //尋找自定文件名稱是否存在",
+ "lIndex": 10138,
+ "rIndex": 10161
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.DelAttFileLBClick(Sender: TObject);",
+ "lIndex": 10162,
+ "rIndex": 10196
+ },
+ {
+ "matcher": "Procedure TCB_IMGPSScanX.DeleteCustomDocDir(Path,DocNo:String); //刪除自定文件DocNo",
+ "lIndex": 10197,
+ "rIndex": 10208
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.CheckFormID_Prt(FormID:String):Boolean; //傳入的FormID是否預設列印",
+ "lIndex": 10209,
+ "rIndex": 10218
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.PrintImg(FileName, LoginID, Datetime,",
+ "lIndex": 10219,
+ "rIndex": 10297
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.FindLastestDocDir(CaseID,DocNo:String):String; //找出最新的DocDir",
+ "lIndex": 10298,
+ "rIndex": 10322
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.FindLastestDocDirForPage(CaseID,DocNo,formid:String):String; //找出最新的DocDir 20180207 排除隱藏的資料夾",
+ "lIndex": 10323,
+ "rIndex": 10364
+ },
+ {
+ "matcher": "Procedure TCB_IMGPSScanX.Create_Cust_DocDir(CaseID:String); //產生外面傳入的文件代號及自定文件",
+ "lIndex": 10365,
+ "rIndex": 10455
+ },
+ {
+ "matcher": "Procedure TCB_IMGPSScanX.OldCasetoNewCase(CaseID:String); //將舊案份數轉成新規則",
+ "lIndex": 10456,
+ "rIndex": 10524
+ },
+ {
+ "matcher": "Procedure TCB_IMGPSScanX.ErrFormtoCurrentForm(CaseID,EFormID,CFormID:String);//將舊案的錯誤FormID改正確的FormID",
+ "lIndex": 10525,
+ "rIndex": 10574
+ },
+ {
+ "matcher": "Procedure TCB_IMGPSScanX.SetRecordEditedDocDir(Mode:Char;CaseID,DocDir:String); //記錄被異動的文件目錄 'A:加入D:刪掉'",
+ "lIndex": 10575,
+ "rIndex": 10622
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.GetDocDir_Page(CaseID,DocDir:String):Integer;",
+ "lIndex": 10623,
+ "rIndex": 10639
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.Path2DocDir(Path,CaseID:String):String;",
+ "lIndex": 10640,
+ "rIndex": 10664
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.GetDocNo_IS_WH(DocNo:String):Boolean; //DocNo是否為入庫文件",
+ "lIndex": 10665,
+ "rIndex": 10679
+ },
+ {
+ "matcher": "Procedure TCB_IMGPSScanX.SortDocDir_FormID(CaseID,DocDir:String); //將DocDir裡的文件編號排序",
+ "lIndex": 10680,
+ "rIndex": 10752
+ },
+ {
+ "matcher": "Procedure TCB_IMGPSScanX.GotoAttach(OldLevel:Integer);",
+ "lIndex": 10753,
+ "rIndex": 10774
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.DocNoIs_In_WH(DocNo:String):Boolean; //DocNo是否為入庫文件",
+ "lIndex": 10775,
+ "rIndex": 10794
+ },
+ {
+ "matcher": "Procedure TCB_IMGPSScanX.CreateCaseNeedData(Path:String);",
+ "lIndex": 10795,
+ "rIndex": 10840
+ },
+ {
+ "matcher": "Procedure TCB_IMGPSScanX.SetDocDirtoSelected(CaseNode:TTreeNode;DocDir:String);",
+ "lIndex": 10841,
+ "rIndex": 10853
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.CheckSelectImg_UseCase(Path,CaseID:String):Boolean; //檢查選擇的影像是否有包含被引用的影像",
+ "lIndex": 10854,
+ "rIndex": 10876
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.TransOldCaseFile(Path:String):Boolean;",
+ "lIndex": 10877,
+ "rIndex": 10937
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.Writelog(CaseID : String):Boolean;",
+ "lIndex": 10938,
+ "rIndex": 10963
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.GetFtpinfo(CaseID,Action:String):Boolean;",
+ "lIndex": 10964,
+ "rIndex": 11041
+ },
+ {
+ "matcher": "Procedure TCB_IMGPSScanX.SetFtpInfo; //餵入FTP資訊",
+ "lIndex": 11042,
+ "rIndex": 11071
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.FtpCaseComplete(SendData:String):Boolean;",
+ "lIndex": 11072,
+ "rIndex": 11094
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.FormIDAppear(FormID:String):Boolean; //FormID是否可出現",
+ "lIndex": 11095,
+ "rIndex": 11120
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.DocNoAppear(DocNo:String):Boolean; //DocNo是否可出現",
+ "lIndex": 11121,
+ "rIndex": 11137
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.GetDocNoCount(CaseID,DocNo:String):Integer; //取DocNo數量",
+ "lIndex": 11138,
+ "rIndex": 11167
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.GetDocDirCopies(CaseID,DocDir:String):Integer; //取DocDir數量",
+ "lIndex": 11168,
+ "rIndex": 11197
+ },
+ {
+ "matcher": "Procedure TCB_IMGPSScanX.SetDocDirCopies(CaseID,DocDir:String;NewCopies:Integer); //修改DocDir份數",
+ "lIndex": 11198,
+ "rIndex": 11225
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.GetDocDirCopies_Rec(Path,CaseID,DocDir:String):Integer; //取記錄裡的DocDir份數",
+ "lIndex": 11226,
+ "rIndex": 11277
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.GetCustomNameCount(CustomName:String):Integer; //取外傳的名稱數量",
+ "lIndex": 11278,
+ "rIndex": 11301
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.GetCustomDocNoCount(Docno:String):Integer; //取外傳的DocNo數量",
+ "lIndex": 11302,
+ "rIndex": 11325
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.ISGuideFormID(FormID:String):Boolean;",
+ "lIndex": 11326,
+ "rIndex": 11340
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.ISDivPageFormID(FormID:String):Boolean;",
+ "lIndex": 11341,
+ "rIndex": 11356
+ },
+ {
+ "matcher": "function TCB_IMGPSScanX.ISExistImg(const filename: string): boolean;",
+ "lIndex": 11357,
+ "rIndex": 11368
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.CaseDelete_Enable(CaseID:String):Boolean; //案件可否被刪除",
+ "lIndex": 11369,
+ "rIndex": 11389
+ },
+ {
+ "matcher": "Procedure TCB_IMGPSScanX.MoveImage(Path:String;mp:Integer); //移動頁數",
+ "lIndex": 11390,
+ "rIndex": 11447
+ },
+ {
+ "matcher": "Procedure TCB_IMGPSScanX.MoveImage_Drag(Path:String;fp,tp:Integer); //拖拉移動頁數",
+ "lIndex": 11448,
+ "rIndex": 11505
+ },
+ {
+ "matcher": "Procedure TCB_IMGPSScanX.SetUseCase(Mode:Char;Path,DocDir,FormCaseID,ToCaseID:String); //記錄引用其他案件 A:加入 D:刪掉",
+ "lIndex": 11506,
+ "rIndex": 11526
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.GetUseCase(Mode:Char;Path,DocDir:String):String; //F:取被引用 To:引用",
+ "lIndex": 11527,
+ "rIndex": 11546
+ },
+ {
+ "matcher": "Procedure TCB_IMGPSScanX.Case2upload(CaseID:String);",
+ "lIndex": 11547,
+ "rIndex": 11672
+ },
+ {
+ "matcher": "Procedure TCB_IMGPSScanX.Download2Case(SoDir,DeDir:String);",
+ "lIndex": 11673,
+ "rIndex": 11844
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.FormCode2FormName(CaseID,FormCode:String):String; //用FormCode轉成文件名稱",
+ "lIndex": 11845,
+ "rIndex": 11895
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.FormCode2FileName(FormCode:String;List:TStrings):String; //用FormCode找出檔名(第一頁)",
+ "lIndex": 11896,
+ "rIndex": 11918
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.FileName2FormCode(FileName:String):String; //從檔名取出FormCode",
+ "lIndex": 11919,
+ "rIndex": 11935
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.FileName2FormName(CaseID,FileName:String):String; //從檔名取出文件名稱",
+ "lIndex": 11936,
+ "rIndex": 11940
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.FileName2ScanPage(FileName:String):Integer; //從檔名轉出掃瞄頁數",
+ "lIndex": 11941,
+ "rIndex": 11952
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.FileName2NoQuene_Filename(FileName:String):String; //取出沒有序號的檔名",
+ "lIndex": 11953,
+ "rIndex": 11965
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.FileName2Index(FileName:String):Integer; //從檔名取出在ContextList的序號",
+ "lIndex": 11966,
+ "rIndex": 11979
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.FileName2NowDcoNo(FileName:String;CtList,DNList:TStrings):String; //從檔名取出歸屬的文件代號",
+ "lIndex": 11980,
+ "rIndex": 11993
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.FormCode2DocNo(FormCode:String):String; //FormCode轉Docno",
+ "lIndex": 11994,
+ "rIndex": 12018
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.FormCode2Version(FormCode:String):String; //FormCode轉版本",
+ "lIndex": 12019,
+ "rIndex": 12023
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.FormCode2Page(FormCode:String):String; //FormCode轉頁數",
+ "lIndex": 12024,
+ "rIndex": 12028
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.DocNo2DocName(CaseID,DocNo:String):String; //Docno轉Doc名稱",
+ "lIndex": 12029,
+ "rIndex": 12066
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.DocNo2FileName(DocNo:String;List:TStrings):String; //用DocNo找出檔名(第一頁)",
+ "lIndex": 12067,
+ "rIndex": 12081
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.FormCode2WorkNo(FormCode:String):String; //用FormCode取出作業別",
+ "lIndex": 12082,
+ "rIndex": 12090
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.DocNo2WorkNo(DocNo:String):String; //用DocNo取出作業別",
+ "lIndex": 12091,
+ "rIndex": 12099
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.DocNoNeedDiv(DocNo:String):Boolean; //是否是需分份數的文件代號",
+ "lIndex": 12100,
+ "rIndex": 12112
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.CaseNode2Info(Node:TTreeNode;Mode:Char):String; //案件Node取案件編號 Mode: I:Caseno;P:Page",
+ "lIndex": 12113,
+ "rIndex": 12126
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.DocNode2Info(Node:TTreeNode;Mode:Char):String; //文件Node取文件代號 Mode: I:Docno;N:Docname;P:Page;G:Group",
+ "lIndex": 12127,
+ "rIndex": 12144
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.FormNode2Info(Node:TTreeNode;Mode:Char):String; //表單Node取表單代號 Mode: I:FormID;N:FormName;P:Page",
+ "lIndex": 12145,
+ "rIndex": 12160
+ },
+ {
+ "matcher": "Procedure TCB_IMGPSScanX.PriorPage(Page:Integer); //上一頁",
+ "lIndex": 12161,
+ "rIndex": 12171
+ },
+ {
+ "matcher": "Procedure TCB_IMGPSScanX.NextPage(Page:Integer); //下一頁",
+ "lIndex": 12172,
+ "rIndex": 12182
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.DocNoExistsinTree(CaseNode:TTreeNode;DocNo:String):Boolean; //是否己存在樹裡",
+ "lIndex": 12183,
+ "rIndex": 12198
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.DocnoNeedGroup(DocNo:String):Boolean; //傳入的DocNo是否需分組",
+ "lIndex": 12199,
+ "rIndex": 12208
+ },
+ {
+ "matcher": "Procedure TCB_IMGPSScanX.DistinctFormCode(CaseID:String); //從案件裡的FormCode取出第一頁",
+ "lIndex": 12209,
+ "rIndex": 12254
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.OMRCheckCase(CaseID:String):Boolean; //OMR檢核",
+ "lIndex": 12255,
+ "rIndex": 12950
+ },
+ {
+ "matcher": "Procedure TCB_IMGPSScanX.OMRErr2ini(CaseID,Reason,FileName,Site,RelaFileName,RelaSite,Anchor,Anchor1:String;Del,Ingnore,Display:Boolean); //OMR檢核失敗寫入ini",
+ "lIndex": 12951,
+ "rIndex": 12990
+ },
+ {
+ "matcher": "Procedure TCB_IMGPSScanX.OMRErrini2List(CaseID:String;ErrlistForm:TErrlistForm); //OMR檢核失敗從ini寫入ListView",
+ "lIndex": 12991,
+ "rIndex": 13020
+ },
+ {
+ "matcher": "function TCB_IMGPSScanX.OMRErrini2ListForLog(CaseID: String): String;",
+ "lIndex": 13021,
+ "rIndex": 13058
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.DownLanguage:Boolean; //下載多國語言檔",
+ "lIndex": 13059,
+ "rIndex": 13083
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.view_image_FormCode(Path,FormCode:String;stpage,stview:integer); //用FormCode來找影像",
+ "lIndex": 13084,
+ "rIndex": 13199
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.view_image_DocNo(Path,DocNo,FormID:String;Pages:integer); //用DocNo來找影像",
+ "lIndex": 13200,
+ "rIndex": 13394
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.ShapeName2PreViewISBName(SP:TShape):String; //轉出指定PreViewISBName",
+ "lIndex": 13395,
+ "rIndex": 13399
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.SpeedButton14Click(Sender: TObject);",
+ "lIndex": 13400,
+ "rIndex": 13422
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.SpeedButton15Click(Sender: TObject);",
+ "lIndex": 13423,
+ "rIndex": 13443
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.SpeedButton16Click(Sender: TObject);",
+ "lIndex": 13444,
+ "rIndex": 13464
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.SpeedButton17Click(Sender: TObject);",
+ "lIndex": 13465,
+ "rIndex": 13469
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.SpeedButton18Click(Sender: TObject);",
+ "lIndex": 13470,
+ "rIndex": 13474
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.SpeedButton19Click(Sender: TObject);",
+ "lIndex": 13475,
+ "rIndex": 13479
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.SpeedButton20Click(Sender: TObject);",
+ "lIndex": 13480,
+ "rIndex": 13484
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.SpeedButton21Click(Sender: TObject);",
+ "lIndex": 13485,
+ "rIndex": 13490
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.SpeedButton22Click(Sender: TObject);",
+ "lIndex": 13491,
+ "rIndex": 13496
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.SpeedButton3Click(Sender: TObject);",
+ "lIndex": 13497,
+ "rIndex": 13501
+ },
+ {
+ "matcher": "Procedure TCB_IMGPSScanX.CreatePreViewISB(Count:Integer);",
+ "lIndex": 13502,
+ "rIndex": 13550
+ },
+ {
+ "matcher": "Procedure TCB_IMGPSScanX.FreePreViewISB;",
+ "lIndex": 13551,
+ "rIndex": 13580
+ },
+ {
+ "matcher": "Procedure TCB_IMGPSScanX.FitPreViewISB;",
+ "lIndex": 13581,
+ "rIndex": 13617
+ },
+ {
+ "matcher": "Procedure TCB_IMGPSScanX.PaintShape(FromImg,ToImg:TImageScrollBox); //畫有被選取的影像",
+ "lIndex": 13618,
+ "rIndex": 13673
+ },
+ {
+ "matcher": "Procedure TCB_IMGPSScanX.FreeShapeobj(SelectISB : TImageScrollBox);",
+ "lIndex": 13674,
+ "rIndex": 13694
+ },
+ {
+ "matcher": "Procedure TCB_IMGPSScanX.ISBClick(Sender : TObject);",
+ "lIndex": 13695,
+ "rIndex": 13733
+ },
+ {
+ "matcher": "Procedure TCB_IMGPSScanX.ISBMouseMove(Sender: TObject; Shift: TShiftState;",
+ "lIndex": 13734,
+ "rIndex": 13747
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.ISBImageMouseDown(Sender: TObject; Button: TMouseButton;",
+ "lIndex": 13748,
+ "rIndex": 13821
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.ISBImageMouseUp(Sender: TObject; Button: TMouseButton;",
+ "lIndex": 13822,
+ "rIndex": 13827
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.ISBEndDrag(Sender, Target: TObject; X, Y: Integer);",
+ "lIndex": 13828,
+ "rIndex": 13832
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.ISBDragDrop(Sender, Source: TObject; X, Y: Integer);",
+ "lIndex": 13833,
+ "rIndex": 13842
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.ISBDragOver(Sender, Source: TObject; X, Y: Integer;",
+ "lIndex": 13843,
+ "rIndex": 13863
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.FindMpsView(Vmode: Integer):TImageScrollBox;",
+ "lIndex": 13864,
+ "rIndex": 13889
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.GetCaseFormID(Path:String):String; //取案件的主FormID",
+ "lIndex": 13890,
+ "rIndex": 13911
+ },
+ {
+ "matcher": "Procedure TCB_IMGPSScanX.CreateFormID_FormName(Path,CaseID:String); //產生FormID_FormName.dat",
+ "lIndex": 13912,
+ "rIndex": 13931
+ },
+ {
+ "matcher": "Procedure TCB_IMGPSScanX.CreateDocNo_DocName(Path,CaseID:String); //產生DocNo_DocName.dat",
+ "lIndex": 13932,
+ "rIndex": 13953
+ },
+ {
+ "matcher": "Procedure TCB_IMGPSScanX.CreateIn_WH(CaseID:String); //產生In_WH.dat",
+ "lIndex": 13954,
+ "rIndex": 13984
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.CreateDocNo_Info(CaseID:String):String; //產生 DocNo[tab]份數[tab]總頁數[tab]是否異動[換行]DocNo[tab]份數[tab]總頁數[tab]是否異動",
+ "lIndex": 13985,
+ "rIndex": 14068
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.CreateCustDocNo_Info(CaseID:String):String; //產生自訂文件 DocName[tab]份數[tab]總頁數[tab]是否異動[#13#10]DocName[tab]份數[tab]總頁數[tab]是否異動",
+ "lIndex": 14069,
+ "rIndex": 14121
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.CreateDocnoFrom_Info(CaseID:String):String; //產生被引進的保管袋文件資訊 Docno[tab]份數[tab]案件編號#13#10Docno[tab]份數[tab]案件編號",
+ "lIndex": 14122,
+ "rIndex": 14186
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.CreateCustDocNoFrom_Info(CaseID:String):String; //產生被引進的自定文件資訊 Docno[tab]份數[tab]案件編號#13#10Docno[tab]份數[tab]案件編號",
+ "lIndex": 14187,
+ "rIndex": 14244
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.CreateAttach_Info(CaseID:String):String; //產生是否有Attach Y:有 N:沒有",
+ "lIndex": 14245,
+ "rIndex": 14251
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.GetDocNoEdit(CaseID,DocNo,DocName:String):String; //取出DocNo是否被異動 (Y/N)",
+ "lIndex": 14252,
+ "rIndex": 14291
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.GetDocNo_Count(Path,DocNo:String):Integer; //取出文件份數",
+ "lIndex": 14292,
+ "rIndex": 14331
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.GetDocNo_Page(Path,DocNo:String):Integer; //取出文件總頁數",
+ "lIndex": 14332,
+ "rIndex": 14358
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.FormIDExists(FormCode:String;CheckDate:Boolean;index:Integer):Boolean; //檢查FormID是否存在",
+ "lIndex": 14359,
+ "rIndex": 14396
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.Case_DocNoExists(CaseID,Docno:String):Boolean; //Docno是否存在案件裡",
+ "lIndex": 14397,
+ "rIndex": 14421
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.CB1Click(Sender: TObject);",
+ "lIndex": 14422,
+ "rIndex": 14426
+ },
+ {
+ "matcher": "Procedure TCB_IMGPSScanX.ReSortFileName(Path:String); //檔名重新排序",
+ "lIndex": 14427,
+ "rIndex": 14454
+ },
+ {
+ "matcher": "Procedure TCB_IMGPSScanX.ReSortFileName_New(Path:String); //檔名重新排序",
+ "lIndex": 14455,
+ "rIndex": 14481
+ },
+ {
+ "matcher": "Procedure TCB_IMGPSScanX.ReSortFileName2Scanlist(Path:String); //檔名重新排序給Scanlist.dat",
+ "lIndex": 14482,
+ "rIndex": 14506
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.GetOMRCheckSet : Boolean; //下載OMR檢核XML檔",
+ "lIndex": 14507,
+ "rIndex": 14565
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.GetKeyinSet : Boolean; //取登打設定",
+ "lIndex": 14566,
+ "rIndex": 14624
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.CaseAsk(CaseID: string):Integer;",
+ "lIndex": 14625,
+ "rIndex": 14674
+ },
+ {
+ "matcher": "Function TCB_IMGPSScanX.CaseComplete(Path,CaseID:String;MainCase:Boolean):Boolean; //通知傳送完成",
+ "lIndex": 14675,
+ "rIndex": 14903
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.Timer1Timer(Sender: TObject);",
+ "lIndex": 14904,
+ "rIndex": 15337
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.Timer2Timer(Sender: TObject);",
+ "lIndex": 15338,
+ "rIndex": 15346
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.TransBtnClick(Sender: TObject);",
+ "lIndex": 15347,
+ "rIndex": 15538
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.TreeView1Click(Sender: TObject);",
+ "lIndex": 15539,
+ "rIndex": 15766
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.TreeView1DragDrop(Sender, Source: TObject; X, Y: Integer);",
+ "lIndex": 15767,
+ "rIndex": 15943
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.TreeView1DragOver(Sender, Source: TObject; X, Y: Integer;",
+ "lIndex": 15944,
+ "rIndex": 15978
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.TreeView1KeyUp(Sender: TObject; var Key: Word;",
+ "lIndex": 15979,
+ "rIndex": 15992
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.TreeView1MouseDown(Sender: TObject;",
+ "lIndex": 15993,
+ "rIndex": 16003
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.TreeView1MouseEnter(Sender: TObject);",
+ "lIndex": 16004,
+ "rIndex": 16008
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.TreeView1MouseMove(Sender: TObject; Shift: TShiftState;",
+ "lIndex": 16009,
+ "rIndex": 16016
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.TreeView1MouseUp(Sender: TObject; Button: TMouseButton;",
+ "lIndex": 16017,
+ "rIndex": 16032
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.ViewModeBtnMouseEnter(Sender: TObject);",
+ "lIndex": 16033,
+ "rIndex": 16037
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.Set_caseid(const Value: WideString);",
+ "lIndex": 16038,
+ "rIndex": 16042
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.Set_data(const Value: WideString);",
+ "lIndex": 16043,
+ "rIndex": 16047
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.Set_mode(const Value: WideString);",
+ "lIndex": 16048,
+ "rIndex": 16052
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.Set_rewrite(const Value: WideString);",
+ "lIndex": 16053,
+ "rIndex": 16057
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.Set_url(const Value: WideString);",
+ "lIndex": 16058,
+ "rIndex": 16062
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.Set_userid(const Value: WideString);",
+ "lIndex": 16063,
+ "rIndex": 16067
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.Set_username(const Value: WideString);",
+ "lIndex": 16068,
+ "rIndex": 16072
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.Set_verify(const Value: WideString);",
+ "lIndex": 16073,
+ "rIndex": 16077
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.Set_language(const Value: WideString);",
+ "lIndex": 16078,
+ "rIndex": 16090
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.Set_modename(const Value: WideString);",
+ "lIndex": 16091,
+ "rIndex": 16095
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.Set_userunit(const Value: WideString);",
+ "lIndex": 16096,
+ "rIndex": 16100
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.Set_work_no(const Value: WideString);",
+ "lIndex": 16101,
+ "rIndex": 16105
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.Set_loandoc_enable(const Value: WideString);",
+ "lIndex": 16106,
+ "rIndex": 16117
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.Set_loandoc_value(const Value: WideString);",
+ "lIndex": 16118,
+ "rIndex": 16122
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.Set_useproxy(const Value: WideString);",
+ "lIndex": 16123,
+ "rIndex": 16130
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.Set_c_docnamelist(const Value: WideString);",
+ "lIndex": 16131,
+ "rIndex": 16135
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.Set_c_docnolist(const Value: WideString);",
+ "lIndex": 16136,
+ "rIndex": 16140
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.Set_fixfilelist(const Value: WideString);",
+ "lIndex": 16141,
+ "rIndex": 16145
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.Set_is_in_wh(const Value: WideString);",
+ "lIndex": 16146,
+ "rIndex": 16150
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.Set_oldcaseinfo(const Value: WideString);",
+ "lIndex": 16151,
+ "rIndex": 16155
+ },
+ {
+ "matcher": "function TCB_IMGPSScanX.Get_c_docnamelist: WideString;",
+ "lIndex": 16156,
+ "rIndex": 16160
+ },
+ {
+ "matcher": "function TCB_IMGPSScanX.Get_c_docnolist: WideString;",
+ "lIndex": 16161,
+ "rIndex": 16165
+ },
+ {
+ "matcher": "function TCB_IMGPSScanX.Get_caseid: WideString;",
+ "lIndex": 16166,
+ "rIndex": 16170
+ },
+ {
+ "matcher": "function TCB_IMGPSScanX.Get_data: WideString;",
+ "lIndex": 16171,
+ "rIndex": 16175
+ },
+ {
+ "matcher": "function TCB_IMGPSScanX.Get_fixfilelist: WideString;",
+ "lIndex": 16176,
+ "rIndex": 16180
+ },
+ {
+ "matcher": "function TCB_IMGPSScanX.Get_is_in_wh: WideString;",
+ "lIndex": 16181,
+ "rIndex": 16185
+ },
+ {
+ "matcher": "function TCB_IMGPSScanX.Get_language: WideString;",
+ "lIndex": 16186,
+ "rIndex": 16190
+ },
+ {
+ "matcher": "function TCB_IMGPSScanX.Get_loandoc_enable: WideString;",
+ "lIndex": 16191,
+ "rIndex": 16195
+ },
+ {
+ "matcher": "function TCB_IMGPSScanX.Get_loandoc_value: WideString;",
+ "lIndex": 16196,
+ "rIndex": 16200
+ },
+ {
+ "matcher": "function TCB_IMGPSScanX.Get_mode: WideString;",
+ "lIndex": 16201,
+ "rIndex": 16205
+ },
+ {
+ "matcher": "function TCB_IMGPSScanX.Get_modename: WideString;",
+ "lIndex": 16206,
+ "rIndex": 16210
+ },
+ {
+ "matcher": "function TCB_IMGPSScanX.Get_oldcaseinfo: WideString;",
+ "lIndex": 16211,
+ "rIndex": 16215
+ },
+ {
+ "matcher": "function TCB_IMGPSScanX.Get_rewrite: WideString;",
+ "lIndex": 16216,
+ "rIndex": 16220
+ },
+ {
+ "matcher": "function TCB_IMGPSScanX.Get_url: WideString;",
+ "lIndex": 16221,
+ "rIndex": 16225
+ },
+ {
+ "matcher": "function TCB_IMGPSScanX.Get_useproxy: WideString;",
+ "lIndex": 16226,
+ "rIndex": 16230
+ },
+ {
+ "matcher": "function TCB_IMGPSScanX.Get_userid: WideString;",
+ "lIndex": 16231,
+ "rIndex": 16235
+ },
+ {
+ "matcher": "function TCB_IMGPSScanX.Get_username: WideString;",
+ "lIndex": 16236,
+ "rIndex": 16240
+ },
+ {
+ "matcher": "function TCB_IMGPSScanX.Get_userunit: WideString;",
+ "lIndex": 16241,
+ "rIndex": 16245
+ },
+ {
+ "matcher": "function TCB_IMGPSScanX.Get_verify: WideString;",
+ "lIndex": 16246,
+ "rIndex": 16250
+ },
+ {
+ "matcher": "function TCB_IMGPSScanX.Get_work_no: WideString;",
+ "lIndex": 16251,
+ "rIndex": 16255
+ },
+ {
+ "matcher": "function TCB_IMGPSScanX.Get_printyn: WideString;",
+ "lIndex": 16256,
+ "rIndex": 16260
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.Set_printyn(const Value: WideString);",
+ "lIndex": 16261,
+ "rIndex": 16265
+ },
+ {
+ "matcher": "function TCB_IMGPSScanX.Get_is_oldcase: WideString;",
+ "lIndex": 16266,
+ "rIndex": 16270
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.Set_is_oldcase(const Value: WideString);",
+ "lIndex": 16271,
+ "rIndex": 16275
+ },
+ {
+ "matcher": "function TCB_IMGPSScanX.Get_custdocyn: WideString;",
+ "lIndex": 16276,
+ "rIndex": 16280
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.Set_custdocyn(const Value: WideString);",
+ "lIndex": 16281,
+ "rIndex": 16285
+ },
+ {
+ "matcher": "function TCB_IMGPSScanX.Get_casenolength: WideString;",
+ "lIndex": 16286,
+ "rIndex": 16290
+ },
+ {
+ "matcher": "function TCB_IMGPSScanX.Get_filesizelimit: WideString;",
+ "lIndex": 16291,
+ "rIndex": 16295
+ },
+ {
+ "matcher": "function TCB_IMGPSScanX.Get_imgdpi: WideString;",
+ "lIndex": 16296,
+ "rIndex": 16300
+ },
+ {
+ "matcher": "function TCB_IMGPSScanX.Get_scancolor: WideString;",
+ "lIndex": 16301,
+ "rIndex": 16305
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.Set_casenolength(const Value: WideString);",
+ "lIndex": 16306,
+ "rIndex": 16320
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.Set_filesizelimit(const Value: WideString);",
+ "lIndex": 16321,
+ "rIndex": 16335
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.Set_imgdpi(const Value: WideString);",
+ "lIndex": 16336,
+ "rIndex": 16351
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.Set_scancolor(const Value: WideString);",
+ "lIndex": 16352,
+ "rIndex": 16376
+ },
+ {
+ "matcher": "function TCB_IMGPSScanX.Get_imgdelete: WideString;",
+ "lIndex": 16377,
+ "rIndex": 16381
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.Set_imgdelete(const Value: WideString);",
+ "lIndex": 16382,
+ "rIndex": 16386
+ },
+ {
+ "matcher": "function TCB_IMGPSScanX.Get_check_main_form: WideString;",
+ "lIndex": 16387,
+ "rIndex": 16391
+ },
+ {
+ "matcher": "function TCB_IMGPSScanX.Get_isExternal: WideString;",
+ "lIndex": 16392,
+ "rIndex": 16396
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.Set_check_main_form(const Value: WideString);",
+ "lIndex": 16397,
+ "rIndex": 16401
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.Set_isExternal(const Value: WideString);",
+ "lIndex": 16402,
+ "rIndex": 16406
+ },
+ {
+ "matcher": "function TCB_IMGPSScanX.Get_WH_CATEGORY: WideString;",
+ "lIndex": 16407,
+ "rIndex": 16411
+ },
+ {
+ "matcher": "procedure TCB_IMGPSScanX.Set_WH_CATEGORY(const Value: WideString);",
+ "lIndex": 16412,
+ "rIndex": 16455
+ }
+]
\ No newline at end of file
--
Gitblit v1.8.0