delcpy

Может их нет, новых, а есть устройства которые уже подключались ранее Bluetooth.GetPairedDevices;
FPairedDevices := Bluetooth.GetPairedDevices; if FPairedDevices.Count > 0 then for I:= 0 to FPairedDevices.Count - 1 do ListBox.Items.Add(FPairedDevices[I].DeviceName) Ну и если Android API >= 31
     if TJBuild_VERSION.JavaClass.SDK_INT >= 31  then         begin            FPermissionBTConnectSettings := JStringToString(TJManifest_permission.JavaClass.BLUETOOTH_CONNECT);            FPermissionBTScanSettings := JStringToString(TJManifest_permission.JavaClass.BLUETOOTH_SCAN);            FPermissionBTAdvertiseSettings := JStringToString(TJManifest_permission.JavaClass.BLUETOOTH_ADVERTISE);            PermissionsService.RequestPermissions([FPermissionBTConnectSettings] +                                                  [FPermissionBTScanSettings] +                                                  [FPermissionBTAdvertiseSettings], nil);         end;

Платформа Android
У программы на главной форме установлен TabControl из двух табов и TGestureManager и TActionList. В один из табов загружаются разные Frames (фреймы) по ситуации у которых в свою очередь тоже есть TabControl из пяти табов. Фреймы видят первую форму, на которой установлен TGestureManager и TActionList их тоже видно. Все везде завязано и перевязано, но не работает жестs листание в право или в лево, когда происходит загрузка фреймов. В чем причина?
Если делать без фреймов все работает. Ну фреймы мне очень нужны дабы облегчить вес программы.
Я так понимаю почему то отключаются события в TActionList если выбрать путь в фрейму.
test.zip

Всем спасибо. Не знаю в чем была причина но через неделю попробовал опять выложить всё получилось.

Смотрите внимательнее, мы точно также выкладываем, хотя и нам точно также выдается предупреждение о 64х битности.