多光驱的缩进/弹出控制

Question

我知道可以用mciSendString('Set cdaudio door open wait', nil, 0, handle);和mciSendString('Set cdaudio door closed wait', nil, 0, handle);控制光驱的缩进/弹出，但是只能控制第一个光驱，我现在机器上安装了两个光驱，第二个光驱如何控制缩进/弹出？

Answer 1

老兄你多加点分啊,来之不易,当初我找了半个月才找到.
  //M：是光驱所在的盘符
  mciSendString('open M: type CDAudio alias finch wait', nil, 0, Self.Handle);
  //打开光驱
  mciSendString('set finch door open wait',  nil, 0, Self.Handle);
  //关闭光驱
  //  mciSendString('set finch door closed wait', nil, 0, Self.Handle);
  mciSendString('Close finch', nil, 0, Self.Handle);

Answer 2

如果可以你可以吧这个提交成FAQ