Delphiのis演算子はC++Builderはどのようにかけばよいのでしょう?

if E is EThread then〜〜