Entwickler-Ecke
Windows API - CD Wechsel erkennen
look2k - Fr 20.12.02 05:56
Titel: CD Wechsel erkennen
hi @all
ich möchte ein programm schreiben das auf den wechsel einer cd wartet und danach den cd root auf spezielle dateien durchsucht.
ich habe schon überall nach möglichkeiten gesucht, aber leider nichts gefunden.
da ich nicht mit nem timner ständig den cd inhalt lesen will um zu erfahren ob eine neue cd eingelegt wurde, da es ja auch extrem resourcen fressen währe müsste es theoretisch möglich sein per Massage Handle die nachricht über das öffnen/schließen der cd-rom schublade zu erhalten.
denn wenn man autorun eingeschalten hat erkennt windows ja auch das eine neue cd eingelegt wurde und versucht wenn vorhanden die autorun angaben auszuführen.
ich danke im vorraus für eure infos.
cu look2k
look2k - Fr 20.12.02 06:43
hi @all
hat sich erledigt hab es nun gefunden und etwas angepasst da es mir etwas zu viel code war.
hier der modifiezierte code:
Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
| private
procedure WMDeviceChange(var Msg: TMessage);
message WM_DEVICECHANGE;
{ Private-Deklarationen }
public
{ Public-Deklarationen }
end;
.....
.....
procedure TForm1.WMDeviceChange(var Msg: TMessage);
const
DBT_DEVICEARRIVAL = $8000;
DBT_DEVICEREMOVECOMPLETE = $8004;
var
Str : String;
begin
inherited;
case Msg.wParam of
DBT_DEVICEARRIVAL: Str := 'Cd wurde eingelgt!!!';
DBT_DEVICEREMOVECOMPLETE : Str := 'Cd wurde entfernt!';
end;
ShowMessage(Str);
end; |
Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2026 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!