Delphi as is self

as (operator ) 運算子, 是用來 型態轉換 ,會將 左方運算元型態 轉為 右方運算元型態
語法:
object as class
例:
procedure TForm1.Button1Click(Sender:TObject);
begin
showmessage((Sender as TButton)).Name;
end;
is 運算子,檢驗 左方運算子物件實體 是否屬於 右方運算元類別 或 子類別,回傳值為 Boolen: True or False
語法:
object is class
注意:
is 回傳 True 或 False 那是在允許使用 is 運算子狀態下, 若在不允許狀態下會產生 編譯錯誤 而不是 False