Деактивация кнопки

[Dennis777]

Суть проблемы: есть куча спидбаттонов, на которые подгружены картинки. Каждая кнопка отвечает номеру вопроса. Если на вопрос дан ответ - на кнопку подгружается картинка(улыбающийся смайлик, если верно, и грустный, если неверно) и в то же время нужно сделать так, чтобы в дальнейшем при нажатии на эту кнопку ничего не происходило. В то же время, присваивать Enabled в false - нельзя, так как в таком случае картинка становится серой, а это крайне не желательно.

В программе на этот случай прописали -

sSpeedButton1.OnClick:=nil;

, и все бы ничего, только вот на форме появилась кнопка ОТМЕНА, и по нажатию на нее нужно каким-то образом вернуть действие, которое использовалось по нажатию на кнопку. Как это можно сделать?)

[Delphi_ProGer]

Это можно реализовать многими путями, вот первые 2, которые пришли мне в голову:
1) Свойство Tag кнопки - можно его использовать как статус кнопки(включайте здесь свою фантазию); 0 - можно изменять, 1 - не можно изменять картинку. Когда будете возвращать стандартные значения, то просто пройдитесь по всем кнопкам цыклом и изменяйте значение Tag, наприм. на 0.
2)

sSpeedButton1.OnClick:=nil;

При нажатии ОТМЕНА цыклом проходите и заново присваивайте каждой кнопке обработчик события(наприм. btn.OnClick:=BtnOnClick).

P.S. Про перебор компонентов(в нашем случае кнопок) легко найдете на форуме.
Подсказка: поле Components у формы. А также ComponentsCount.

[Вадим Мошев]

Dennis777
Может, тогда имеет смысл в обработчике события нажатия на кнопку дописать такой вот код:

If condition then exit;

В свою очередь condition устанавливать в случае, если ответ дали, и сбрасывать (false), если нажали отмена или ответа ещё не дали.

[Dennis777]

Большое спасибо за оперативность!) Очень выручили