Merge pull request #261 from SkybuckFlying/PascalCoinDevMasterBlockHeaderFix

Packed directive added to record TBlockHeader.

src/core/UFileStorage.pas

@@ -29,7 +29,7 @@ uses
 
 
 Type
-  TBlockHeader = Record
+  TBlockHeader = packed record
     BlockNumber : Cardinal;
     StreamBlockRelStartPos : Int64;
     BlockSize : Cardinal;