Source position: OverbyteIcsMD5.pas line 76
type TMD5Progress = procedure(
Obj: TObject;
Count: Integer;
var Cancel: Boolean
);