cheveguerra/Mariana
1
0
Fork 0
mirror of https://github.com/KeymonSoft/Mariana.git synced 2026-04-17 21:06:16 +00:00
Code Issues Packages Projects Releases Wiki Activity

- Logo nuevo

Browse Source
This commit is contained in:
Jose Alberto Guerra Ugalde
2024-03-19 15:55:34 -06:00
parent f84d3e87c9
commit 53486aabbe
2 changed files with 12 additions and 12 deletions
Download Patch File Download Diff File Expand all files Collapse all files

20
B4A/C_NuevoCliente.bas
View File

@@ -70,22 +70,22 @@ Private Sub B4XPage_Created (Root1 As B4XView)
' frontCamera = camEx2.Front
Log("inicializamos Camara")
Else
ToastMessageShow("No permission!!!", True)
ToastMessageShow("Sin permisos de camara!!!", True)
End If
Starter.rp.CheckAndRequest(Starter.rp.PERMISSION_WRITE_EXTERNAL_STORAGE)
Wait For B4XPage_PermissionResult (Permission As String, Result As Boolean)
If Result Then
Log("conpermisos para escritura")
Log("Con permisos para escritura")
Else
ToastMessageShow("No permission!!!", True)
ToastMessageShow("Sin permisos de escritura!!!", True)
End If
Starter.rp.CheckAndRequest(Starter.rp.PERMISSION_READ_EXTERNAL_STORAGE)
Wait For B4XPage_PermissionResult (Permission As String, Result As Boolean)
If Result Then
Log("conpermisos para escritura")
Log("Con permisos para escritura")
Else
ToastMessageShow("No permission!!!", True)
ToastMessageShow("Sin permisos de lectura!!!", True)
End If
End Sub
@@ -250,22 +250,22 @@ Private Sub InitializeCamera2
frontCamera = camEx2.Front
Log("inicializamos Camara")
Else
ToastMessageShow("No permission!!!", True)
ToastMessageShow("Sin permisos de camara!!!", True)
End If
Starter.rp.CheckAndRequest(Starter.rp.PERMISSION_WRITE_EXTERNAL_STORAGE)
Wait For B4XPage_PermissionResult (Permission As String, Result As Boolean)
If Result Then
Log("conpermisos para escritura")
Log("con permisos para escritura")
Else
ToastMessageShow("No permission!!!", True)
ToastMessageShow("Sin permisos de escritura!!!", True)
End If
Starter.rp.CheckAndRequest(Starter.rp.PERMISSION_READ_EXTERNAL_STORAGE)
Wait For B4XPage_PermissionResult (Permission As String, Result As Boolean)
If Result Then
Log("conpermisos para escritura")
Log("con permisos para escritura")
Else
ToastMessageShow("No permission!!!", True)
ToastMessageShow("Sin permisos de lectura!!!", True)
End If
End Sub

4
B4A/Mariana.b4a.meta
View File

@@ -82,6 +82,6 @@ ModuleClosedNodes6=
ModuleClosedNodes7=
ModuleClosedNodes8=
ModuleClosedNodes9=
NavigationStack=C_Principal,e_ruta_TextChanged,2274,0,Subs,agregaColumna,1335,0,C_Principal,B_OK_PAS_Click,2023,0,C_Principal,B4XPage_Created,309,0,C_Principal,B4XPage_Appear,318,2,Subs,checaPedido,1339,5,C_Principal,e_ruta_EnterPressed,1902,0,C_Clientes,calc_ean_checksum,220,0,Visual Designer,login.bal,-100,1,C_Principal,JobDone,1737,0
NavigationStack=Subs,checaPedido,1339,5,C_Principal,e_ruta_EnterPressed,1902,0,C_Clientes,calc_ean_checksum,220,0,Visual Designer,login.bal,-100,1,C_Principal,JobDone,1737,0,Subs,notiLowReturn,91,0,Subs,notiHigh,73,0,Tracker,CreateNotification,193,0,Tracker,Service_Start,61,0,C_NuevoCliente,B4XPage_Created,81,6,C_NuevoCliente,InitializeCamera2,259,2
SelectedBuild=0
VisibleModules=2,12,4,5,6,26,10
VisibleModules=2,12,4,5,6,26,10,27,25