German Bildschirm geht nicht mehr aus, obwohl die App beendet wurde

Nachtfalke75 · Feb 3, 2012

Hallo,

ich wollte verhindern, dass der Bildschirm ausgeht (während die app läuft):

Dim pws As PhoneWakeState
Sub Activity_Create(FirstTime As Boolean)
pws.KeepAlive(True)
End Sub
Sub Activity_Pause (UserClosed As Boolean)
pws.KeepAlive(False)
End Sub
Sub Button_Exit_Click
pws.KeepAlive(False)
Activity.Finish
End Sub

Jetzt habe ich allerdings das Problem, dass selbst wenn ich die app verlassen habe, der Bildschirmschoner nicht mehr angeht
Kann mir jemand helfen?
Thx im vorraus

Deleted member 103 · Feb 3, 2012

Mach diese änderung:

von:

Sub Activity_Pause (UserClosed As Boolean)
pws.KeepAlive(False)
End Sub

nach:

B4X:

Sub Activity_Resume
   pws.KeepAlive(True)
End Sub

Sub Activity_Pause (UserClosed As Boolean)
   pws.ReleaseKeepAlive
End Sub

German Bildschirm geht nicht mehr aus, obwohl die App beendet wurde

Nachtfalke75

Member

Deleted member 103

Guest

Similar Threads

German Bildschirm geht nicht mehr aus, obwohl die App beendet wurde

Nachtfalke75

Member

Deleted member 103

Guest

Similar Threads

Privacy & Transparency

Privacy & Transparency