Как запустить приложение из киоск-приложения на Android (с помощью Delphi) ⇐ Android

[Anonymous]

Я начал с шаблона Embarcadero Advanced Android Kiosk Mode, который представляет собой киоск-приложение, которое запускает страницу настроек Wi-Fi устройства.
Я хочу запустить другое приложение вместо страницы настроек Wi-Fi.
Итак, я написал процедуру запуска приложения (после этого):

Код: Выделить всё

procedure TDashboard.StartSA7;
var
Intent: JIntent;
begin

FKioskApp.ActiveOtherActivity := True;

Intent := TJIntent.Create;

Intent := MainActivity.getPackageManager.getLaunchIntentForPackage(StringToJString('com.embarcadero.SA7mp'));
Intent.addFlags(TJIntent.JavaClass.FLAG_ACTIVITY_NEW_TASK); //  0 then
begin
TAndroidHelper.Context.startActivity(Intent);
Label2.Text := 'OK!!';
end
else
begin
Label2.Text := 'NO!!!';
end;
end;

Ну, это не работает.
Если основное приложение, киоск-приложение, не является владельцем устройства, и так он не в режиме киоска, он работает и запускается приложение com.embarcadero.SA7mp, если основное приложение является владельцем устройства, вторичное приложение не запускается.
Оригинальный код для запуска страницы настроек Wi-Fi это:

Код: Выделить всё

procedure TDashboard.GoToSettings;
var
LIntent: JIntent;
begin
FKioskApp.ActiveOtherActivity := True;
// It is important to set the ActiveOtherActivity flag before opening another application in kiosk mode

LIntent := TJIntent.JavaClass.init(TJSettings.JavaClass.ACTION_WIFI_SETTINGS);
LIntent.addFlags(TJIntent.JavaClass.FLAG_ACTIVITY_NEW_TASK); // 

Подробнее здесь: [url]https://stackoverflow.com/questions/79255283/how-to-launch-an-app-from-a-kiosk-app-in-android-with-delphi[/url]