OnePeople

А чего вы хотите добиться?

Проблема в том, что это вы решили что должно работать так. Триггеры работают от первого дочернего элемента, т.к. аниматор должен знать, свойство какого компонента должен отрабатывать триггер. Допустим у вас 10 вложений анимации и компонентов как бы последняя анимация узнавала, что именно свойство mouseover этого компонента нужно отрабатывать, а не другого? П.с. вы всегда можете сами все написать и переделать, создать свой компонент.

Все триггеры работают

А зачем на экране в целом? Всплывающая информация будет в отдельной форме? Если нет то LocalToAbsolute Если да то LocalToAbsolute.position.x + form.left и LocalToAbsolute.position.y + form.top

TTelephonyManager_UssdResponseCallback = class(TJavaLocal, JTelephonyManager_UssdResponseCallbackClass) procedure onReceiveUssdResponse(TelephonyManager: JtelephonyManager; request: JString; response: JCharSequence); cdecl; var TelephonyManager: JTelephonyManager; TelephonyManagerNative: JObject; ResponceCallBack: JTelephonyManager_UssdResponseCallback; handler: JHandler; begin TelephonyManagerNative := TAndroidHelper.Context.getSystemService(TJContext.JavaClass.TELEPHONY_SERVICE); TelephonyManager := TJTelephonyManager.Wrap((TelephonyManagerNative as ILocalObject).GetObjectID); ResponceCallBack := TJTelephonyManager_UssdResponseCallback.JavaClass.init; handler := TJHandler.JavaClass.init; TelephonyManager.sendUssdRequest(StringToJString('*100#'), ResponceCallBack, handler); Дальше сами

ну да, это не мое решение так разделить, написал на скорую для Вас function checkNetwork: Boolean; var ConnectivityServiceNative: JObject; cm: JConnectivityManager; activeNetwork: JNetworkInfo; begin try // подключаемся к сервису (в данном случае соединений) ConnectivityServiceNative := TAndroidHelper.Context.getSystemService(TJContext.JavaClass.CONNECTIVITY_SERVICE); // если не подключились то выход c результататом функции FALSE if not Assigned(ConnectivityServiceNative) then exit(false); // получаем менеджер соединений cm := TJConnectivityManager.Wrap((ConnectivityServiceNative as ILocalObject).GetObjectID); // если не получили то выход c результататом функции FALSE if not Assigned(Result) then exit(false); // запрашиваем информацию о активном соединении activeNetwork := cm.getActiveNetworkInfo; // если есть информация и статус соединения подключено то результат функции TRUE Result := Assigned(ActiveNetwork) and ActiveNetwork.isConnected; except // при любой ошибке выход c результататом функции FALSE Exit(false); end; end;

??? Это одна функция checkNetwork возвращает есть интернет или нет

Для API >= 14 и API < 29 Intent := TJIntent.Create(); Intent.setAction(TJIntent.JavaClass.ACTION_INSTALL_PACKAGE); Intent.addFlags(TJIntent.JavaClass.FLAG_GRANT_READ_URI_PERMISSION); Intent.putExtra(TJIntent.JavaClass.EXTRA_NOT_UNKNOWN_SOURCE, true); Intent.setDataAndType(ApkUri,StringToJString('application/vnd.android.package-archive')); TAndroidHelper.Activity.StartActivity(Intent); API > 25 Manifest.permission.REQUEST_INSTALL_PACKAGES

function checkNetwork: Boolean; function GetConnectivityManager: JConnectivityManager; var ConnectivityServiceNative: JObject; begin ConnectivityServiceNative := TAndroidHelper.Context.getSystemService(TJContext.JavaClass.CONNECTIVITY_SERVICE); if not Assigned(ConnectivityServiceNative) then exit; Result := TJConnectivityManager.Wrap((ConnectivityServiceNative as ILocalObject).GetObjectID); if not Assigned(Result) then exit; end; var cm: JConnectivityManager; activeNetwork: JNetworkInfo; begin try cm := GetConnectivityManager; activeNetwork := cm.getActiveNetworkInfo; Result := Assigned(ActiveNetwork) and ActiveNetwork.isConnected; except Result := false; end; end;

)))Ну наверное при том что вы пишете для андроид, а самое верное это сделать то что советует Гугл. А в Делфи там переделывать 5 секунд. Если вы этого не можете переделывать код из java в Делфи и не хотите учиться этому, совет, не пишите для андроид вообще/

https://developer.android.com/training/monitoring-device-state/connectivity-status-type

не наоборот, я приложение для телика тестировал на телефоне, чтобы его туда постоянно не устанавливать)))

Нестандартные компоненты используете в проекте?

Всё верно, но вот мне потребовалось чтобы приложение одинаково выглядело и на телевизоре fullhd и на смартфоне fullhd и тогда без масштабирования выходила шняга полная, но это очень редкая ситуация)

Все зависит от разрешения в котором запускается приложение оно может быть меньше чем разрешение экрана и просто масштабироваться, я решаю это свойством scale. var ScreenService: IFMXScreenService; begin Result := 1; if TPlatformServices.Current.SupportsPlatformService (IFMXScreenService, IInterface(ScreenService)) then begin Result := ScreenService.GetScreenScale; // Получаем текущий масштаб Выставляем элементам нужный масштаб end;

Где код, как вы получаете S? Ну и скрин deployment для Android 64? Прошу заметить что Android чувствителен к регистру File и file это разные папки.

Тогда делать в базе пометку открыт или закрыт!? Или создавать базу(список) с индексами открытых элементов

https://docwiki.embarcadero.com/RADStudio/Sydney/en/FireMonkey_Save_State Если пользуетесь переводчиком, на родном языке тоже оставляйте пост или спойлер!

if (focusChange=TJaudioManager.JavaClass.AUDIOFOCUS_LOSS) or (focusChange=TJaudioManager.JavaClass.AUDIOFOCUS_LOSS_TRANSIENT)

var FAudioService: JObject; FAudioManager: JAudioManager; в OnCreate {$IFDEF ANDROID} if FAudioService=nil then begin FAudioService:= TAndroidHelper.Activity.getSystemService(TJContext.JavaClass.AUDIO_SERVICE); if FAudioService <> nil then begin FAudioManager := TJAudioManager.Wrap((FAudioService as ILocalObject).GetObjectID); end; end; {$ENDIF} Не знаю чем вам помочь, на какую строку ругается?

Скиньте проект посмотреть

Тут вы делаете что хотите, хоть обращаетесь к визуальным компонентам хоть нет, главное чтобы вы остановили воспроизведение!

в OnCreate {$IFDEF ANDROID} if FAudioService=nil then begin FAudioService:= TAndroidHelper.Activity.getSystemService(TJContext.JavaClass.AUDIO_SERVICE); if FAudioService <> nil then begin FAudioManager := TJAudioManager.Wrap((FAudioService as ILocalObject).GetObjectID); end; end; {$ENDIF} Общая переменная var FAudioManager: JAudioManager;