Функция IsButtonPressed
Процедура SetButtonIcon
Процедура SetButtonPressed
Пример программирования кнопок
