Source position: titan_rtti.pas line 51
procedure PuTTitanObjectProperty(
const O: variant;
const PropName: string;
const Value: variant
);