Improved bp algorithm and example application (delphi)