tags:

views:

107

answers:

3
+2  Q: 

How to Detect when a CD / DVD / USB Inserted or Removed and Get Drive Letter ?

I want to detect when a Disk ( CD / DVD ) or an USB inserted or removed.

I know that I should work with WM_DEVICECHANGE message , but my problem is getting the Volume ( Letter ) of the Drive , I tried to Get it by WMI Query and Win32_VolumeChangeEvent too but I could not!

there is an Example and work fine , how can I do this by Delphi?

A: 

I haven't compiled and tested now, but a while ago I remember using this code to implement something similar. Hope it helps.

Erkan Haspulat  2010-09-03 11:15:04
thanks , but my problem is getting the Drive letter , when an USB Inserted , first windows send an WM_DEVICECHANGE message to top-level Windows , but after sending message , windows make a new Drive for USB inserted and give it a name ( Volume ) , i want to get the new Volume ( letter ) created for the USB Drive , for example : " J:\ " ...
Mahmood_N  2010-09-03 11:24:10
+1  A: 

Detecting Media Insertion or Removal (MSDN)
Detecting Hardware Insertion and/or Removal (codeproject.com)

// EDIT:

...get notified when a CD is removed or inserted? (Torry's Delphi Page)

and also

http://www.google.com/search?q=Delphi+WMDeviceChange

adf88  2010-09-03 11:33:57
Nice, but not in delphi. However that should be enough to figure it out. Also interesting topic.
Bart  2010-09-03 11:42:32
Yes, it's not Delphi. But it is not a C#! C++ and Objective Pascal are very close languages, translation will involve mainly some syntax correction and fit into Delphi's VCL framework.
adf88  2010-09-03 12:12:03
@Bart: The Windows API looks the same in every programming language. If one knows a language (e.g. Delphi), one knows how to use external APIs in that language (Delphi).
Andreas Rejbrand  2010-09-03 12:12:04
I found some Delphi code.
adf88  2010-09-03 12:19:08
@Andreas: I had this in my mind when I wrote that this should be enough. Also +1 to author now.
Bart  2010-09-03 12:34:45
A: 

For CD insertions, you want CDEvents: http://www.torry.net/vcl/filedrv/cd/dtcdevents.zip

Works beautifully. E-mail me ([email protected]) if you want sample code.

Erik Knowles  2010-09-03 16:58:09

related questions

How do you implement Levenshtein distance in Delphi?
Reintroducing functions in Delphi
Does Delphi call inherited on overridden procedures if there is no explicit call
HelpInsight documentation in Delphi 2007
Is it possible to deploy a native Delphi application with ClickOnce
In Delphi 7, why can I assign a value to a const?
Best way to sort an array in delphi
What's the best Delphi book for a newbie?
Visual Studio equivalent to Delphi bookmarks
What's the idiomatic way to do async socket programming in Delphi?
64bit Memory allocation
Documenting Delphi
How to implement Type-safe COM enumerations in Delphi ?
TClientDataSet Aggregates specification aren't added automatically when creating an Aggregate field.
Multiple form Delphi applications and dialogs
Unit testing in Delphi - how are you doing it ?
How to keep track of the references to an object?
Delphi and COM: TLB and maintenance issues
Changing CURRENT save/default directory in Delphi 2007 without using Save-As
What is the best way to make a Delphi Application completely full screen ?
Are there any "mind mapping" components for Delphi? (native VCL preferably)
Delphi resources for existing .NET developer.
What is needed to get Delphi back on top?
Delphi MDI Application and the titlebar of the MDI Children
Can a windows dll retrieve its own filename?