Changeset: 327 fdbozzo - 22/06/2014 21:40:37:

- Agregada translación del mensaje "Procesando archivo" de los scripts vbs

Convert_VFP9_BIN_2_PRG.vbs

@@ -90,7 +90,7 @@ Else
 	oVFP9.DoCmd( "oFoxBin2prg.o_Frm_Avance.SHOW()" )
 
 	For i = 1 To nFile_Count
-		oVFP9.DoCmd( "oFoxBin2prg.o_Frm_Avance.lbl_TAREA.CAPTION = 'Procesando " & aFiles(i) & "...'" )
+		oVFP9.DoCmd( "oFoxBin2prg.o_Frm_Avance.lbl_TAREA.CAPTION = oFoxBin2Prg.c_loc_processing_file + ' " & aFiles(i) & "...'" )
 		oVFP9.DoCmd( "oFoxBin2prg.o_Frm_Avance.nVALUE = " & i )
 		cFlagRecompile	= "'" & FileSystemObject.GetParentFolderName( aFiles(i) ) & "'"
 

Convert_VFP9_PRG_2_BIN.vbs

@@ -97,7 +97,7 @@ Else
 	oVFP9.DoCmd( "oFoxBin2prg.o_Frm_Avance.SHOW()" )
 
 	For i = 1 To nFile_Count
-		oVFP9.DoCmd( "oFoxBin2prg.o_Frm_Avance.lbl_TAREA.CAPTION = 'Procesando " & aFiles(i) & "...'" )
+		oVFP9.DoCmd( "oFoxBin2prg.o_Frm_Avance.lbl_TAREA.CAPTION = oFoxBin2Prg.c_loc_processing_file + ' " & aFiles(i) & "...'" )
 		oVFP9.DoCmd( "oFoxBin2prg.o_Frm_Avance.nVALUE = " & i )
 		cFlagRecompile	= "'" & FileSystemObject.GetParentFolderName( aFiles(i) ) & "'"
 

Normalize_FileNames.vbs

@@ -47,7 +47,7 @@ Else
 	Next
 
 	If GetBit(nDebug, 4) Then
-		MsgBox "Fin del Proceso!", 64, WScript.ScriptName
+		MsgBox "End of Process!", 64, WScript.ScriptName
 	End If
 End If
 
@@ -89,7 +89,7 @@ Private Sub evaluateFile( tcFile )
 	
 	cCMD	= "DO '" & cEXETool & "' WITH '" & tcFile & "','','F','',.F.," & cFlagDontShowErrMsg
 	If cFlagJustShowCall = "1" Then
-		MsgBox cCMD, 0, "PARAMETROS ENVIADOS"
+		MsgBox cCMD, 0, "PARAMETERS"
 	Else
 		oVFP9.DoCmd( cCMD )
 		'nExitCode = oVFP9.Eval("_SCREEN.ExitCode")

foxbin2prg.prg

@@ -489,6 +489,8 @@ DEFINE CLASS c_foxbin2prg AS CUSTOM
 	PROTECTED l_ConfigEvaluated, n_CFG_Actual, l_Main_CFG_Loaded, o_Configuration, l_CFG_CachedAccess
 	*--
 	n_FB2PRG_Version		= 1.19
+	*-- Localized properties
+	c_loc_processing_file	= C_PROCESSING_LOC
 	*--
 	c_Foxbin2prg_FullPath	= ''
 	c_Foxbin2prg_ConfigFile	= ''