Вниз
Скачать: CL | DM;

Как узнать номер винта??   Найти похожие ветки 

← →
c0pyc@t ©   (2002-08-27 08:36) [0]

Как узнать номер винта??


← →
Ученик ©   (2002-08-27 09:07) [1]

http://www.sources.ru/cpp/system/devid.shtml


← →
c0pyc@t ©   (2002-08-27 09:36) [2]

спасибо


← →
c0pyc@t ©   (2002-08-27 10:24) [3]

А нет ли какой нибудь информации о винте в реестре?


← →
Ученик ©   (2002-08-27 10:28) [4]

Она там обычно остается, даже если винта уже нет


← →
c0pyc@t ©   (2002-08-27 10:38) [5]


> Ученик ©

ну ну поподробней, мне бы просто нужна инфа которая практичести уникальна на компе


← →
Song ©   (2002-08-27 10:42) [6]

GetVolumeInformation()


← →
Ученик ©   (2002-08-27 10:42) [7]

http://delphi.mastak.ru/cgi-bin/search.pl?words=MiTeC&n=103


← →
c0pyc@t ©   (2002-08-27 10:46) [8]

Это все конешно хорошо, но немогли бы вы мне подсказать какую взять информацию о компе которая на других не втретится, короче уникальный ID машины, ip не предлогать


← →
Ученик ©   (2002-08-27 11:05) [9]

В реестре похоже серийного номера нет (своего не нашел), поэтому
Ученик © (27.08.02 09:07),

Насчет ID всегда есть проблемы (точнее особенности),
ID винчестера - необходимы права для обращения к драйверам или первоначальной установки своего на Windows NT (2000)
ID процессора начиная с Pentium 3,
ID сетевой карты (MAC Address) проблемы на ноутбуках, где периферия меняется, или ее вообще может не быть.

даже не знаю, что посоветовать :)


← →
Ученик ©   (2002-08-27 11:22) [10]

Есть еще вариант через RPC, но я бы не пользовался

type
TUuidCreate = function (var GUID : TGUID) : HResult; stdcall;

function GenRpcID : string;
var
GUID : TGUID;
hLib : THandle;
UuidCreate : TUuidCreate;
begin
Result := "";
hLib := LoadLibrary("RPCRT4.DLL");
if hLib <> 0 then try
if Win32MajorVersion >= 5 then
@UuidCreate := GetProcAddress(hLib, "UuidCreateSequential")
else
@UuidCreate := GetProcAddress(hLib, "UuidCreate");
if (@UuidCreate <> nil) and (UuidCreate(GUID) = 0) then
Result := Copy(GuidToString(GUID), 26, 12)
finally
FreeLibrary(hLib)
end
end;

Если есть сетевая карта, то это будет MAC адрес



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

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



Память: 0.47 MB
Время: 0.012 c
1-14021
Сергей76
2002-08-26 12:57
2002.09.05
Кроссворд


3-13939
Nazareth
2002-08-15 14:32
2002.09.05
Проблема переносимости из Delphi 5 в Delphi 6


3-13926
bobr12
2002-08-15 12:32
2002.09.05
Как поставить на машину BDE?


14-14258
naik
2002-08-11 10:30
2002.09.05
Нужна электронная книга по delphi


3-13890
Nikkk
2002-08-14 13:10
2002.09.05
insufficient memory




   Наверх