mirror of
https://github.com/KeymonSoft/Gabinete-Roit.git
synced 2026-04-20 04:39:26 +00:00
4.04.17 se agrega codigos qr
This commit is contained in:
@@ -96,6 +96,7 @@ Sub Class_Globals
|
||||
Private et_codigo As EditText
|
||||
Private b_cancelarcodigo As Button
|
||||
Private l_codigo As Label
|
||||
Private l_version As Label
|
||||
End Sub
|
||||
|
||||
'You can add more parameters here.
|
||||
@@ -135,6 +136,7 @@ End Sub
|
||||
'You can see the list of page related events in the B4XPagesManager object. The event name is B4XPage.
|
||||
|
||||
Private Sub B4XPage_Appear
|
||||
l_version.Text = Application.VersionName
|
||||
CheckAndRequestNotificationPermission
|
||||
If g.GPSEnabled=False Then
|
||||
Dim result As Int= -3
|
||||
|
||||
Reference in New Issue
Block a user