Número de cd?

[[Lepe]]

DarkByte, no te he corregido, ya que tu código no tiene errores, solo he "completado la información", puesto que me gustó tu código

ShakeRock, el código si funciona para CD de datos, de hecho, no lo probé con CD de Audio, sino con CD de datos, que era en lo que yo estaba interesado. Tampoco he metido 200 Cds para ver si se repite el nº del cd ..... he probado con 2 cds y al menos, el número que me da es distinto.

Si te da algun error, dinos que estas haciendo.

Saludos

[DarkByte]

Lepe... no estoy molesto.... no te preocupes, si lo dices por eso, todo lo contrario.

[[Lepe]]

Empezado por DarkByte

Lepe... no estoy molesto.... no te preocupes, si lo dices por eso, todo lo contrario.

mmmm, Creo que tendré que leer un poco mas de Literatura, a ver si agrando mi vocabulario, porque algunas veces uso palabras que pueden parecer "antipáticas" cuando mi intención es comentar algo. ¿Algun buen libro que me recomienden?

Saludos

[[seoane]]

Este codigo deberia de funcionar para obtener el numero de serie, solo lo probe con cds de datos, pero creo que es lo que buscabas.

var
  Serial: DWORD;
  Dummy: Cardinal;
begin
  // La letra de la unidad de CDs supongo que es la D
  if GetVolumeInformation( 'D:\',nil,0,@Serial,Dummy, Dummy,nil,0) then
    begin
       // Aqui haz lo que quieres con el numero de serie
    end;
end;

[ShakeRock]

Empezado por Lepe

ShakeRock, el código si funciona para CD de datos, de hecho, no lo probé con CD de Audio, sino con CD de datos, que era en lo que yo estaba interesado. Tampoco he metido 200 Cds para ver si se repite el nº del cd ..... he probado con 2 cds y al menos, el número que me da es distinto.

Si te da algun error, dinos que estas haciendo.

Saludos

Hola a todos!!!; Lepe funcionar, funciona, solo que no hace lo que yo quiero .
Pasa que lo he probado en un cd virgen y no funciona (cuando tuviese que funcionar), ya que, supuestamente el número de cd está grabado desde fábrica (o tuviese que ser así). Y al intentar leerlo no lee nada.

Agradesco cualquier comentario sobre el tema, como si estoy bien orientado en el tema, o si existe algún error en lo que digo.

Gracias a todos por su ayuda, pero sigo sin solución

ShakeRock