在使用DriveComboBox控件时，怎样判断光驱或软驱中没有放碟或盘?

Question

你看看SELECTED[INDEX]的属性啊，注意INDEX是从0开始记数啊~~~~！！！

Answer 1

to huier22:
我没有发现SELECTED[INDEX]属性

Answer 2

type
  TForm1 = Class(TForm)
  private
    procedure WMDeviceChange(var msg:TMessage); message WM_DEVECECHANGE;
...procedure Tform1.WMDEVICECHANGE(var msg :Tmessage);
begin
  inherited;
  case msg.WParam of
    $8000:Caption :='盘插入了';
    $8004:Caption :='盘取出了';
  end;
end;

Answer 3

Klion(览云)　
我看以上代码眼熟得很

Answer 4

to li_zhifu:
不过我试了一下，好像有点不行，还请多多指教。

Answer 5

运行时，好像不能拦截消息WM_DEVICECHANGE，请问那里还要设置吗？（TO　LI＿ZHIFU）