|
|
#1
|
|||
|
|||
Название диска
Как можно програмно узнать название жесткого диска или флешкарты? Заранее спасибо
|
#2
|
||||
|
||||
На HDD работает, на флешках не проверял.
Код:
procedure TForm1.Button1Click(Sender: TObject); Var SerialNum, MaxFNameLength, FileSysFlags: DWORD; VolName, FSName: Array [0..255] Of Char; begin GetVolumeInformation('C:\', VolName, SizeOf(VolName), @SerialNum, MaxFNameLength, FileSysFlags, FSName, SizeOf(FSName)); Label1.Caption:= VolName; end; If end Then begin; |
#3
|
|||
|
|||
спасибо, работает(с флешками кстати тоже)
|
#4
|
|||
|
|||
А имя физического диска слабо получить? ))))))
Говори что думаешь, думай, что говоришь. (Шоссе 60) |
#5
|
||||
|
||||
В смысле физического? Надпись маркером на CD или DVD?)))
If end Then begin; |
#6
|
|||
|
|||
Грубо говоря, есть физический диск (на котором данные сохранены) и то, что мы видим из под операционной системы (логический диск).
Физического, в смысле не диск С, диск Д, а именно попытаться получить паспорт, или хотя бы модель жесткого диска. Как и ставил задачу автор темы. ))) например WD5000BEVT-22ZAT0-WXNZ08L14294. Говори что думаешь, думай, что говоришь. (Шоссе 60) |
#7
|
|||
|
|||
Цитата:
|
#8
|
|||
|
|||
давай )))))))))) а мы посмотрим ))))
Говори что думаешь, думай, что говоришь. (Шоссе 60) |