procedure Load(var aStream: Tstream); virtual;

This is Load, a member of class TCustomNeuroObject.