Source position: _crw_dimc.pas line 267
type TDimServiceIterator = procedure(
Service: TDimService;
Custom: Pointer;
var Terminate: Boolean
);