Source position: lazlistclasses.pas line 183
type TLazStorageMemShrinkProc = function(
ARequired: Integer
):Integer of object;