unsigned long sn = 0; AnsiString ID; if(!GetVolumeInformation("c:/",NULL,NULL,&sn,NULL,NULL,NULL,NULL)) ShowMessage("Error"); else ID = IntToHex((int)sn,8);