From a83839e2935c06f2a70ee1f2be40caca54f42aaf Mon Sep 17 00:00:00 2001
From: Hong <chlin1022@i-mps.com>
Date: 星期一, 25 五月 2020 11:19:57 +0800
Subject: [PATCH] Ver 2,0,1,72
---
CB_IMGPSScanImp.dfm | 294 +++++++++++++++++++++++++++++++++++++++-------------------
1 files changed, 196 insertions(+), 98 deletions(-)
diff --git a/CB_IMGPSScanImp.dfm b/CB_IMGPSScanImp.dfm
index f9055f9..8acac39 100644
--- a/CB_IMGPSScanImp.dfm
+++ b/CB_IMGPSScanImp.dfm
@@ -1000,37 +1000,15 @@
Height = 13
Caption = 'Label7'
end
- object TreeView1: TTreeView
+ object Splitter2: TSplitter
Left = 1
- Top = 83
+ Top = 370
Width = 289
- Height = 418
- Align = alClient
- AutoExpand = True
- Font.Charset = CHINESEBIG5_CHARSET
- Font.Color = clWindowText
- Font.Height = -16
- Font.Name = #26032#32048#26126#39636
- Font.Style = []
- HideSelection = False
- HotTrack = True
- Images = ImageList1
- Indent = 19
- ParentFont = False
- ParentShowHint = False
- PopupMenu = PopupMenu1
- ReadOnly = True
- ShowButtons = False
- ShowHint = False
- ShowRoot = False
- TabOrder = 1
- OnClick = TreeView1Click
- OnDragDrop = TreeView1DragDrop
- OnDragOver = TreeView1DragOver
- OnKeyUp = TreeView1KeyUp
- OnMouseEnter = TreeView1MouseEnter
- OnMouseMove = TreeView1MouseMove
- OnMouseUp = TreeView1MouseUp
+ Height = 7
+ Cursor = crVSplit
+ Align = alBottom
+ Visible = False
+ ExplicitTop = 419
end
object Panel6: TPanel
Left = 1
@@ -1177,7 +1155,7 @@
Font.Name = #26032#32048#26126#39636
Font.Style = [fsUnderline]
ParentFont = False
- TabOrder = 2
+ TabOrder = 1
Visible = False
object UseOldCaseLb: TLabel
Left = 9
@@ -1195,52 +1173,162 @@
OnClick = UseOldCaseLbClick
end
end
- object Panel13: TPanel
+ object AttFileGB: TGroupBox
Left = 1
- Top = 501
+ Top = 377
Width = 289
- Height = 36
+ Height = 160
Align = alBottom
+ Caption = 'PDF'#27284
+ Font.Charset = DEFAULT_CHARSET
+ Font.Color = clWindowText
+ Font.Height = -13
+ Font.Name = 'Tahoma'
+ Font.Style = []
+ ParentFont = False
+ TabOrder = 2
+ Visible = False
+ object AttListBox: TListBox
+ Left = 2
+ Top = 38
+ Width = 285
+ Height = 120
+ Align = alClient
+ ItemHeight = 16
+ MultiSelect = True
+ TabOrder = 0
+ OnClick = AttListBoxClick
+ OnDblClick = AttListBoxDblClick
+ end
+ object Panel20: TPanel
+ Left = 2
+ Top = 18
+ Width = 285
+ Height = 20
+ Align = alTop
+ TabOrder = 1
+ object AddAttFileLB: TLabel
+ Left = 160
+ Top = 1
+ Width = 30
+ Height = 16
+ Cursor = crHandPoint
+ Caption = #21152#20837
+ Enabled = False
+ Font.Charset = DEFAULT_CHARSET
+ Font.Color = clBlue
+ Font.Height = -13
+ Font.Name = 'Tahoma'
+ Font.Style = [fsUnderline]
+ ParentFont = False
+ OnClick = AddAttFileLBClick
+ end
+ object DelAttFileLB: TLabel
+ Left = 214
+ Top = 1
+ Width = 30
+ Height = 16
+ Cursor = crHandPoint
+ Caption = #31227#38500
+ Enabled = False
+ Font.Charset = DEFAULT_CHARSET
+ Font.Color = clBlue
+ Font.Height = -13
+ Font.Name = 'Tahoma'
+ Font.Style = [fsUnderline]
+ ParentFont = False
+ OnClick = DelAttFileLBClick
+ end
+ end
+ end
+ object Panel17: TPanel
+ Left = 1
+ Top = 83
+ Width = 289
+ Height = 287
+ Align = alClient
+ Caption = 'Panel17'
TabOrder = 3
- object PrtLb: TLabel
- Left = 9
- Top = 8
- Width = 32
- Height = 16
- Cursor = crHandPoint
- Caption = #21015#21360
- Font.Charset = ANSI_CHARSET
- Font.Color = clBlue
+ object TreeView1: TTreeView
+ Left = 1
+ Top = 1
+ Width = 287
+ Height = 245
+ Align = alClient
+ AutoExpand = True
+ Font.Charset = CHINESEBIG5_CHARSET
+ Font.Color = clWindowText
Font.Height = -16
Font.Name = #26032#32048#26126#39636
- Font.Style = [fsUnderline]
+ Font.Style = []
+ HideSelection = False
+ HotTrack = True
+ Images = ImageList1
+ Indent = 19
ParentFont = False
- Visible = False
- OnClick = PrtLbClick
- end
- object CaseHelpBtn: TBitBtn
- Left = 94
- Top = 5
- Width = 75
- Height = 25
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 04000000000000010000120B0000120B00001000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
- 3333333333FFFFF3333333333F797F3333333333F737373FF333333BFB999BFB
- 33333337737773773F3333BFBF797FBFB33333733337333373F33BFBFBFBFBFB
- FB3337F33333F33337F33FBFBFB9BFBFBF3337333337F333373FFBFBFBF97BFB
- FBF37F333337FF33337FBFBFBFB99FBFBFB37F3333377FF3337FFBFBFBFB99FB
- FBF37F33333377FF337FBFBF77BF799FBFB37F333FF3377F337FFBFB99FB799B
- FBF373F377F3377F33733FBF997F799FBF3337F377FFF77337F33BFBF99999FB
- FB33373F37777733373333BFBF999FBFB3333373FF77733F7333333BFBFBFBFB
- 3333333773FFFF77333333333FBFBF3333333333377777333333}
- NumGlyphs = 2
+ ParentShowHint = False
+ PopupMenu = PopupMenu1
+ ReadOnly = True
+ ShowButtons = False
+ ShowHint = False
+ ShowRoot = False
TabOrder = 0
- TabStop = False
- Visible = False
- OnClick = CaseHelpBtnClick
+ OnClick = TreeView1Click
+ OnDragDrop = TreeView1DragDrop
+ OnDragOver = TreeView1DragOver
+ OnKeyUp = TreeView1KeyUp
+ OnMouseDown = TreeView1MouseDown
+ OnMouseEnter = TreeView1MouseEnter
+ OnMouseMove = TreeView1MouseMove
+ OnMouseUp = TreeView1MouseUp
+ end
+ object Panel13: TPanel
+ Left = 1
+ Top = 246
+ Width = 287
+ Height = 40
+ Align = alBottom
+ TabOrder = 1
+ object PrtLb: TLabel
+ Left = 9
+ Top = 15
+ Width = 32
+ Height = 16
+ Cursor = crHandPoint
+ Caption = #21015#21360
+ Font.Charset = ANSI_CHARSET
+ Font.Color = clBlue
+ Font.Height = -16
+ Font.Name = #26032#32048#26126#39636
+ Font.Style = [fsUnderline]
+ ParentFont = False
+ Visible = False
+ OnClick = PrtLbClick
+ end
+ object CaseHelpBtn: TBitBtn
+ Left = 98
+ Top = 6
+ Width = 80
+ Height = 27
+ Glyph.Data = {
+ 76010000424D7601000000000000760000002800000020000000100000000100
+ 04000000000000010000120B0000120B00001000000000000000000000000000
+ 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
+ FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
+ 3333333333FFFFF3333333333F797F3333333333F737373FF333333BFB999BFB
+ 33333337737773773F3333BFBF797FBFB33333733337333373F33BFBFBFBFBFB
+ FB3337F33333F33337F33FBFBFB9BFBFBF3337333337F333373FFBFBFBF97BFB
+ FBF37F333337FF33337FBFBFBFB99FBFBFB37F3333377FF3337FFBFBFBFB99FB
+ FBF37F33333377FF337FBFBF77BF799FBFB37F333FF3377F337FFBFB99FB799B
+ FBF373F377F3377F33733FBF997F799FBF3337F377FFF77337F33BFBF99999FB
+ FB33373F37777733373333BFBF999FBFB3333373FF77733F7333333BFBFBFBFB
+ 3333333773FFFF77333333333FBFBF3333333333377777333333}
+ NumGlyphs = 2
+ TabOrder = 0
+ TabStop = False
+ Visible = False
+ OnClick = CaseHelpBtnClick
+ end
end
end
end
@@ -5671,36 +5759,6 @@
Left = 672
Top = 408
end
- object HTTPSClient: TElHTTPSClient
- Versions = [sbSSL2, sbSSL3, sbTLS1]
- LocalPort = 0
- IncomingSpeedLimit = 0
- OutgoingSpeedLimit = 0
- UseSSLSessionResumption = False
- SocksAuthentication = saNoAuthentication
- WebTunnelPort = 3128
- SocketBinding.Port = 0
- SocketBinding.PortRangeFrom = 0
- SocketBinding.PortRangeTo = 0
- RenegotiationAttackPreventionMode = rapmCompatible
- SSLEnabled = False
- RequestParameters.ContentLength = -1
- RequestParameters.ContentRangeStart = -1
- RequestParameters.ContentRangeEnd = -1
- RequestParameters.UserAgent = 'SecureBlackbox'
- PreferKeepAlive = False
- ForceKeepAliveIfConnectionHeaderIsAbsent = False
- HTTPVersion = hvHTTP10
- UseNTLMAuth = False
- UseDigestAuth = False
- ForceNTLMAuth = False
- SendBufferSize = 1024576
- HTTPProxyPort = 3128
- UseHTTPProxy = False
- OnCertificateValidate = HTTPSClientCertificateValidate
- Left = 512
- Top = 408
- end
object ImageList1: TImageList
Left = 32
Top = 360
@@ -9589,4 +9647,44 @@
Left = 464
Top = 296
end
+ object HTTPSClient: TElHTTPSClient
+ SocketTimeout = 60000
+ Versions = [sbTLS1, sbTLS11, sbTLS12]
+ SSLOptions = [ssloAutoAddServerNameExtension]
+ LocalPort = 0
+ IncomingSpeedLimit = 0
+ OutgoingSpeedLimit = 0
+ UseSSLSessionResumption = False
+ ForceResumeIfDestinationChanges = False
+ SocksAuthentication = saNoAuthentication
+ WebTunnelPort = 3128
+ SocketBinding.Port = 0
+ SocketBinding.ReuseAddress = False
+ SocketBinding.PortRangeFrom = 0
+ SocketBinding.PortRangeTo = 0
+ RenegotiationAttackPreventionMode = rapmAuto
+ SSLEnabled = False
+ RequestParameters.ContentLength = -1
+ RequestParameters.ContentRangeStart = -1
+ RequestParameters.ContentRangeEnd = -1
+ RequestParameters.ContentRangeFullSize = -1
+ RequestParameters.UserAgent = 'SecureBlackbox'
+ RequestCompressionLevel = 0
+ RequestCompressionGZip = False
+ KeepAlivePolicy = kapStandardDefined
+ HTTPVersion = hvHTTP10
+ UseNTLMAuth = False
+ UseDigestAuth = False
+ PersistentAuthHeader = True
+ ForceNTLMAuth = False
+ Use100Continue = False
+ HTTPProxyPort = 3128
+ HTTPProxyAuthentication = wtaNoAuthentication
+ UseHTTPProxy = False
+ IgnoreUnknownTransferEncodings = False
+ OnRedirection = HTTPSClientRedirection
+ OnCertificateValidate = HTTPSClientCertificateValidate
+ Left = 464
+ Top = 368
+ end
end
--
Gitblit v1.8.0