最简单的检查CD－ROM或是磁盘是否有过变化的方法是检查其volume号码。你可以简单地运用下面的函数来返回磁盘的volume系列号码GetDiskVolSerialID（′E′），函数代码如下：
　　functionGetDiskVolSerialID（cDriveName：char）：DWord；
　　var
　　dwTemp1，dwTemp2：DWord；
　　begin
　　GetVolumeInformation（PChar（cDriveName＋′：ι′），Nil，0，ΝResult，dwTemp2，dwTemp2，Nil，　0）；
　　end；