Source position: syncipc.pp line 134
function ReadInt(
AStream: TStream;
var IntegerSize: Byte
):Integer;