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

- Se completo el codigo de la clase promociones, ya "casi" sin mapas!

Browse Source
This commit is contained in:
Jose Alberto Guerra Ugalde
2024-05-12 17:53:07 -06:00
parent 99bf32b3fd
commit 33550e86c3
8 changed files with 250 additions and 170 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
B4A/B4XMainPage.bas
View File

@@ -312,7 +312,7 @@ Private Sub B4XPage_Created (Root1 As B4XView)
rp.CheckAndRequest(rp.PERMISSION_READ_PHONE_STATE)
Wait For B4XPage_PermissionResult (Permission As String, Result As Boolean)
If Result Then
Dim Phn As PhoneId
' Dim Phn As PhoneId
IMEN.Text = "" 'Phn.GetDeviceId
IMEI ="" ' Phn.GetDeviceId
If logger Then LogColor($"////////////////// IMEI: ${IMEI} ////////////////// "$, Colors.Blue)