Un lugar de encuentro para los programadores de habla hispana

Un lugar de encuentro para los programadores de habla hispana

Buscar

Entrar

Puedes acceder utilizando tu cuenta de usuario del foro.

Si no dispone de cuenta, puede crear una accediendo al formulario de registro del foro.



Cómo saber el ID de un CD-ROM Imprimir
Ideas - Delphi

Los CD disponen de un código, llamado UPC, que permite reconocer de forma única cada título. En el caso de los CD de audio esto puede ser útil para reconocer el disco y obtener de una base datos información como el título, los temas o el intérprete. El código siguiente obtiene el UPC del disco insertado en el lector de CD por defecto.
 
procedure TForm1.FormCreate(Sender: TObject);
var
  cadena: String;
begin
  setlength(cadena, 256);
  mciSendString('open cdaudio', nil, 0,0);
  mciSendString('info cdaudio upc', PChar(cadena), 255, 0);
  showmessage(cadena);
end;
 
 
Hay que tener en cuenta que no todos los CD audio disponen del código UPC, aunque lo habitual es que sí lo tengan.
Comentarios (0)
Para escribir un comentario debes estar registrado