delphi编写 提取硬盘序列号,根据硬盘序列号,用户可以将软件注册和改序列号关联起来,保证唯一性!