Может есть предположение почему с десяткой все работает?
Не заметили сразу, на скринах которые Вы прикрепили к пред. сообщению видна причина проблемы. На Windows 7 ускорение Direct3D недоступно. На Windows 10 с ним всё в порядке. Значит по каким-то причинам на Windows 7 компоненты DirectX или видеодрайвера не работают правильно. Трудно сказать что именно ей мешает. Перепроверили на наших ПК с Windows 7, всё работает и в виртуальной машине и в основной. Ускорение Direct3D включено. По нашей информации сейчас примерно 30% наших пользователей работают именно на Windows 7, о подобной проблеме никто не сообщал.

А можно ли по значению переменной менять цвет фона на котором расположен текст? Сам текст я посмотрел как менять, а вот фон под ним не понятно.
Да, можно менять практически все свойства объектов. Для смены цвета фона у компонента Текст используется свойство Color. Для цвета шрифта свойство FontColor. Например: Text1.Color := clRed;