long __pascal MyGZ(Size cb);