UnitClassifier
Declaration
TOnClassifyTest = procedure(Sender: TObject; var Succes: double) of object;
DescriptionEvent used by TClassifier object to test the classification accuracy.