Save the list of scores in AFileName (and create the path if needed and possible)
procedure SaveToFile(AFileName: string)