在Delphi5中如何通过句柄来判断它是否是TForm这个类？

Question

本身说法有点问题。
一般只能说它是不是TForm的子类。（如果说要判断是不是Tform类，可用如下方法：
  var
  ClassName: array [0..255] of char;
  begin
  GetClassName(Frm×××.handle,ClassName,10);
  if ClassName='TForm' then
    Return:=true;  
  end;  ）直接用强制转换语句,并且Try一把就可以判断是不是属于TForm的子类。
   try
     s:=TForm(Frm×××).caption;
     return:=true;
   except
   end;
   

Answer 1

 obj is TForm 返回真就是

Answer 2

to zcn()　
   用GetClassName()获得的Form名称是设计状态的名称如Form1而不是TForm

Answer 3

to powerlee(老李飞刀)　
  你指的Obj是什么？