vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
TOP-Angebot: 17 bzw. 24 Entwickler-Vollversionen zum unschlagbaren Preis!  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   RSS-Feeds  | Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2023
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

VB.NET - Fortgeschrittene
Meldung beim Schließen der CD-Schublade 
Autor: Dikn
Datum: 22.07.21 09:38

Hallo!
Mit folgender vereinfachten Message-Methode kann ich feststellen, ob ein Laufwerk hinzugefügt bzw. entfernt wurde.
Mein Problem:
Beim Schließen des CD-Laufwerks dauert es lange, bis die Meldung "Ein Datenträger wurde hinzugefügt" erscheint. Ich möchte schon beim Schließen der Schublade einen Hinweis ausgeben.

Public Class Form1
    Private Const WM_DEVICECHANGE As Integer = &H219
    Private Const DBT_DEVICEARRIVAL As Integer = &H8000
    Private Const DBT_DEVICEREMOVECOMPLETE = &H8004
 
    Protected Overloads Overrides Sub WndProc(ByRef msg As Message)
        MyBase.WndProc(msg)
 
        If msg.Msg = WM_DEVICECHANGE Then
            If msg.WParam = CType(DBT_DEVICEARRIVAL, IntPtr) Then
                TextBox1.Text += "Neuen Datenträger gefunden" & vbCrLf
            End If
            If msg.WParam = CType(DBT_DEVICEREMOVECOMPLETE, IntPtr) Then
                TextBox1.Text += "Ein Datenträger wurde entfernt" & vbCrLf
            End If
        End If
    End Sub
End Class
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
Meldung beim Schließen der CD-Schublade514Dikn22.07.21 09:38
Re: Meldung beim Schließen der CD-Schublade302-Franky-22.07.21 11:13
Re: Meldung beim Schließen der CD-Schublade280Dikn25.07.21 08:14
Re: Meldung beim Schließen der CD-Schublade284-Franky-25.07.21 14:26
Re: Meldung beim Schließen der CD-Schublade268Dikn26.07.21 12:55

Sie sind nicht angemeldet!
Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.

Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  GesamtübersichtSuchen 

nach obenzurück
 
   

Copyright ©2000-2023 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel