TBackpropagationNetwork Class
procedure Train(aPatterns: TList); override;
This is Train, a member of class TBackpropagationNetwork.