cheveguerra/Kelloggs_v4
1
0
Fork 0
mirror of https://github.com/KeymonSoft/Kelloggs_v4.git synced 2026-04-21 20:09:13 +00:00
Code Issues Packages Projects Releases Wiki Activity

15/9/23 - Espacios y detalles sin importancia.

Browse Source
This commit is contained in:
cheveguerra
2023-09-15 15:34:11 -06:00
parent ab9e048e11
commit f8b16f4673
7 changed files with 261 additions and 265 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
B4A/Starter.bas
View File

@@ -56,7 +56,7 @@ End Sub
Sub Service_Create
'This is the program entry point.
'This is a good place to load resources that are not specific to a single activity.
s.Initialize 'Inicializamos la clase Subs
s.Initialize(Me, "Subs") 'Inicializamos la clase Subs
If Logger Then LogColor("'/////////////////////////////////////////////////////////////////////////////////////////////", Colors.Green)
If Logger Then LogColor("'///////////////////////////////////// Iniciamos Starter /////////////////////////////////", Colors.Green)
If Logger Then LogColor("'/////////////////////////////////////////////////////////////////////////////////////////////", Colors.Green)
@@ -93,6 +93,10 @@ Sub Service_Start (StartingIntent As Intent)
#End If
End Sub
Sub Subs_dbOk(success As Boolean)
LogColor($"Conexión con base de datos: ${success}"$, Colors.red)
End Sub
Sub Service_TaskRemoved
'This event will be raised when the user removes the app from the recent apps list.
Timer1.Enabled=False