Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2007.03.11;
Скачать: 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 вся ветка

Текущий архив: 2007.03.11;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.037 c
2-1171608610
Alarm
2007-02-16 09:50
2007.03.11
Вопрос по HotKey


2-1172057232
Lonix
2007-02-21 14:27
2007.03.11
Как блокировать чужое приложение


3-1165934673
barakuda
2006-12-12 17:44
2007.03.11
Добавить поле


2-1171787360
sat
2007-02-18 11:29
2007.03.11
TextOut


15-1171281328
stasia
2007-02-12 14:55
2007.03.11
Очень нужен программист-разработчик в Delphi