生成新的卷ID

时间:2013-03-29 11:53:49

标签: windows delphi

我从microsoft technet论坛检查了VloumeID工具,从“http://www.xboxharddrive.com/freeware.html”检查了“硬盘序列号更改”工具。 但这些工具仅提供更改VolumeID。是一种安全的方法来生成一个新的,而不会与同一台PC上可能存在的其他逻辑驱动器的其他VolumeID冲突

1 个答案:

答案 0 :(得分:4)

我假设您要以编程方式设置卷序列号。

根据当前日期/时间生成卷序列号(VSN)。每个操作系统版本和/或格式使用的工具可能会有所不同。

有关详细信息,请参阅以下链接:

来自Rufus源代码:

/*
* 28.2 CALCULATING THE VOLUME SERIAL NUMBER
*
* For example, say a disk was formatted on 26 Dec 95 at 9:55 PM and 41.94
* seconds. DOS takes the date and time just before it writes it to the
* disk.
*
* Low order word is calculated: Volume Serial Number is:
* Month & Day 12/26 0c1ah
* Sec & Hundrenths 41:94 295eh 3578:1d02
* -----
* 3578h
*
* High order word is calculated:
* Hours & Minutes 21:55 1537h
* Year 1995 07cbh
* -----
* 1d02h
*/

static DWORD GetVolumeID(void)
{
SYSTEMTIME s;
DWORD d;
WORD lo,hi,tmp;

GetLocalTime(&s);

lo = s.wDay + (s.wMonth << 8);
tmp = (s.wMilliseconds/10) + (s.wSecond << 8);
lo += tmp;

hi = s.wMinute + (s.wHour << 8);
hi += s.wYear;

d = lo + (hi << 16);
return d;
}

转换为以下Delphi代码:

type
  TVolumeId = record
    case byte of
      0: (Id: DWORD);
      1: (
        Lo: WORD;
        Hi: WORD;
      );
  end;

function GetVolumeID: DWORD;
var
  dtNow: TDateTime;
  vlid: TVolumeId;
  st: SYSTEMTIME;
begin
  GetLocalTime(st);
  vlid.Lo := st.wDay + (st.wMonth shl 8);
  vlid.Lo := vlid.Lo + (st.wMilliseconds div 10 + (st.wSecond shl 8));

  vlid.Hi := st.wMinute + (st.wHour shl 8);
  vlid.Hi := vlid.Hi + st.wYear;

  Result := vlid.Id
end;