Исходник программы, показывающей пример создания имитации светодиодной вывески, которую обычно можно увидеть в Burger King.
В программе есть элементы управления, позволяющие пользователю устанавливать текст и шрифт сообщения, а также размер и цвет светодиода. Тип записи TLEDChar определяет один символ - он содержит целочисленную переменную Charwidth и двумерный динамический массив байтов (строки и столбцы изображения светодиода, где 0 = выключено, а 1 = включено). Массив Chars содержит записи TLEDChar для всех 256 возможных символов. Неопределенные символы можно идентифицировать по значению 0 CharWidth. Процедура LoadFont загружает массив Chars из файла шрифта, выбранного пользователем.
Символы создаются во временном растровом изображении, а затем копируются в TImage для отображения. Функция DrawLED генерирует указанный символ в растровом изображении, начиная с указанного места.
Как только светодиодное сообщение создано, Copyrect используется для его копирования в видимый TImage. Теперь нам нужно его прокрутить. Цикл используется для копирования самой правой части растрового изображения (из начальной позиции, которая увеличивается на 1 светодиод каждый раз) в крайнюю левую часть изображения. Затем не скопированная крайняя левая часть растрового изображения копируется в крайнюю правую часть изображения. Это создает иллюзию, что сообщение прокручивается влево.