Как можно нескольким компонентам назначить ОДИН обработчик событий?

Posted by obzor under Delphi

Есть несколько кнопок. Можно ли написать для всех один обработчик, чтобы OnClick в Edit записывался Caption этой кнопки ?

Вадим Мошев

Да, можно.

1. Киньте на форму столкьо кнопок, сколько вам надо.
2. Выделите их мышкой
3. В инспекторе объектов в разделе найдите нужное событие (onClick, например)
4. Сделайте по нему двойной клик, как будто пишете событие для одного элемента.
5. У вас появится один обработчик, но работать он будет для всех элементов.
6. Чтобы понять, на какую кнопку нажали, надо использовать формальный параметр sender обработчика событий. Для этого в обработчкие просто напишите такой код:

showMessage( 'Вы нажали кнопку ' +  (sender as TButton).caption );

Аватар

procedure TForm1.ButtonClick(Sender: TObject);
begin
  if Sender is TButton then Edit1.Text:=TButton(Sender).Caption;
end;

тема на форуме

Похожие статьи

• Задать свой обработчик событий у формы