Скачать: CL | DM;

Подскажите как серийник с винта считать...   Найти похожие ветки 

← →
vegarulez ©   (2007-02-16 14:04) [0]

Привет всем мастерам!
У меня вот такой вопрос - как считать серийник с винта?

---

← →
Сергей М. ©   (2007-02-16 14:24) [1]

Что такое "серийник винта" и нафих оно надо ?)

---

← →
iXT ©   (2007-02-16 14:31) [2]

> Сергей М. ©   (16.02.07 14:24) [1]

Что бы винт не подменили :)

---

← →
Amoeba ©   (2007-02-16 15:12) [3]

Найдешь здесь:
http://home.earthlink.net/~akonshin/delphi_ru.htm

---

← →
Desdechado ©   (2007-02-16 15:15) [4]

Лазерным считывателем штрихкода.

---

← →
TRUNK ©   (2007-02-18 19:30) [5]


var
VolumeSerialNumber,MaximumComponentLength,FileSystemFlags: Cardinal;
VolumeName,FileSystemName: array[0..15] of Char;

GetVolumeInformation(PChar("\\.\C:"),@VolumeName,Length(VolumeName),
                    @VolumeSerialNumber,MaximumComponentLength,
                    FileSystemFlags,@FileSystemName,Length(FileSystemName));


---

← →
Amoeba ©   (2007-02-19 12:17) [6]

> TRUNK ©   (18.02.07 19:30) [5]
>
>
> var
> VolumeSerialNumber,MaximumComponentLength,FileSystemFlags:
>  Cardinal;
> VolumeName,FileSystemName: array[0..15] of Char;
>
> GetVolumeInformation(PChar("\\.\C:"),@VolumeName,Length(VolumeName),
>
>                     @VolumeSerialNumber,MaximumComponentLength,
>
>                     FileSystemFlags,@FileSystemName,Length(FileSystemName));
>

Это только если автору вопроса нужен серийный номер тома прописываемый ОС. Если же речь идет о "железном" серийнике, зашитом изготовителем жесткого диска, то смотреть на http://home.earthlink.net/~akonshin/delphi_ru.htm

---

← →
vegarulez ©   (2007-02-21 07:49) [7]

Да, именно защитый изготовителем. Ссыль очень помогла. Спасибо.

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.043 c