dnekrasov

Почитайте здесь.

Для не простых случаев иcпользуются разновидности TLayout

Помимо свойства Align используйте TLayout для группировки компонентов. Приложите простую демку - и возможно вам покажут как сделать пропорциональное изменение дизайна. 
Еще обратите внимание на компонент TScaledLayout - он изменяет размеры всех дочерних контролов пропорционально изменению своих размеров

А почему бы просто не сделать стиль для TEdit, который в неактивном виде выглядит как TLabel?

В Berlin и Tokyo AddFontResource и RemoveFontResource прекрасно отрабатывают, только вызывать их надо до Application.Run.
Кстати, лучше использовать  AddFontResourceEx и RemoveFontResourceEx с флагом FR_NOT_ENUM - тогда надобность в SendMessage(HWND_BROADCAST, WM_FONTCHANGE, 0, 0) отпадает.

Для не простых случаев иcпользуются разновидности TLayout

А почему бы просто не сделать стиль для TEdit, который в неактивном виде выглядит как TLabel?

нужно использовать лицензионную винду, иначе Align не будет работать
 

В архиве - простенький проект. Протестирован на Win и OSX.
 
TimerThreadDemo.zip

Спасибо в отдельном сообщении говорить не надо - просто поставьте Thanks:

Спасибо в отдельном сообщении говорить не надо - просто поставьте Thanks:

В стиле создать "windowborderstyle"

В FMX у TLabel нет свойства Color. В стандартных стилях у TLabel прозрачный фон, поэтому надо или сделать свой стиль или расположить ваш Label поверх TRectangle, TColorBox ну или что-то похожее.

За скролы отвечают scrollbarhtrackstyle, scrollbarvtrackstyle, scrollbarbottombutton, scrollbarleftbutton, scrollbarrightbutton и scrollbartopbutton. 
За Header - headeritemstyle

Вы передаёте цвет с прозрачностью 0. Попробуйте сделать так:
Add(R1, 'Раздел 1', $FF000000 or rgb(49, 47, 138));

Просто добавляет непрозрачность. Старший байт - значение альфа-канала. 
 

Спасибо в отдельном сообщении говорить не надо - просто поставьте Thanks:

Спасибо в отдельном сообщении говорить не надо - просто поставьте Thanks:

Вы передаёте цвет с прозрачностью 0. Попробуйте сделать так:
Add(R1, 'Раздел 1', $FF000000 or rgb(49, 47, 138));

Просто какая-то странная проблема, впрочем как и её решение. Я FillText использую довольно активно, но никогда ничего подобного не наблюдал. Да и что-то мне подсказывает что дело совсем не в том, что надо использовать в качестве буфера TPaintBox вместо TBitmap. Ведь у людей, которые прочитают эту ветку форума может сложиться не правильное мнение, как надо решать подобные проблемы.

В стиле создать "windowborderstyle"

В FMX у TLabel нет свойства Color. В стандартных стилях у TLabel прозрачный фон, поэтому надо или сделать свой стиль или расположить ваш Label поверх TRectangle, TColorBox ну или что-то похожее.

В общем разобрался. 
Вдруг кому пригодится
 
procedure TForm1.Button1Click(Sender: TObject);
var
  buf: array[0..60] of Char;
  n: Integer;
  fmt: Word;
  H: THandle;
  P: PAnsiChar;
  S:UnicodeString;
begin
  for n := 0 to Clipboard.FormatCount - 1 do
  begin
    fmt := Clipboard.Formats[n];
    Clipboard.Open;
    if GetclipboardFormatName(fmt, buf, Pred(Sizeof(buf))) <> 0 then
      begin
          begin
             H := Clipboard.GetAsHandle(fmt);
             P := GlobalLock(H);
             S:=UnicodeString(P);
             Memo1.Lines.Add(P);
             GlobalUnlock(H);
          end;
      end;
    Clipboard.Close;
  end;
end;

А что мешает в буферной битмапке хранить точную копию исходной, а в DrawBitmap указывать нужные SrcRect и DestRect? По-моему Вы зациклились на необходимости использования CopyFromBitmap, а здесь она и не нужна вовсе (ИМХО) .

TBitmap.Canvas.DrawBitmap Вам в помощь
Ну или можно использовать буферный TBitmapData и построчно, используя GetScanLine, копировать память.