как использовать Sender Опции

[priboltik]

полазил по FAQу - не нашел..
как я могу использовать Sender и где я могу его использовать???
если я правильно понимаю, то его можно использовать для одинаковых действий над объектами одного и того же класса.. это так??

вот напимер, как с помощью Sender мне в 3 checkbox - ах поменять свойство Visible???
пишу: (Sender as TCheckBox).Enabled:=true; - компиллирует но выдает ошибку...
подскажите пожалуйста..

[klem4]

procedure TForm1.Button1Click(Sender: TObject);
var
  i: Integer;
begin
  for i := 0 to ComponentCount - 1 do
   if (Components[i] is TLabel) then
    (Components[i] as TLabel).Caption := 'I''m Tlabel component !';
end;

[priboltik]

ок. спасибо.. собственно это и хотелось узнать..