enatechno

Какой стиль используется в XE3 и в 6-10 ?
Если свой не подгружаете, то, думаю, - по умолчанию. Какой объем бинарника получается при компиляции Release в XE3, и какой в 10?
Думаю дело может быть в ресурсах, используемых приложением.

"Пустая и чистая" форма - вовсе не "пустая". В FMX приложении есть ресурсы. Откройте приложение в редакторе ресурсов (например Restorator 2007 или любой другой) и вы увидите содержимое бинарника. Так-что "пустая/чистая форма" - это в VCL, в FMX иначе.

buttonstyle.zip

uses AndroidApi.JNI.Media; procedure MakeSound(ADuration: Integer); var Volume: Integer; StreamType: Integer; ToneType: Integer; ToneGenerator: JToneGenerator; begin Volume := TJToneGenerator.JavaClass.MAX_VOLUME; // задаем громкость StreamType := TJAudioManager.JavaClass.STREAM_ALARM; ToneType := TJToneGenerator.JavaClass.TONE_DTMF_0; // тип звука ToneGenerator := TJToneGenerator.JavaClass.init(StreamType, Volume); ToneGenerator.startTone(ToneType, ADuration); end; Типы звука можно посмотреть здесь 

Ну какие под Windows могут быть стандартные средства для чтения файла из другой ОС? Конечно их нету.
Делается элементарно.
1. apk - это обычный zip файл. Распаковываете его (в Delphi встроенная поддержка zip - uses System.Zip > TZipFile ), и читаете  все что надо. В Total Commander в такие архивы проще заходить без переименования расширения - нажав Ctrl + PgDown 
2. Еще проще
aapt dump badging myapp.apk Выведет детальную информацию об apk. 
aapt лежит где то в c:\Users\<user>\Documents\Embarcadero\Studio\18.0\PlatformSDKs\android-sdk-windows\build-tools\25.0.0\aapt.exe
Например чтобы сохранил результат в файл: aapt dump badging myapp.apk > mytextfile.txt
В первой строчке и будет искомое:
package: name='com.embarcadero.MyApp' versionCode='1' versionName='1.0.0' platformBuildVersionName=''
 

Вот сделал таблицу с событиями. Добавил в статью Очередь событий Delphi приложения на Android
И получилось, что отслеживать сворачивание можно по:
OnSaveState
aeWillBecomeInactive
EnteredBackground
Разворачивание:
WillBecomeForeground

Button1.StaysPressed := true; procedure TForm1.Button1Click(Sender: TObject); begin if Button1.IsPressed then ShowMessage('нажата') else ShowMessage('отжата'); end;  

Ссылка: http://blog.rzaripov.kz/2017/02/firebase-android-ios-2.html
Автор: Зарипов Равиль @ZuBy
Описание: Настройка пуш уведомлении через сервис Firebase для ANDROID и IOS [Часть 2]
В предыдущей  части , я рассказывал как сделать настройку пуш уведомления в консоли Firebase, в этой я покажу код на Delphi и серверную часть на PHP
https://github.com/rzaripov1990/PUSHTestFCM

Самый простой вариант - нарисовать в обычном графическом редакторе нужный прямоугольник с дыркой и сохранить его в png.
Сложный вариант копать сторону TPath - - по факту это SVG формат, векторная графика. Можно сделать вот как на видео (обвести иконки, создать path и закинуть SVG данные вTPath). 
Только вот я не знаю в какой программе это делать, если узнаете подскажите тоже в этой теме.
 
 
 http://www.webdelphi.ru/2012/04/firemonkey-2/
 
 
 

Анимацию и эффекты можно добавлять прямо в стиль, и события назначать тут же через триггеры.
 

buttonstyle.zip

Анимацию и эффекты можно добавлять прямо в стиль, и события назначать тут же через триггеры.
 

С помощью сервиса.

Пример работы с таймером:
 

мы в чатике провели небольшое расследование.
получилось что ресурсы на мобильных (на андроиде точно) сделаны для совместимости кода, т.к. даже если вы добавите в ресурсы файл, он все равно окажется в деплойменте
и доступ будет и через TResourceStream и по пути.
тест был такой
1) Новый проект
2) Project - Resources and Images
3) добавляем файл (camera_1x.png) 

 
 
 
 
 
 
 
 
 
 
