From 9813709508da931f2e0cbd7180c647fc0d9d99f5 Mon Sep 17 00:00:00 2001
From: doom4ster <doom4ster@gmail.com>
Date: 星期六, 18 二月 2017 15:38:26 +0800
Subject: [PATCH] 拿掉授權檢查
---
CB_IMGPSScanImp.dfm | 36 -----------------
CB_IMGPSScanImp.dcu | 0
CB_IMGPSScan.ocx | 0
CB_IMGPSScan.dproj | 8 ++--
CB_IMGPSScan.res | 0
CB_IMGPSScanImp.pas | 42 ++++++++++++---------
CB_IMGPSScan.identcache | 0
7 files changed, 29 insertions(+), 57 deletions(-)
diff --git a/CB_IMGPSScan.dproj b/CB_IMGPSScan.dproj
index 7e496fb..df201db 100644
--- a/CB_IMGPSScan.dproj
+++ b/CB_IMGPSScan.dproj
@@ -68,14 +68,14 @@
<BuildConfiguration Include="Base">
<Key>Base</Key>
</BuildConfiguration>
- <BuildConfiguration Include="Debug">
- <Key>Cfg_2</Key>
- <CfgParent>Base</CfgParent>
- </BuildConfiguration>
<BuildConfiguration Include="Release">
<Key>Cfg_1</Key>
<CfgParent>Base</CfgParent>
</BuildConfiguration>
+ <BuildConfiguration Include="Debug">
+ <Key>Cfg_2</Key>
+ <CfgParent>Base</CfgParent>
+ </BuildConfiguration>
</ItemGroup>
<Import Project="$(BDS)\Bin\CodeGear.Delphi.Targets" Condition="Exists('$(BDS)\Bin\CodeGear.Delphi.Targets')"/>
<ProjectExtensions>
diff --git a/CB_IMGPSScan.identcache b/CB_IMGPSScan.identcache
index 6104eb6..8e78345 100644
--- a/CB_IMGPSScan.identcache
+++ b/CB_IMGPSScan.identcache
Binary files differ
diff --git a/CB_IMGPSScan.ocx b/CB_IMGPSScan.ocx
index 43102b6..6d82a8e 100644
--- a/CB_IMGPSScan.ocx
+++ b/CB_IMGPSScan.ocx
Binary files differ
diff --git a/CB_IMGPSScan.res b/CB_IMGPSScan.res
index b9a71e2..fd7ab77 100644
--- a/CB_IMGPSScan.res
+++ b/CB_IMGPSScan.res
Binary files differ
diff --git a/CB_IMGPSScanImp.dcu b/CB_IMGPSScanImp.dcu
index eb7b925..2515c82 100644
--- a/CB_IMGPSScanImp.dcu
+++ b/CB_IMGPSScanImp.dcu
Binary files differ
diff --git a/CB_IMGPSScanImp.dfm b/CB_IMGPSScanImp.dfm
index 0dda2ec..a8b6131 100644
--- a/CB_IMGPSScanImp.dfm
+++ b/CB_IMGPSScanImp.dfm
@@ -56,7 +56,6 @@
Width = 42
Height = 50
Align = alLeft
- DoubleBuffered = True
Glyph.Data = {
360C0000424D360C000000000000360000002800000020000000200000000100
180000000000000C0000C40E0000C40E00000000000000000000808000808000
@@ -156,7 +155,6 @@
808000808000808000808000808000808000808000808000908FFF5F60FF8080
0080800080800080800080800080800080800080800080800080800080800080
8000808000808000808000808000808000808000808000808000}
- ParentDoubleBuffered = False
TabOrder = 0
TabStop = False
OnClick = TransBtnClick
@@ -272,7 +270,6 @@
Top = 1
Width = 41
Height = 49
- DoubleBuffered = True
Glyph.Data = {
360C0000424D360C000000000000360000002800000020000000200000000100
180000000000000C0000C40E0000C40E00000000000000000000808000808000
@@ -372,7 +369,6 @@
8080008080008080008080008080008080008080008080008080008080008080
0080800080800080800080800080800080800080800080800080800080800080
8000808000808000808000808000808000808000808000808000}
- ParentDoubleBuffered = False
TabOrder = 2
TabStop = False
OnClick = OptionBtnClick
@@ -482,7 +478,6 @@
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF}
- ParentDoubleBuffered = False
TabOrder = 3
TabStop = False
OnClick = SelectScanBtnClick
@@ -492,7 +487,6 @@
Top = 1
Width = 42
Height = 49
- DoubleBuffered = True
Glyph.Data = {
36080000424D3608000000000000360400002800000020000000200000000100
08000000000000040000C40E0000C40E00000001000000000000000000000000
@@ -560,7 +554,6 @@
FFFFFFFFFFFFA449FFFFFFFFFFFFFFFFA400FFFFA44902020202A4F7F7F7F7F7
F7F7F7F7F7F7A4A4A4A4A4A4A4A4A4A40700F7F7A40202020202020202020202
0202020202020202020202020202020202020202020202020202}
- ParentDoubleBuffered = False
TabOrder = 4
TabStop = False
OnClick = NextPageBtnClick
@@ -570,7 +563,6 @@
Top = 1
Width = 42
Height = 49
- DoubleBuffered = True
Glyph.Data = {
36080000424D3608000000000000360400002800000020000000200000000100
08000000000000040000C40E0000C40E00000001000000000000000000000000
@@ -638,7 +630,6 @@
FFFFFFFFFFFFA449FFFFFFFFFFFFFFFFA400FFFFA44902020202A4F7F7F7F7F7
F7F7F7F7F7F7A4A4A4A4A4A4A4A4A4A40700F7F7A40202020202020202020202
0202020202020202020202020202020202020202020202020202}
- ParentDoubleBuffered = False
TabOrder = 5
TabStop = False
OnClick = PrePageBtnClick
@@ -648,8 +639,6 @@
Top = 1
Width = 42
Height = 49
- DoubleBuffered = True
- ParentDoubleBuffered = False
TabOrder = 6
TabStop = False
OnClick = FC6Click
@@ -659,8 +648,6 @@
Top = 1
Width = 42
Height = 49
- DoubleBuffered = True
- ParentDoubleBuffered = False
TabOrder = 7
TabStop = False
OnClick = FC5Click
@@ -670,8 +657,6 @@
Top = 1
Width = 42
Height = 49
- DoubleBuffered = True
- ParentDoubleBuffered = False
TabOrder = 8
TabStop = False
OnClick = FC4Click
@@ -681,8 +666,6 @@
Top = 1
Width = 42
Height = 49
- DoubleBuffered = True
- ParentDoubleBuffered = False
TabOrder = 9
TabStop = False
OnClick = FC3Click
@@ -692,8 +675,6 @@
Top = 1
Width = 42
Height = 49
- DoubleBuffered = True
- ParentDoubleBuffered = False
TabOrder = 10
TabStop = False
OnClick = FC2Click
@@ -703,8 +684,6 @@
Top = 1
Width = 42
Height = 49
- DoubleBuffered = True
- ParentDoubleBuffered = False
TabOrder = 11
TabStop = False
OnClick = FC1Click
@@ -714,8 +693,6 @@
Top = 1
Width = 42
Height = 49
- DoubleBuffered = True
- ParentDoubleBuffered = False
TabOrder = 12
TabStop = False
OnClick = FC0Click
@@ -749,7 +726,6 @@
Top = 1
Width = 42
Height = 50
- DoubleBuffered = True
Glyph.Data = {
360C0000424D360C000000000000360000002800000020000000200000000100
180000000000000C0000C40E0000C40E00000000000000000000808000808000
@@ -849,7 +825,6 @@
8080008080008080008080008080008080008080008080008080008080008080
0080800080800080800080800080800080800080800080800080800080800080
8000808000808000808000808000808000808000808000808000}
- ParentDoubleBuffered = False
TabOrder = 0
TabStop = False
OnClick = NewScanBtnClick
@@ -859,7 +834,6 @@
Top = 0
Width = 42
Height = 50
- DoubleBuffered = True
Glyph.Data = {
360C0000424D360C000000000000360000002800000020000000200000000100
180000000000000C000000000000000000000000000000000000808000808000
@@ -959,7 +933,6 @@
8080008080008080008080008080008080008080008080008080008080008080
0080800080800080800080800080800080800080800080800080800080800080
8000808000808000808000808000808000808000808000808000}
- ParentDoubleBuffered = False
TabOrder = 1
TabStop = False
Visible = False
@@ -1122,7 +1095,6 @@
Top = 9
Width = 27
Height = 28
- DoubleBuffered = True
Glyph.Data = {
06020000424D0602000000000000760000002800000028000000140000000100
0400000000009001000000000000000000001000000000000000000000000000
@@ -1142,7 +1114,6 @@
333333333EEEE333333333333333333333333333333333333333333333333333
33333333333333333333}
NumGlyphs = 2
- ParentDoubleBuffered = False
TabOrder = 3
TabStop = False
Visible = False
@@ -1153,7 +1124,6 @@
Top = 9
Width = 27
Height = 28
- DoubleBuffered = True
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
@@ -1168,7 +1138,6 @@
555577F7F7F7F7F75F5550707070700B055557F7F7F7F7757FF5507070707050
9055575757575757775505050505055505557575757575557555}
NumGlyphs = 2
- ParentDoubleBuffered = False
TabOrder = 4
TabStop = False
Visible = False
@@ -1179,7 +1148,6 @@
Top = 19
Width = 51
Height = 25
- DoubleBuffered = True
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
0400000000008000000000000000000000001000000000000000000000000000
@@ -1189,7 +1157,6 @@
00080F888700078000880F8800FFF00008880F807FFFF07088880F70E000F080
78880F0EFEFEF08808880F0F0000F0880888000EFEFFF0880888887000000080
7888888008888870888888880088800888888888870007888888}
- ParentDoubleBuffered = False
TabOrder = 5
TabStop = False
Visible = False
@@ -1254,7 +1221,6 @@
Top = 5
Width = 75
Height = 25
- DoubleBuffered = True
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
@@ -1269,7 +1235,6 @@
FB33373F37777733373333BFBF999FBFB3333373FF77733F7333333BFBFBFBFB
3333333773FFFF77333333333FBFBF3333333333377777333333}
NumGlyphs = 2
- ParentDoubleBuffered = False
TabOrder = 0
TabStop = False
Visible = False
@@ -9341,6 +9306,7 @@
object PopupMenu1: TPopupMenu
AutoHotkeys = maManual
AutoPopup = False
+ OnPopup = PopupMenu1Popup
Left = 136
Top = 249
object PM101: TMenuItem
diff --git a/CB_IMGPSScanImp.pas b/CB_IMGPSScanImp.pas
index dec6c88..78c425b 100644
--- a/CB_IMGPSScanImp.pas
+++ b/CB_IMGPSScanImp.pas
@@ -3096,6 +3096,7 @@
begin
if (FMode = 'NSCAN') then
begin
+//ShowMessage('AAAA');
PM101.Visible := True; //�R��
PM103.Visible := True; //���˾��[�J�v��
PM104.Visible := True; //�ɮץ[�J�v��
@@ -3399,6 +3400,8 @@
procedure TCB_IMGPSScanX.StatusBar1DblClick(Sender: TObject);
begin
+ Button3.Visible := not Button3.Visible;
+ Button4.Visible := not Button4.Visible;
if (GetKeyState(VK_CONTROL) < 0) Then
begin
ExportBt.Visible := not ExportBt.Visible;
@@ -10821,8 +10824,8 @@
Function TCB_IMGPSScanX.DownLanguage:Boolean; //�U���h��y����
begin
Result := True; // http://192.168.0.101:8080/fbnp/servlet/CWC01?act=getservertime
-
- If not ProcessServlet(HTTPSClient,FURL+'Language.Lng','',FReWrite,Memo1,False) Then
+ //dnFile(HTTPSClient,FUrl+'Language.Lng','','',LngPath+'Language.Lng',FReWrite.Text,Memo1,False,DownImgStatus)
+ If not dnFile(HTTPSClient,FUrl+'Language.Lng','','',LngPath+'Language.Lng',FReWrite,Memo1,False,'') Then
begin
HttpErrStr := _Msg('���~�N�X:')+inttostr(HttpError.HttpErrorCode)+','+HttpError.HttpReason;
Result := False;
@@ -12793,26 +12796,29 @@
Del_Sub_NothingPath(ImagePath); //�M���ץ�ؿ��O�Ū�
ShowText := _Msg('��Ƹ��J��,�еy��');
DataLoading(True,True);
- if not CheckAvailable Then //�ˬd���v
- begin
- DataLoading(False,False);
- Panel1.Enabled := False;
- Panel2.Enabled := False;
- Exit;
- end;
-ShowMessage('CheckAvailable');
+
+// if not CheckAvailable Then //�ˬd���v 20170218 �����ΤF
+// begin
+// DataLoading(False,False);
+// Panel1.Enabled := False;
+// Panel2.Enabled := False;
+// Exit;
+// end;
+
+
+//ShowMessage('CheckAvailable');
ShowText := _Msg('��Ƹ��J��,�еy��');
DataLoading(True,True);
- ////�U���y����/////
- If not DownLanguage Then
- begin
- Showmessage('Language File error!!'+HttpErrStr);
- DataLoading(False,False);
- Exit;
- end;
+ ////�U���y����///// 20170218 �����եH�K����
+// If not DownLanguage Then
+// begin
+// Showmessage('Language File error!!'+HttpErrStr);
+// DataLoading(False,False);
+// Exit;
+// end;
- InitialLanguage(Self); //���J�h��y��
+ //InitialLanguage(Self); //���J�h��y��
////�U���y����/////
if (FMode = 'RSCAN') or (FMode = 'ESCAN') or (FMode = 'FSCAN') then //������β��ʥ�n�u�౽���w�s������
begin
--
Gitblit v1.8.0