Возможно это работает также как и для IOS...
У меня получилось
Код не изменился, изменения были в форме...
Нужно задать цвет
Form1.Fill.Color := TAlphaColorRec.Red;
Посередине я поставил Rectangle, чтобы цвет контента не был равен цвету форме.
и снизу стоит Rectangle с черным цветом, т.к. у меня наэкранные кнопки.
если убрать нижняя панель тоже покрасится.
И теперь вопрос, кто знает как определить высоту наэкранных кнопок и их существование?
P.S. Кривяков Виталий спасибо за модуль