Grabar CD desde Delphi

[yordan]

si tengo instalado otro lector de cd, aunque el componente funciona (parcialmente), tengo en mi form un TComboBox (cbDrives) que me muestra el grabador activo y efectivamente me muestra mi quemador, el código es el siguiente:


procedure TForm1.FormCreate(Sender: TObject);
var
i:integer;
begin
cbDrives.items.Clear ;
for i := 0 to XPB.DataRecorders.Count-1 do
cbDrives.items.AddObject(XPB.DataRecorders.items[i].DisplayName,XPB.DataRecorders.items[i]) ;
cbDrives.ItemIndex := 0 ;
end;

gracias por la ayuda
sigo intentandolo