void QuantumFile::Flush()
{
    if (m_DosFilePtr)
        {
        for (ArrayIndex i=0; i < m_Block.GetSize(); i ++)
            {
            if (m_BufferModified[i])
                Write(i);
            }
        }
}