VFPX · lscheffler · Feb 22, 2023 · Feb 22, 2023 · Feb 22, 2023
diff --git a/FOXUSER_9.FPT b/FOXUSER_9.FPT
diff --git a/FOXUSER_9.dbf b/FOXUSER_9.dbf
diff --git a/Source/BuildGoFish.PRG b/Source/BuildGoFish.PRG
@@ -17,7 +17,7 @@ Cd (lcSourceLoc)
 
 *== Most of these local variables will make their way into BuildGoFish.h
 lcVersion = '5.1'
-lcBuild = '009' && <---- Set your desired version level of the tool here
+lcBuild = '010' && <---- Set your desired version level of the tool here
 && This will be used on the GoFish form and will live on the
 && the _GoFish object that gets attached to _Screen at run time.
 

diff --git a/Source/BuildGoFish.h b/Source/BuildGoFish.h
@@ -1,10 +1,10 @@
 	#DEFINE GOFISH_APP_NAME 'GoFish5'
 	#DEFINE GOFISH_APP_FILE  'GoFish5.app'
-	#DEFINE GOFISH_VERSION '5.1.009'
-	#DEFINE GOFISH_BUILDDATE '31. Januar 2023, '
-	#DEFINE GOFISH_DBUILDDATE Date(2023,1, 31)
+	#DEFINE GOFISH_VERSION '5.1.010'
+	#DEFINE GOFISH_BUILDDATE '22. Februar 2023, '
+	#DEFINE GOFISH_DBUILDDATE Date(2023,2, 22)
 	#DEFINE GOFISH_DOWNLOAD_URL 'https://raw.githubusercontent.com/VFPX/GoFish/master/Source/Source.zip'
-	#DEFINE GOFISH_VERSION_STRING_FOR_VERSION_FILE 'GoFish5 - 5.1.009 - 31. Januar 2023,  - 20230131'
+	#DEFINE GOFISH_VERSION_STRING_FOR_VERSION_FILE 'GoFish5 - 5.1.010 - 22. Februar 2023,  - 20230222'
 	#DEFINE THOR_TOOL_NAME	'Thor_Tool_GoFish5'
 	#DEFINE VERSON_FILE_URL	'https://github.com/VFPX/GoFish/_GoFishVersionFile.txt'
 	#DEFINE VERSION_LOCAL_FILE 'GoFishVersionFile.txt'

diff --git a/Source/Forms/gf_collection_explorer.SCT b/Source/Forms/gf_collection_explorer.SCT
diff --git a/Source/Forms/gf_collection_explorer.scx b/Source/Forms/gf_collection_explorer.scx
diff --git a/Source/Forms/gofish_about.SCT b/Source/Forms/gofish_about.SCT
diff --git a/Source/Forms/gofish_about.sc2 b/Source/Forms/gofish_about.sc2
@@ -216,7 +216,7 @@ DEFINE CLASS gf_help AS gf_baseform OF "..\lib\gofishui.vcx"
 	ENDPROC
 
 	PROCEDURE Label1.Click
-		Shell('http://groups.google.com/group/foxprogofish')
+		GF_Shell('http://groups.google.com/group/foxprogofish')
 
 	ENDPROC
 
@@ -237,7 +237,7 @@ DEFINE CLASS gf_help AS gf_baseform OF "..\lib\gofishui.vcx"
 	ENDPROC
 
 	PROCEDURE lblGoFishOnVFPx.Click
-		Shell('https://github.com/VFPX/GoFish')
+		GF_Shell('https://github.com/VFPX/GoFish')
 
 	ENDPROC
 

diff --git a/Source/Forms/gofish_about.scx b/Source/Forms/gofish_about.scx
diff --git a/Source/Forms/gofish_advaccedreplacehelp.SCT b/Source/Forms/gofish_advaccedreplacehelp.SCT
diff --git a/Source/Forms/gofish_advaccedreplacehelp.sc2 b/Source/Forms/gofish_advaccedreplacehelp.sc2
@@ -143,7 +143,7 @@ DEFINE CLASS gf_baseform1 AS gf_baseform OF "..\lib\gofishui.vcx"
 
 	PROCEDURE lblGoFishOnVFPx.Click
 		messagebox('No help available at this time.', 0, 'GoFish')
-		*** TODO: Shell('URL for replace help')
+		*** TODO: GF_Shell('URL for replace help')
 
 	ENDPROC
 

