Tengo dos unidades de CD ROM (D - E), que muestro en un comboBox. Introduzco un CD Audio en una de ellas (supongamos que lo he introducido en E) y la selecciono en el Combo para (pulsando un botón) obtener el UPC ("UNIVERSAL PRUDUCT CODE") del disco. Para ello he creado la siguiente rutina
Código Delphi
[-]
function obtenerUPC : string;
var
buffer : array[0...MAX_PATH] of char;
begin
mciSendString('open cdaudio', nil, 0, 0);
mciSendString('info cdaudio upc', buffer, sizeof(buffer), 0);
result := StrPas(buffer);
end;
La duda que tengo: ¿qué me falta en esa función para indicar que me debe dar el UPC del disco introducido en E y no en D?