Source position: msestreaming.pas line 64
function readrecordcount(
const obj: tpersistent;
const recordsize: Integer;
const stream: TStream
):Integer;