http://stackoverflow.com/questions/1642220/getting-size-of-a-file-in-delphi-2010-or-later