Source position: contnrs.pp line 447
type TStringIteratorCallback = procedure(
Item: string;
const Key: string;
var Continue: Boolean
);