| |
VB.NET - Ein- und UmsteigerRe: Fehlermeldung bei Klick auf MediaPlayer-VideoAusgabefläche | | | Autor: Dikn | Datum: 28.07.14 08:56 |
| am Code kann es eigentlich nicht liegen...
Der MediaPlayer liegt auf dem Panel [panVBack]. Beim MausKlick auf das Panel wird eine Funktion aufgerufen, die je nach MausKlick (rechts/links) zum nächsten/vorigen Bild bzw. Video wechselt. Das funktioniert einwandfrei...
Private Sub MeMouseClick (sender As Object, e As System.Windows.Forms.MouseEventArgs) _
Handles Me.MouseClick, panBack.MouseClick, pbPicture.MouseClick, _
panVBack.MouseClick, panVCmd.MouseClick, labEnde.MouseClick, labInfoText.MouseClick
--------------------------------------------------------------------------------------------------
Select Case e.Button
Case Windows.Forms.MouseButtons.Left: Call PS_FilesSelect("Down")' [linke] zum nächsten Eintrag
Case Windows.Forms.MouseButtons.Middle: Call Menu_show() ' [mittlere] -> Menu
Case Windows.Forms.MouseButtons.Right: Call PS_FilesSelect("Up") ' [rechte] zum vorigen Eintrag
End Select
Beim MausKlick auf den MediaPlayer:
Private Sub Player_MouseUpEvent(sender As Object, e As AxWMPLib._WMPOCXEvents_MouseDownEvent) _
Handles Player.MouseDownEvent
--------------------------------------------------------------------------------------------------
Select Case e.nButton
Case 1: Call PS_FilesSelect("Down")
Case 4: Call Menu_show()
Case 2: Call PS_FilesSelect("Up")
End Select
Die Fehlermeldung erscheint nicht immer, manchmal erst nach dem 3... 4... Klick
woran kann's liegen??? | |
Fehlermeldung bei Klick auf MediaPlayer-VideoAusgabefläche | | | Autor: Dikn | Datum: 26.07.14 12:28 |
| Hallo,
ich habe ein Programm mit vb 2010 Express zur Anzeige von Bildern und Videos erstellt (Bild-/Videoschau). Je nach Voreinstellung wird nur das Video oder selbsterstellte Buttons 'Play', 'Pause' oder 'Stop' angezeigt (WindowsMediaPlayer uiMode = none).
Der MediaPlayer liegt auf einem Panel. Beim MausKlick auf das Panel wird eine Funktion aufgerufen, die je nach MausKlick (rechts/links) zum nächsten/vorigen Bild bzw. Video wechselt. Das funktioniert einwandfrei...
aber bei MausKlick (MouseDownEvent oder MouseUpEvent) auf die VideoAusgabefläche erscheint nach Aufruf der gleichen Funktion folgende Meldung:
"AccessViolationException wurde nicht behandelt. Es wurde versucht im geschützten Speicher zu lesen oder zu schreiben. Dies ist häufig ein Hinweis darauf, dass anderer Speicher beschädigt ist."
Wo liegt der Fehler ??? | |
Re: Fehlermeldung bei Klick auf MediaPlayer-VideoAusgabefläche | | | Autor: Dikn | Datum: 30.07.14 09:03 |
| Hallo DaveS,
vielen Dank für Deine Hinweise!
Ich war mir eigentlich sicher, dass mein Sub [PS_FilesSelect("Down")] funktioniert. Bei Klick auf das Panel ist das auch so.
In [PS_FilesSelect(...)] wird das nächste Bild/Video aus einem ListView dem MP zugewiesen und dann die Ausgabefläche neu eingerichtet. Nach einigen Versuchen habe ich festgestellt, dass wenn Klick auf MP erst die Ausgabefläche eingerichtet und erst dann die Datei dem MP zugewiesen werden muss.
Ich werde in den nächsten Tagen weiter testen.
Nochmals vielen Dank!
| |
Re: Fehlermeldung bei Klick auf MediaPlayer-VideoAusgabefläche | | | Autor: Dikn | Datum: 19.09.14 12:33 |
| Ich hab's jetzt so gelöst:
Variable:
Dim MEA As MouseEventArgs = Nothing
Private Sub Player_MouseDownEvent(...) Handles Player.MouseDownEvent
Dim MEA_L As New MouseEventArgs(Windows.Forms.MouseButtons.Left, 0, 0, 0, 0)
Dim MEA_M As New MouseEventArgs(Windows.Forms.MouseButtons.Middle, 0, 0, 0, 0)
Dim MEA_R As New MouseEventArgs(Windows.Forms.MouseButtons.Right, 0, 0, 0, 0)
Select Case e.nButton
Case 1: MEA = MEA_L
Case 2: MEA = MEA_R
Case 4: MEA = MEA_M
End Select
TimerVClick.Enabled = True
End Sub
Private Sub TimerVClick_Tick (...) Handles TimerVClick.Tick
TimerVClick.Enabled = False ' Timer deaktivieren
MeMouseClick(panVBack, MEA) ' -> Klick auf [panVBack] mit
' Maustaste L, M, R simulieren
End Sub | |
| 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 |
|
|
vb@rchiv CD Vol.6 vb@rchiv Vol.6
Geballtes Wissen aus mehr als 8 Jahren vb@rchiv!
Online-Update-Funktion Entwickler-Vollversionen u.v.m.Jetzt zugreifen Tipp des Monats Neu! sevCoolbar 3.0
Professionelle Toolbars im modernen Design!
Mit sevCoolbar erstellen Sie in wenigen Minuten ansprechende und moderne Toolbars und passen diese optimal an das Layout Ihrer Anwendung an (inkl. große Symbolbibliothek) - für VB und MS-Access Weitere Infos
|
|
|
Copyright ©2000-2024 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
|
|