diff --git a/Source/Forms/gofish_advaccedreplacehelp.scx b/Source/Forms/gofish_advaccedreplacehelp.scx
diff --git a/Source/Forms/gofish_advanced.scx b/Source/Forms/gofish_advanced.scx
diff --git a/Source/Forms/gofish_extendsearch.scx b/Source/Forms/gofish_extendsearch.scx
diff --git a/Source/Forms/gofish_filter.scx b/Source/Forms/gofish_filter.scx
diff --git a/Source/Forms/gofish_filterpf.SCT b/Source/Forms/gofish_filterpf.SCT
diff --git a/Source/Forms/gofish_filterpf.scx b/Source/Forms/gofish_filterpf.scx
diff --git a/Source/Forms/gofish_options.SCT b/Source/Forms/gofish_options.SCT
diff --git a/Source/Forms/gofish_options.sc2 b/Source/Forms/gofish_options.sc2
@@ -2384,9 +2384,9 @@ DEFINE CLASS gf_options AS gf_baseform OF "..\lib\gofishui.vcx"
 			Case !Empty(m.tcFolder)
 		*just store folder given
 				lcFolder = m.tcFolder
-				llFound  = Create_LocalPath(@lcFolder, .F., .F., .T.)
+				llFound  = GF_Create_LocalPath(@lcFolder, .F., .F., .T.)
 
-				Put_LocalPath(m.lcFolder)
+				GF_Put_LocalPath(m.lcFolder)
 
 			Case Thisform.oForm.nFirstLoad#2
 		*nothing to do
@@ -2398,7 +2398,7 @@ DEFINE CLASS gf_options AS gf_baseform OF "..\lib\gofishui.vcx"
 		*nothing to do, activate
 				llSet = .T.
 
-			Case Get_LocalPath(@tcFolder) And Directory(m.tcFolder)
+			Case GF_Get_LocalPath(@tcFolder) And Directory(m.tcFolder)
 		*found resource, activate
 				Thisform.cCR_StoreLocal_Option = m.tcFolder
 				Thisform.cCR_StoreLocal_Set    = m.tcFolder
@@ -2407,13 +2407,13 @@ DEFINE CLASS gf_options AS gf_baseform OF "..\lib\gofishui.vcx"
 		*pick a folder, or use default path
 
 				tcFolder = Iif(Thisform.oForm.lCR_Local_Default,'',Justpath(Set("Resource",1)))
-				llFound  = Create_LocalPath(@tcFolder, .F., Thisform.oForm.lCR_Local_Default, Thisform.oForm.lCR_Local_Default)
+				llFound  = GF_Create_LocalPath(@tcFolder, .F., Thisform.oForm.lCR_Local_Default, Thisform.oForm.lCR_Local_Default)
 
 				If Directory(m.tcFolder) Then
 		*folder found, activate
 					Thisform.cCR_StoreLocal_Option = m.tcFolder
 					Thisform.cCR_StoreLocal_Set    = m.tcFolder
-					Put_LocalPath(m.tcFolder)
+					GF_Put_LocalPath(m.tcFolder)
 					llSet = .T.
 				Else  &&Directory(m.tcFolder)
 					Thisform.oForm.lCR_Local = .F.
@@ -2466,12 +2466,12 @@ DEFINE CLASS gf_options AS gf_baseform OF "..\lib\gofishui.vcx"
 	ENDPROC
 
 	PROCEDURE pfSettings.Page1.Label3.Click
-		Shell('https://github.com/VFPX/Thor')
+		GF_Shell('https://github.com/VFPX/Thor')
 
 	ENDPROC
 
 	PROCEDURE pfSettings.Page1.Label5.Click
-		Shell('https://github.com/VFPX/GoFish')
+		GF_Shell('https://github.com/VFPX/GoFish')
 
 	ENDPROC
 
@@ -2543,7 +2543,7 @@ DEFINE CLASS gf_options AS gf_baseform OF "..\lib\gofishui.vcx"
 		lcPath = '"' + Thisform.cCR_StoreLocal + '"'
 		*/SF 20221018 -> local storage
 
-		OpenExplorerWindow(lcPath)
+		GF_OpenExplorerWindow(lcPath)
 	ENDPROC
 
 	PROCEDURE pfSettings.pageAdvanced.cmdSetFolder.Click
@@ -2611,13 +2611,13 @@ DEFINE CLASS gf_options AS gf_baseform OF "..\lib\gofishui.vcx"
 		lcPath = '"' + Addbs(Thisform.cCR_StoreLocal + 'GoFishBackups') + '"'
 		*/SF 20221018 -> local storage
 
-		OpenExplorerWindow(lcPath)
+		GF_OpenExplorerWindow(lcPath)
 
 	ENDPROC
 
 	PROCEDURE pfSettings.pageBackups.Label2.Click
 		messagebox('No help available at this time.', 0, 'GoFish')
-		*** TODO: Shell('URL for backup help')
+		*** TODO: GF_Shell('URL for backup help')
 
 	ENDPROC
 
