delphi7类型问题求解
function PropertyExists(const AObject: TObject;const APropName:String):Boolean;
//判断一个属性是否存在
var
PropInfo:PPropInfo;
begin
PropInfo:=GetPropInfo(AObject.ClassInfo,APropName);
Result:=Assigned(PropInfo);
end;


报错：Undeclared identifier:'PProInfo'
是缺少类型定义吗？我从网上也搜不到这个类型，高手指教。有的话帮忙发出来一个。
[解决办法]
引用单元如下：

uses TypInfo;