Comment acceder au numero de serie du volume
Résolu/Fermé
A voir également:
- Comment acceder au numero de serie du volume
- Numero prive - Guide
- Acceder au bios - Guide
- Trouver le propriétaire d'un numéro de téléphone gratuitement ✓ - Forum Mobile
- Word numéro de page 1/2 - Guide
- À qui correspond ce numéro suisse ✓ - Forum Mail
4 réponses
grofwa
Messages postés
440
Date d'inscription
jeudi 24 juillet 2003
Statut
Membre
Dernière intervention
21 juillet 2006
479
15 juin 2005 à 15:01
15 juin 2005 à 15:01
Salut,
Dans l'API Windows, il y a la fonction suivante
BOOL GetVolumeInformation(
LPCTSTR lpRootPathName, // address of root directory of the file system
LPTSTR lpVolumeNameBuffer, // address of name of the volume
DWORD nVolumeNameSize, // length of lpVolumeNameBuffer
LPDWORD lpVolumeSerialNumber, // address of volume serial number
LPDWORD lpMaximumComponentLength, // address of system's maximum filename length
LPDWORD lpFileSystemFlags, // address of file system flags
LPTSTR lpFileSystemNameBuffer, // address of name of file system
DWORD nFileSystemNameSize // length of lpFileSystemNameBuffer
);
Ca devrait t'aider, du moins si tu travailles sous Windows
Dans l'API Windows, il y a la fonction suivante
BOOL GetVolumeInformation(
LPCTSTR lpRootPathName, // address of root directory of the file system
LPTSTR lpVolumeNameBuffer, // address of name of the volume
DWORD nVolumeNameSize, // length of lpVolumeNameBuffer
LPDWORD lpVolumeSerialNumber, // address of volume serial number
LPDWORD lpMaximumComponentLength, // address of system's maximum filename length
LPDWORD lpFileSystemFlags, // address of file system flags
LPTSTR lpFileSystemNameBuffer, // address of name of file system
DWORD nFileSystemNameSize // length of lpFileSystemNameBuffer
);
Ca devrait t'aider, du moins si tu travailles sous Windows
grofwa
Messages postés
440
Date d'inscription
jeudi 24 juillet 2003
Statut
Membre
Dernière intervention
21 juillet 2006
479
19 juil. 2005 à 12:06
19 juil. 2005 à 12:06
Bonjour,
L'utilisation de la routine GetVolumeInformation ne relève en rien de la programmation système. Elle s'utilise comme toute autre fonction Delphi, il faut juste mentionner l'utilisation de la bibliothèque Windows.
Pour le reste, voici un exemple tout bête qui affiche le numéro de série du disque.
slts
Michael.
L'utilisation de la routine GetVolumeInformation ne relève en rien de la programmation système. Elle s'utilise comme toute autre fonction Delphi, il faut juste mentionner l'utilisation de la bibliothèque Windows.
Pour le reste, voici un exemple tout bête qui affiche le numéro de série du disque.
procedure TForm1.Button1Click(Sender: TObject);
var
VolumeName : array[0..MAX_PATH] of char;
VolumeSerialNr : dword;
FileSystemName : array[0..MAX_PATH] of char;
fml : dword;
flags : dword;
begin
if GetVolumeInformation('C:\', VolumeName, MAX_PATH, @VolumeSerialNr, fml, flags, FileSystemName, MAX_PATH) then
ShowMessage('SerialNr = '+IntToStr(VolumeSerialNr));
end;
slts
Michael.
grofwa
Messages postés
440
Date d'inscription
jeudi 24 juillet 2003
Statut
Membre
Dernière intervention
21 juillet 2006
479
22 juil. 2005 à 14:48
22 juil. 2005 à 14:48
Que de grands mots pour un petit coup de main !
;-)
;-)
