cheveguerra/Mariana_Censos
1
0
Fork 0
mirror of https://github.com/KeymonSoft/Mariana_Censos.git synced 2026-04-21 22:59:29 +00:00
Code Issues Packages Projects Releases Wiki Activity

cambios en permisos y server aparezca keymon.lat

Browse Source
This commit is contained in:
cvaldes1201
2024-01-31 12:47:05 -06:00
parent 58d00b9a7a
commit 98f0438179
5 changed files with 25 additions and 7 deletions
Download Patch File Download Diff File Expand all files Collapse all files

11
B4A/C_NuevoCliente.bas
View File

@@ -60,7 +60,7 @@ Sub Class_Globals
Dim q As C_Cuestionario
Dim su As StringUtils
Dim clienteAnt As String = ""
dim cuestionarioTexto as string
Dim cuestionarioTexto As String
End Sub
'You can add more parameters here.
@@ -90,6 +90,15 @@ End Sub
'You can see the list of page related events in the B4XPagesManager object. The event name is B4XPage.
Sub B4XPage_Appear
rp.CheckAndRequest(rp.PERMISSION_CAMERA)
Wait For B4XPage_PermissionResult (Permission As String, Result As Boolean)
If Result Then
' camEx2.Initialize(p_cam, frontCamera, Me, "Camera1")
' frontCamera = camEx2.Front
' If logger Then Log("inicializamos Camara")
Else
ToastMessageShow("Sin permisos de camara!!!", True)
End If
camposModificados.Initialize
l_cuestionario.Visible = False
l_tituloCuestionaro.Visible = False