Número de serie físico del disco duro

[edupomar]

Gracias por la informacion MAXIUM me fue de mucha ayuda, al igual que la ayuda de neftali...

[Neftali [Germán.Estévez]]

Empezado por edupomar

y sigo con el mismo problema, donde puede estar el error..???, pero que gran aporte de neftali...

Creo que no has instalado el package, de ahí que al abrir el proyecto te diga que no encientra el componente.

(1º) En el fichero que te has bajado de la web, en el directorio packages está el package que debes instalar; Ábrelo desde el IDE, compila e instala.
(2º) Una vez instalado el package ya debería ver el componente al abrir el formulario del ejemplo.
Si al compilar te da el error de que no encuentra el ficheros, basta con que añadas el path (donde está CDiskInfo) a los directorios de busqueda (Search path en la opciones del proyecto).

[rgstuamigo]

Empesado por mierda>

mira a ver si te sirve este codigo
Hola, aqui tengo un ejemplo que te servira:

Código Delphi [-]
function GetVolumeID(DriveChar: Char): String; 
var 
   MaxFileNameLength, VolFlags, SerNum: DWord; 
begin 
   if GetVolumeInformation(PChar(DriveChar + ':\'), nil, 0, 
      @SerNum, MaxFileNameLength, VolFlags, nil, 0) 
   then 
   begin 
     Result := IntToHex(SerNum,8); 
     Insert('-', Result, 5); 
   end 
   else 
       Result := ''; 
end;

Ese codigo es el mismo que tiene este libro de trucos en la pagina 76,. me alegra que lo conoscas y aparte de eso tambien existen muchos otros trucos mas....
Saludos...