// Sender  사용
1)
if Sender is TButton then                  //확인
begin
  (Sender as TButton).Caption := 'BUTTON'; //사용1  런타임에 동적으로 타입캐스팅 , 에러 검증 가능
  TButton(Sender).Caption     := 'BUTTON'; //사용2  컴파일 타임에 타입캐스팅     , 검증 X        , 이론상 더 빠름
end;

2)
IF SENDER = BTN1 THEN BEGIN //컴퍼넌트 이름이 BTN1 일때만 실행

3)
//TForm 클래스를 이용하면 폼안에 있는 모든 컴포넌트들에 사용가능
TForm1(Sender).Tag;
TForm1(Sender).name;
TForm1(Sender).hint;

4)
procedure .... ;
var
   Grid: TcxgGrid absolute Sender;  // absolute는 원래 변수를 선언할 때 변수가 다른 변수와 같은 메모리를 사용하도록 할 때 사용
begin
  Grid.Canvas.Brush.Color := clRed;
end;