como saber cual es la unidad de cd?

[crievep]

Despues de buscar con las posibles combinaciones de estas palabras :unidad+ cd no he encontrado como puedo saber cual es la letra que representa la unidad y/o unidades de cd instaladas. saber si es c:\, d:\ o z:\ en fin la que sea o si no existe (antiguos pc's)

Gracias por la posible ayuda
Si busque mal pido disculpas

[[seoane]]

Prueba con algo como esto:

Código Delphi [-]
var
  Letra: Char;
begin
  for Letra:= 'A' to 'Z' do
    if GetDriveType(Pchar(Letra+':\')) = DRIVE_CDROM  then
    begin
      // Aqui usamos la letra para lo que queramos
      ShowMessage('Esto es un CD-ROM '+Letra+':\');
    end;
end;

[crievep]

Probado y comprobado, Gracias