TTrainingCallback Class
CurrentStep: integer;
This is CurrentStep, a member of class TTrainingCallback.