Spanish (SOLUCIONADO)Hacer aplicacion Launcher

    If FirstTime Then
    startApp("com.aplicacionlauncher")

    End If

    Activity.LoadLayout("1")
'    If FirstTime Then
    BarraDeEstadomView.Initialize("")
    BarraDeEstadomView.Text =""
    QuitarBarraEstatus

Sub Activity_Pause (UserClosed As Boolean)
    ' para que vuelva a aparecer al salir (por ejemplo)
    ' la puedes llamar desde donde quieras
    If UserClosed Then PonerBarraEstatus
   
End Sub

'con esto cargo el launcher
Sub startApp(pkgName As String) As Boolean
    Try
        Dim Intent1 As Intent
        Dim pm As PackageManager
        Intent1 = pm.GetApplicationIntent (pkgName)
        StartActivity (Intent1)
        Return True
    Catch
        Return False
    End Try
    End Sub

Sub QuitarBarraEstatus
    Dim mlp As JavaObject
    Dim vtype As Int = -1, pixelFormat As Int = -3
 
    Try
        mlp.InitializeNewInstance("android.view.WindowManager$LayoutParams", Array(vtype, 100, 2010,296, pixelFormat))
    Catch
    End Try
 
    Try
        mlp.SetField("gravity", Bit.Or(Gravity.TOP, Gravity.CENTER))
    Catch
    End Try
 
    Try
        Dim windowManager As JavaObject = BarraEstatusGetContext.RunMethod("getSystemService", Array("window"))
    Catch
    End Try
 
    Try
        windowManager.RunMethod("addView", Array(BarraDeEstadomView, mlp))
    Catch
    End Try
 
End Sub

yo añado un mensaje al boton de volver
[CODE]
Sub Activity_KeyPress (KeyCode As Int) As Boolean
   

    If KeyCode = KeyCodes.KEYCODE_BACK Then
   
        ' Pulsado botón Back
        ToastMessageShow("Botón Deshabilitado",False)
        Return True   ' Consume el evento y no sale
           
    End If


End Sub

Sub BarraEstatusGetContext As JavaObject
    Return BarraEstatusGetBA.GetField("context")
End Sub

Sub BarraEstatusGetBA As JavaObject
    Dim jo As JavaObject
    Dim cls As String = Me
    cls = cls.SubString("class ".Length)
    jo.InitializeStatic(cls)
    Return jo.GetFieldJO("processBA")
End Sub

AddPermission(android.permission.SYSTEM_OVERLAY_WINDOW)
AddPermission(android.permission.SYSTEM_ALERT_WINDOW)
AddActivityText(main, <intent-filter >
        <action android:name="android.intent.action.MAIN" />
        <category android:name="android.intent.category.HOME" />
        <category android:name="android.intent.category.DEFAULT" />
    </intent-filter>)