Translated tips of the day are back.

[DEVELOPMENT ENVIRONMENT]
* BUG: Translated tips of the day are back.

app/src/gambas3/.project

@@ -34,7 +34,7 @@ Component=gb.util.web
 Description="Integrated Development Environment for Gambas"
 Authors="Benoît Minisini\nFabien Bodard\nCharlie Reinl\nJosé Luis Redrejo\nRobert Rowe\nTobias Boege"
 Arguments=[["-L"],["-t","/home/benoit/gambas/git/master/app/src/gambas3"],["--help"]]
-Environment=" GB_NO_JIT=1\nGB_GUI=gb.qt5\n GTK_DEBUG=interactive"
+Environment=" GB_NO_JIT=1\nGB_GUI=gb.qt5\n GTK_DEBUG=interactive\nLANGUAGE=it_IT.UTF-8\nLANG=it_IT.UTF-8\nLC_ALL=it_IT.UTF-8"
 TabSize=2
 Translate=1
 Language=en

app/src/gambas3/.src/Debug/Design.module

@@ -1000,7 +1000,7 @@ Private Sub Start(sCmd As String)
   Dim hCopyProcess As Process
   Dim sFifo As String
   Dim sRemoteDebuggerHelper As String
-  Dim iCurrentArg As Variant
+  Dim iCurrentArg As Integer
 
   If Project.Running Then Return
   

app/src/gambas3/.src/Debug/FDebugInfo.form

@@ -66,7 +66,7 @@
               AutoResize = True
               { picProcessMemory PictureBox
                 MoveScaled(0,0,4,4)
-                Picture = Picture.Load("icon:/small/cpu")
+                Picture = Picture.Load("icon:/small/statistics")
                 Alignment = Align.Center
               }
               { lblProcessMemory Label

app/src/gambas3/.src/Help/FTips.class

@@ -66,7 +66,7 @@ Private Function GetNextTip(Optional bPrev As Boolean) As String
     iPos = InStr(sLang, "_")
     If iPos Then
       sLang = Left$(sLang, iPos - 1)
-      sFile = "tips/tips." & sLang
+      sFile = "tips/tips." & sLang & ".txt"
     Endif
   Endif
   If Not Exist(sFile) Then