掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
CD-ROMドライブの開閉イベント取得するには? (ID:12425)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
CD-ROM開閉イベントで色々と調べていたのですが、WM_DEVICECHANGEで取得 しようとしてもMsg.WParamを捕まえる事が出来ませんでした。 最初の1、2回うまく行えたのですが、実行出来ない時もあります。 ネットにて色々と調べましたが、関連記事が古い物でしたので Win2k 等 に対応していない可能性があると思い書き込ませて頂きました。 初投稿ですがどうか宜しくお願い致します。 当方の環境は「Delphi6 Pro UpdatePack2 (他RTL等)」と「Win2k SP4」です。 pravate procedure WMDeviceChange(var Msg: TMessage); message WM_DEVICECHANGE; procedure TForm1.WMDeviceChange(var Msg: TMessage); message WM_DEVICECHANGE; const DBT_DEVICEARRIVAL = $8000; DBT_DEVICEREMOVECOMPLETE = $8004; var Str: string; begin inherited; case Msg.WParam of DBT_DEVICEARRIVAL : Str := 'CD Inseart'; DBT_DEVICEREMOVECOMPLETE: Str := 'CD None'; end; ShowMessage(Str); end;
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.