Свойства

← →
qwertyu (2003-12-03 09:34) [0]

Привет всем.
Задача на форме куча кнопок. Надо, при нажатии кнопки менялся ее цвет на красный. Не очень хочется писать на каждую кнопку одно и тоже. Как можно передать в процедуру имя нажатого объекта, чтоб в потом изменить ее свойство.

← →
ЮЮ © (2003-12-03 09:40) [1]

А что, думаешь, за зверь - Sender: TObject в обработчике притаился?

← →
qwertyu (2003-12-03 09:47) [2]

В этом и дело, что через Sender неполучается. Хотя я может не правильно делаю.

← →
Jel © (2003-12-03 09:50) [3]

Покажи как делаешь

← →
Skier © (2003-12-03 09:50) [4]

> Хотя я может не правильно делаю.

Угу. Про приведение типов забыл...

← →
qwertyu (2003-12-03 09:57) [5]

Да, забыл. Если б знал, как сделать, не стал спрашивать.

← →
TUser © (2003-12-03 09:59) [6]

(Sender as TButtom).color:=clRed;

← →
Вованчик © (2003-12-03 09:59) [7]

(Sender as TButton)

← →
Ломброзо © (2003-12-03 10:10) [8]

что-то я глупоко сомневаюсь в возможности покрасить TButton

← →
qwertyu (2003-12-03 10:11) [9]

Спасибо.

← →
NAlexey © (2003-12-03 10:44) [10]

>что-то я глупоко сомневаюсь в возможности покрасить TButton
Правильно сомневаешься, ничего не выйдет.

>на форме куча кнопок

уже настораживает. больше 5 конопок на форме для юзера испытание.

> больше 5 конопок на форме для юзера испытание

Есть такая программа - калькулятор. Там больше, и не настораживает. Мэй би, человек его и пишет.

У TButton и других стандартных оконных кнопок просто так цвет не поменяешь. Надо использовать либо графические, либо нестандартные.

Свойства Найти похожие ветки