Hello delphizip, Commented out wrong line before here correct code: // Set the maximum number of bytes that can be written to this disk(file). if MaxVolumeSize > 0 then if MaxVolumeSize < FFreeOnDisk then FFreeOnDisk := MaxVolumeSize else FFreeOnDisk:=round(FFreeOnDisk*0.98); -- Regards, Alistair+