Source position: propertystorage.pas line 34
type TStoredValueEvent = procedure(
Sender: TStoredValue;
var Value: TStoredType
) of object;