procedure Load(var aStream: Tstream); override;

This is Load, a member of class TCustomNeuroNetwork.