Datos moviles

[Ricardo2010]

Hola , tengo una aplicación desarrollada con XE8, en este momento he logrado detectar si esta funcionando la wifi para mandar un mensaje si no lo estuviera , ahora he tratado de realizar lo mismo para verificar los datos móviles, para así mandar mensaje que no tiene wifi ni datos móviles para que pueda trabajar en la app .

No he logrado detectar cuando no está funcionando los datos móviles, el codigo para ellos es

Código Delphi [-]
Service: JObject;
  WifiManager: JWifiManager;
  ConnectionInfo: JWifiInfo;
  ScanResults: JList;
  ScanResult: JScanResult;
begin

   lv_ok:=TRUE;
   Service := SharedActivity.getSystemService(TJContext.JavaClass.CONNECTIVITY_SERVICE);
   if Service = nil then
   begin
      lv_ok:=FALSE;
   end;

ALguien me podria ayudar para detectar que no esta funcionando los datos móviles para así mandar el mensaje.

gracias