Source position: titanscripter.pas line 565
procedure RegisterProperty(
PClass: TClass;
const PropDef: string;
UserData: Integer = 0
);