@@ -2853,7 +2853,7 @@ DEFINE CLASS gf_options AS gf_baseform OF "..\lib\gofishui.vcx"
 		lcPath = '"' + Thisform.cCR_StoreLocal + lcFolder  + '"'
 		*/SF 20221018 -> local storage
 
-		OpenExplorerWindow(lcPath) 
+		GF_OpenExplorerWindow(lcPath) 
 	ENDPROC
 
 	PROCEDURE pfSettings.pagePreferences.Spinner4.Click
@@ -2919,12 +2919,12 @@ DEFINE CLASS gf_options AS gf_baseform OF "..\lib\gofishui.vcx"
 
 		lcPath = JustPath(Thisform.oSearchEngine.cReplaceDetailTable)
 
-		OpenExplorerWindow(lcPath) 
+		GF_OpenExplorerWindow(lcPath) 
 	ENDPROC
 
 	PROCEDURE pfSettings.pageReplace.Label2.Click
 		messagebox('No help available at this time.', 0, 'GoFish')
-		*** TODO: Shell('URL for replace help')
+		*** TODO: GF_Shell('URL for replace help')
 
 	ENDPROC
 
@@ -3021,7 +3021,7 @@ DEFINE CLASS gf_options AS gf_baseform OF "..\lib\gofishui.vcx"
 	ENDPROC
 
 	PROCEDURE pfSettings.pageThor.Label2.Click
-		Shell('https://github.com/VFPX/Thor')
+		GF_Shell('https://github.com/VFPX/Thor')
 
 	ENDPROC
 

diff --git a/Source/Forms/gofish_options.scx b/Source/Forms/gofish_options.scx
diff --git a/Source/Forms/gofish_results.scx b/Source/Forms/gofish_results.scx
diff --git a/Source/Forms/gofish_results_desktop.scx b/Source/Forms/gofish_results_desktop.scx
diff --git a/Source/Forms/gofish_searchhistory.SCT b/Source/Forms/gofish_searchhistory.SCT
diff --git a/Source/Forms/gofish_searchhistory.sc2 b/Source/Forms/gofish_searchhistory.sc2
@@ -252,7 +252,7 @@ DEFINE CLASS form1 AS gf_baseform OF "..\lib\gofishui.vcx"
 			Return
 		Endif
 
-		If RemoveFolder(m.lcPath)
+		If GF_RemoveFolder(m.lcPath)
 			Delete In gf_SearchHistory
 		Else
 			Messagebox('Unable to delete folder "' + m.lcPath + '"', 16, 'Unable to delete folder')
@@ -282,7 +282,7 @@ DEFINE CLASS form1 AS gf_baseform OF "..\lib\gofishui.vcx"
 
 		lcPath = Alltrim(gf_SearchHistory.SearchHistoryFolder)
 
-		OpenExplorerWindow(lcPath) 
+		GF_OpenExplorerWindow(lcPath) 
 	ENDPROC
 
 	PROCEDURE Command1.Refresh

diff --git a/Source/Forms/gofish_searchhistory.scx b/Source/Forms/gofish_searchhistory.scx
diff --git a/Source/GoFish5.APP b/Source/GoFish5.APP
diff --git a/Source/GoFish5.PJT b/Source/GoFish5.PJT
diff --git a/Source/GoFish5.pjx b/Source/GoFish5.pjx
diff --git a/Source/GoFishVersionFile.txt b/Source/GoFishVersionFile.txt
@@ -1 +1 @@
-GoFish5 - 5.1.006 - 11. November 2022,  - 20221111
+GoFish5 - 5.1.009 - 31. Januar 2023,  - 20230131
diff --git a/Source/Lib/VFP/FFC/_base.vcx b/Source/Lib/VFP/FFC/_base.vcx
diff --git a/Source/Lib/VFP/FFC/_environ.vcx b/Source/Lib/VFP/FFC/_environ.vcx
diff --git a/Source/Lib/VFP/FFC/_frxcursor.vct b/Source/Lib/VFP/FFC/_frxcursor.vct
diff --git a/Source/Lib/VFP/FFC/_frxcursor.vcx b/Source/Lib/VFP/FFC/_frxcursor.vcx
diff --git a/Source/Lib/VFP/My/my.VCT b/Source/Lib/VFP/My/my.VCT
diff --git a/Source/Lib/VFP/My/my.vcx b/Source/Lib/VFP/My/my.vcx
diff --git a/Source/Lib/gofishui.VCT b/Source/Lib/gofishui.VCT
Original file line number	Diff line number	Diff line change
		@@ -1 +1 @@
		GoFish5 - 5.1.006 - 11. November 2022, - 20221111
		GoFish5 - 5.1.009 - 31. Januar 2023, - 20230131