Das Starten direkt ohne zusätzliche Benutzereingabe funktioniert:
Delphi-Quellcode:
procedure StartAPP();
{$IFDEF ANDROID}
var
Intent: JIntent;
{$ENDIF}
begin
{$IFDEF ANDROID}
try
// Direkt gewünschtes Programm starten
Intent := TJIntent.Create;
Intent := TAndroidHelper.Activity.getPackageManager.
getLaunchIntentForPackage
(StringToJString('
com.embarcadero.xxxxxxxxx'));
TAndroidHelper.Activity.startActivity(Intent);
exit;
except
showmessage('
Programm nicht gefunden !');
exit;
end;
{$ENDIF}
showmessage('
Diese Funktionalität ist in Windows nicht verfügbar !');
end;
Ciao
Stefan