定义一个TForm变量，读出来的时候，可以识别类名是什么吗？该怎么处理

定义一个TForm变量，读出来的时候，可以识别类名是什么吗？
我有个程序，需要把当前程序激活的窗体保存入一个tForm对象中，那么当我取出这个对象的时候，能不能判断出这个对象的类名呢？

比如
TFrom *f;

TMyForm1 *myform1;

TMyForm2 *myform2;

f=form1;

那么当我从f中取出数据的时候，我怎么知道这个里面的数据是myform1还是myform2?如何判断类名？


[解决办法]
ShowMessage(f->ClassName());