Цитата:
Сообщение от cadil
Я не спрашивал как записать процедуру
Код:
procedure TForm6.Label4Click(Sender: TObject);
- тут вопросов нет.
Проблема в том, чтобы записать условие: "если клик по Label4 выполнен, то ..." Дело в том, что среди свойств и функций компонента Label свойства Click - нет.
Впрочем, эту проблему я уже обошел ...
|
что значит если клик по Label4? свойства нет есть событие. onClick.
если событие только на этот компонент то и проверять не зачем ибо оно будет возникать только для этого компонента.
если у вас на все label стоит одно и тоже событие то обрабатывайте входящий параметр Sender например так:
Код:
if (sender as TComponent).Name='Label3' then чегото делаем.
if (sender as TComponent).Name='Label4' then чегото делаем.