B4A Library ToggleLibrary

Hey everyone,

This is an improvement of my TurnGPS Library.
ToggleLibrary is great to use in homescreen widgets or just normal apps.
With ToggleLibrary, you can currently do the following:

- Bluetooth: Toggle, Enable, Disable, Check.
- Airplane Mode: Toggle, Enable, Disable, Check.
- WiFi: Toggle, Enable, Disable, Check.
- GPS: Toggle, Enable, Disable, Check.
- DataConnection** (GPRS,...): Toggle, Enable, Disable, Check.
- RingerMode: Toggle, Enable, Disable. (Vibrate, Silent or Normal)
- Change Brightness
- Change Mediavolume.
- Reboot, GotoSleep, UserActivity, isScreenOn

There might still be a few bugs. Please let me know.

* With check, I mean that you can check if it's enabled(true) or disabled (false)
** Depends on device

Attached are the library files.
No sample is added because it is all self-explanatory.

Dim TGL As Toggle
TGL.Initialize()
TGL.TurnBluetoothOn

Tomas

 

[Erel]

Tried it. It no longer works. You will get the following error: http://stackoverflow.com/questions/...h-on-android-4-4-due-to-gps-permission-denial

 

[lock255]

I tried this library on my device 4.1.2:
GPS: does not work
Bluethoot: works

It would be nice that an B4A's expert release an update fix from this library with cool features!

 

[Erel]

It is not possible to programmatically turn on or off the GPS due to security reasons.

 

[Levisvv]

The Bluetooth toggle works great on my Galaxy 5 Android 4.4, but when I tried the GPS toggle, I get an error indicating that I need:
ACCESS_FINE_LOCATION

Does anybody know how I can add this permission? Is there a line I need to add to the Manifest?
I tried to add this but it caused an error: <uses-permission android:name="android.permission.ACCESS_FINE_LOCATION" />

 

[Erel]

You can use AddPermission(android.permission.ACCESS_FINE_LOCATION)

However it is not possible to programmatically turn on or off the GPS on new devices.

 

[Chris Williams]

Hello again, XverhelstX. I have created an app which makes use of your library. Prior to me uploading it to google play, I would like to know what I need to do to give you proper credit for your work. I have included a credits page that is in the app...

 

[BarryW]

Hey everyone,

This is an improvement of my TurnGPS Library.
ToggleLibrary is great to use in homescreen widgets or just normal apps.
With ToggleLibrary, you can currently do the following:

- Bluetooth: Toggle, Enable, Disable, Check.
- Airplane Mode: Toggle, Enable, Disable, Check.
- WiFi: Toggle, Enable, Disable, Check.
- GPS: Toggle, Enable, Disable, Check.
- DataConnection** (GPRS,...): Toggle, Enable, Disable, Check.
- RingerMode: Toggle, Enable, Disable. (Vibrate, Silent or Normal)
- Change Brightness
- Change Mediavolume.
- Reboot, GotoSleep, UserActivity, isScreenOn

There might still be a few bugs. Please let me know.

* With check, I mean that you can check if it's enabled(true) or disabled (false)
** Depends on device

Attached are the library files.
No sample is added because it is all self-explanatory.

Dim TGL As Toggle
TGL.Initialize()
TGL.TurnBluetoothOn

Tomas

Can you add NFC toogle on ur library...

 

[imgsimonebiliato]

Hello,
I want to create a widget to switch on/off the data connection.
I wrote this simply code, but it doesn't work.
What's wrong?

Sub Globals
Dim btOn, btOff As Button
Dim TGL As Toggle
End Sub

Sub Activity_Create(FirstTime As Boolean)
btOn.Initialize("btOn")
btOff.Initialize("btOff")

Activity.AddView( btOn, 1.4%x,  0.8%y, 27.8%x, 15.6%y) : btOn.Text = "ON" : btOn.Color = Colors.Green  
Activity.AddView(btOff, 1.4%x, 17.2%y, 27.8%x, 15.6%y) : btOff.Text = "OFF" : btOff.Color = Colors.Red

TGL.Initialize
End Sub

Sub btOn_click
TGL.TurnDataConnectionOn
End Sub

Sub btOff_click
TGL.TurnDataConnectionOff
End Sub

 

[peacemaker]

Hello,
I wrote this simply code, but it doesn't work.
What's wrong?
[/CODE]

"Wrong" info. About conditions where did you try...

 

[imgsimonebiliato]

"Wrong" info. About conditions where did you try...

I run the app into Lollipop.
Then? What do you need to know?

 

[Cüneyt Gargin]

Hello. I have a Symbol (aka Motorola) TC55 device. It has a barcode imager on it. Can I turn it on and off with Toogle ? The device web site with intent info is : https://developer.zebra.com/thread/29606

 

[Luciano Veneziano]

you DataConnection works with lollipop?

 

[rtek1000]

Hello,

For Android 6 your library Toggle Library 1.0 not changed GPS state,

But this works fine: https://www.b4x.com/android/forum/threads/toggle-on-off-gps-in-any-android-version.44718/#content

 

[peacemaker]

Hi, All

Was the lib tested under Android8+ ?
Runtime permission for PERMISSION_ACCESS_COARSE_LOCATION?

I have error:
at "if...":

    If Toggler.Bluetooth = False Then
        Toggler.TurnBluetoothOn
    End If

------------
upd: SOLVED:

Sub Activity_Resume
    If rp.Check(rp.PERMISSION_ACCESS_COARSE_LOCATION) = False Then
        Dim a As String = "Bluetooth BLE requires this  PERMISSION_ACCESS_COARSE_LOCATION for searching devices, grant, please."
        txtLog.Text = a & CRLF & txtLog.Text
        If AlreadyWarned = False Then
            AlreadyWarned = True
            Msgbox(a, "WARNING:")
        End If
        rp.CheckAndRequest(rp.PERMISSION_ACCESS_COARSE_LOCATION)
        Wait For Activity_PermissionResult (Permission As String, Result As Boolean)
        If Result = False Then
            ToastMessageShow("BLE is unaccessible without this permission...", False)
            Return
        Else
            Starter.Toggler.Initialize
            'next toggle BT and go on...
        End If
    Else
        Starter.Toggler.Initialize
        'next toggle BT and go on...
    End If
....