Source position: classesh.inc line 778
public function TBits.PopCount(
Pos: SizeInt;
Count: SizeInt;
Lim: SizeInt = High(SizeInt)
):SizeInt;