on ICS KeepAlive(False) is invalid?

[PeakW]

I used to use KeepAlive(False) or ReleaseKeepAlive to close the screen,but on ICS this is invalid,why?:BangHead:

 

[margret]

I use KeepAlive(True) and ReleaseKeepAlive on ICS with no issues.

 

[PeakW]

Don't know why here with me not, and, there is the following questions
ph1.SetScreenBrightness(0.5)
Log("0.5="&ph1.GetSettings("screen_brightness"))
ph1.SetScreenBrightness(1)
Log("1="&ph1.GetSettings("screen_brightness"))

result:

0.5=184
1=184

 

[margret]

Have you used the Clean Project under tools in the IDE. Also, what SDK are you compiling with. Do you set a target of 14 in your manifest. These are just some things to try. What device are you running with ICS, it could be issues with that manufacturers forked version of ICS.

 

[PeakW]

This my code,system is ics4.03,device is lenovo A2107.

 

[PeakW]

code

 

[PeakW]

I want upload the ZIP file,but can't,so i Paste the code!
------------------
'Activity module
Sub Process_Globals
'These global variables will be declared once when the application starts.
'These variables can be accessed from all modules.

End Sub

Sub Globals
Dim ph As PhoneWakeState
Dim ph1 As Phone
'These global variables will be redeclared each time the activity is created.
'These variables can only be accessed from this module.
Dim Timer1 As Timer
Dim Button1,Button2 As Button
Dim Br As Int 'brightness

End Sub

Sub Activity_Create(FirstTime As Boolean)
'Do not forget to load the layout file created with the visual designer. For example:
'Activity.LoadLayout("Layout1")
Activity.LoadLayout("1.bal")
ph.KeepAlive(True)
If FirstTime Then

End If
Timer1.Initialize("Timer1",10*1000)
Timer1.Enabled=False
Button1.Initialize("Button1")
Button2.Initialize("Button2")
Br=ph1.GetSettings("screen_brightness")
Log("The current brightness:"&ph1.GetSettings("screen_brightness"))

End Sub
Sub Timer1_tick
ph.KeepAlive(True)
Timer1.Enabled=False
End Sub
Sub Activity_Resume
ph1.SetScreenBrightness(0.3)
End Sub

Sub Activity_Pause (UserClosed As Boolean)

End Sub

Sub Button1_Click
ph.ReleaseKeepAlive
End Sub
Sub Button2_Click
Timer1.Enabled=True
End Sub