I think the VibrateDevice() function doesn't work with Android.
I created an APK with this code ...
Code: Select all
Enumeration
#mf
EndEnumeration
Declare Start()
Declare Vibrate()
Start()
Procedure Start()
OpenWindow(#mf, 0, 0, 0, 0, "Vibrate", #PB_Window_Background)
AddWindowTimer(#mf, 0, 5000)
Debug "Wait 5 seconds ..."
BindEvent(#PB_Event_Timer, @Vibrate())
EndProcedure
Procedure Vibrate()
Debug "Vibrate 3 seconds"
VibrateDevice(3000)
EndProcedure