4) компилируем на андроид устройство
5) проверяем оба варианта
procedure TForm1.Button1Click(Sender: TObject); var ResourceStream: TResourceStream; begin ResourceStream := TResourceStream.Create(hInstance, 'camera', RT_RCDATA); try ResourceStream.Position := 0; Image1.Bitmap.LoadFromStream(ResourceStream); finally FreeAndNil(ResourceStream); end; end; procedure TForm1.Button2Click(Sender: TObject); begin Image1.Bitmap.LoadFromFile(TPath.Combine (TPath.GetDocumentsPath, 'camera_1x.png')); end; в deployment'е наш файлик

Ссылка: http://blog.rzaripov.kz/2017/02/firebase-android-ios.html
Автор: Зарипов Равиль @ZuBy
Описание: Настройка пуш уведомлении через сервис Firebase для ANDROID и IOS

пример с GridPanelLayout
 

пример с GridPanelLayout
 

Для мобильных есть (не)визуальные нативные компоненты
TCustomPopover - http://docwiki.embarcadero.com/Libraries/Berlin/en/FMX.MultiView.Types.TCustomPopover TCustomListPicker - http://docwiki.embarcadero.com/Libraries/Berlin/en/FMX.Pickers.TCustomListPicker TMultiView с режимом Popover TfgActionSheet - http://fire-monkey.ru/topic/3173-rx-fgx-описание-версии-071118/

информация для размышления
asdf<пробел>fgt<F1><F2><F3>

В общем можно сделать, конечно, установку шрифта в инсталлере программы. И это будет оптимальным решением.
Но можно обойтись и без него.
Не буду расписывать детали, просто закину приложение и фрагменты кода. Думаю разберетесь. Естественно изменив на свои шрифты и т.п.
Все нижеперечисленное - в файл проекта DPR, перед Application.Initialize;
const CKey = '\Software\Microsoft\Windows NT\CurrentVersion\Fonts'; CFontFileName = 'spherelive.ttf'; CFontName = 'spherelive (TrueType)'; procedure ExecuteWait(const sProgramm: string; const sParams: string = ''; fHide: Boolean = false); var ShExecInfo: TShellExecuteInfo; begin FillChar(ShExecInfo, sizeof(ShExecInfo), 0); with ShExecInfo do begin cbSize := sizeof(ShExecInfo); fMask := SEE_MASK_NOCLOSEPROCESS; lpFile := PChar(sProgramm); lpParameters := PChar(sParams); lpVerb := 'open'; if (not fHide) then nShow := SW_SHOW else nShow := SW_HIDE end; try if (ShellExecuteEx(@ShExecInfo) and (ShExecInfo.hProcess <> 0)) then try WaitForSingleObject(ShExecInfo.hProcess, INFINITE) finally CloseHandle(ShExecInfo.hProcess); end; except On E : Exception do ShowMessage('font install Exception: ' + E.Message); end; end; if not IsFontRegistered(TPath.Combine(ExtractFilePath(ParamStr(0)), CFontFileName), CFontName) then if FileExists(TPath.Combine(ExtractFilePath(ParamStr(0)), 'RegFontC.exe')) then ExecuteWait(TPath.Combine(ExtractFilePath(ParamStr(0)), 'RegFontC.exe')); Application.Initialize; Где будет лежать файл со шрифтом - это уже ваше дело. Можно его куда угодно поместить. Хоть в ресурсы, хоть файлом просто, хоть с инета скачать.
P.S. Ну и конечно - это все именно под винду...
RegFont.zip

На других ПК рядом с Вашим ехе-файлом нужно положить dll-библиотеку SQLite

Взять можно отсюда: http://www.sqlite.org/download.html

На других ПК рядом с Вашим ехе-файлом нужно положить dll-библиотеку SQLite

На других ПК рядом с Вашим ехе-файлом нужно положить dll-библиотеку SQLite