Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Win32/Win64 API (native code) (https://www.delphipraxis.net/17-win32-win64-api-native-code/)
-   -   Delphi Auswurf der CD erkennen für Autostartmenü (https://www.delphipraxis.net/73379-auswurf-der-cd-erkennen-fuer-autostartmenue.html)

snowwolf3000 17. Jul 2006 12:17


Auswurf der CD erkennen für Autostartmenü
 
Hallo,

hab ein kleines Autostartmenü programmiert. Funktioniert soweit auch ohne Probleme. Entferne ich allerdings die CD ohne das Autostartmenü zu beenden so bekomm ich eine Fehlermeldung: "Es befindet sich kein Datenträger im Laufwerk. Legen Sie..." Leider kann man diesen Dialog auch nicht wegklicken, weil er dann einfach immer wieder geöffnet wird.

Ich würde also gerne abfagen, ob die CD entfernt wurde und dann das Programm beenden. Hat irgend jemand nen Vorschlag?

Gruß
Snowwolf

himitsu 17. Jul 2006 12:54

Re: Auswurf der CD erkennen für Autostartmenü
 
Per FindFirst das verzeichnis abfragen bringt ja nichts, weil er dann ja och nach der CD fragt.

Aber du könntest es ja mal per GetDiskFreeSpace versuchen (eventuell fragt er da nicht nach) ... die ersten 2 Werte sollten größer 0 sein, wenn was drin ist.

oder mal per CreateFile('\\.\X:\', ... dürft wohl gehen ... und ich hoffe mal, daß es keine Adminrechte bei CD's braucht (bin mir da zwar relativ sicher, aber eben nicht ganz ... denn bei Festplatten benötigt man auf jeden Fall AdminRechte)


Alle Zeitangaben in WEZ +1. Es ist jetzt 23:45 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz