Source position: mserttistat.pas line 153
procedure addobjectinfoitem(
var dest: objectinfoarty;
const aobj: tobject;
const aprefix: string = ''
);