Ayuda con error en DriveComboBox

[danielmj]

Hola ecfisa,

Acabo de ejecutar tu aplicacion y me encuentro con esto:

1º Si selecciono la unidad C, me lee la disquetera, pero no devuelve mensaje de error aunque esté vacía.
2º Si selecciono la unidad E que la tengo como un esclavo y es un disco duro, muestra el mensaje "inserte un disco en la unidad E"

He jugado con los valores de la linea que muestro abajo, pero da error de compilación.

Código Delphi [-]
Result := DiskSize(Ord(Upcase(Drive)) - Ord('A') -1) = -1;

Dicho lo anterior ¿existe alguna forma de que la aplicación reconozca solo los discos duros con sus particiones?

Saludos y gracias.