USBメモリの取り外しについて (ID:42263)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文

解決済みということですが、http://www42.tok2.com/home/okapony/ 
ここの中の人なので、登場してみました（が、ステハンｗ）。
なお、64bit環境は保持していないので、動作確認はできません。

> del弟子 2012/05/22(火) 11:31:34 <初心者>  書込者ID：[ #!( ]
> ただ、XPでは動作したのですが、Win7では一覧にUSBのドライブが表示されず、
SetupApiSample.lzhのサンプルで、「USBデバイス取得クラスのテスト」ボタンにより
ドライブが表示されないということだと思うので、Win7x64では、デバイスのクラス名が
違うのかもしれません。

サンプルでは固定値（'USB' or 'CDROM' or 'Volume')にしているので、大文字小文字の違いでも
表示されなくなりますね。
サンプルのフォームで、TForm1.OnSelectDevice で 引数の aCanSelect を
無条件 True にすると、全てのデバイスが列挙されるようになります。
ここで左側のツリーに表示されるようになったのであれば、デバイスのクラス名が
Win7x64で、変更になっているからだと思われます。
'USB2.0'とかになっているのかもしれません。
解説ページを作るモチベーションもないので、あくまでサンプルということでご理解お願いします。

> DEKO 2012/05/21(月) 14:35:28 書込者ID：[ "!$#" ]
> http://stackoverflow.com/questions/434688/how-can-i-remove-a-usb-flash-disk-programmatically-using-delphi
ここのコードを見てみましたが、これはCD/DVDトレイの開閉でよく見たソースです。
これでUSBデバイスのとりはずしが可能なのは初めて知りました。
エクスプローラーの表示が変わらないのが、リフレッシュ（F5）で改善されるのであれば
「WM_COMMAND 41504」（または$A220）で検索すれば、見つかります。

# 最後になりますが、cgiのリンク切れすいません（こんなとこで謝る）。
# 移転してcgiのパーミッションとかの設定も変わったり、なにかとめんどくさ・・・
# いえ、cgiを使わないように、気がついたところから修正しました。
# 直リンOKです。好きにしてください。

←解決時は質問者本人がここをチェックしてください。

戻る