¿Como saber capacidad de HDD y Modelo Board?

[ecfisa]

Hola Javier.

Para la capacidad y espacio libre del disco, Delphi tiene las funciones DiskSize y DiskFree:

Código Delphi [-]
...
const
   C = 3;
begin
  ShowMessage(Format('Tamaño: %d Kb. %sLibre: %d Kb.',
    [DiskSize(C)div 1024,#13#10,DiskFree(C) div 1024]));
end;

Saludos.