类的运算符只有四种:
=、<>、ad、is
(1)”=“运算符用来判断两个类是否相等
(2)”<>“用来判断两个类是否不相等
(3)is运算符是双目运算符,用来判断一个对象是否是一个类的实例或者一个类的子类的实例,如果是返回 true 反之False
(4)as运算符是双目运算符,用来将对象转换成自身类或是父级类的类型,该对象可以为空
var i: integer; begin if Edit1.ClassType = Edit2.ClassType then ShowMessage(‘类相同‘); if Edit1.ClassType <> Edit2.ClassType then ShowMessage(‘类不相同‘); for i:= 0 to Self.ControlCount-1 do begin if Self.Controls[i] is TEdit then Self.Controls[i].Enabled:= False; end; for i:=0 to Self.ControlCount-1 do begin if Self.Controls[i] is TEdit then (Controls[i] as TEdit).Color:= clInfoBk; end; end;