![]() |
|
#1
|
|||
|
|||
![]() Собственно возник вопрос:
Зачем он нужен этот Sender : TObject в заголовке процедуры. Наскока я правильно понял это нужно для выяснения того кто вызвал данную процедуру, если так тогда следующий вопрос : а зачем собственно знать кто ее вызвал. Эти вопросы возникли вследствии создания процедуры в заголовке которой указаны формальные переменные. И вот думаю как все это вместе увязать в заголовке и надо ли? |
#2
|
|||
|
|||
![]() Sender бывает нужен, например, когда вы для нескольких однотипных (или даже разнотипных) элементов создаете один обработчик события. Тогда в этом обработчике вам может понадобиться знать - кто именно его вызвал.
Например: Код:
procedure ClickOnLabel(Sender: TObject); begin If (Sender is TLabel) and ((Sender as TLabel).FocusControl <> nil) then (Sender as TLabel).FocusControl.SetFocus; end; |
#3
|
|||
|
|||
![]() Спасибо, понял.
![]() |