Форум: "Начинающим";
Текущий архив: 2007.03.11;
Скачать: [xml.tar.bz2];
Вниз
Подскажите как серийник с винта считать... Найти похожие ветки
← →
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 вся ветка
Форум: "Начинающим";
Текущий архив: 2007.03.11;
Скачать: [xml.tar.bz2];
Память: 0.46 MB
Время: 0.043 c
