visual prolog 7.1 , взаимодействие кнопок

Я создал форму, на ней несколько кнопок. У каждой прописана своя функция. Вот вопрос: можно ли сделать так, чтобы кнопки могли проверять, была ли нажата эта кнопка или какая-либо другая? и чтобы при этом менялись функции кнопок. Скажем, при нажатии на кнопку рисуется квадрат. Нажимаешь снова-она проверяет, была ли нажата эта кнопка. Если была, то при нажатии на эту же кнопку будет нарисован круг. Ну и чтобы проверяла, были ли нажаты другие кнопки

сделай простой автомат и case'ом выбирай

я так делал у меня 3 кнопки и 15 функция в зависимости от 5 checkbox'ов