Hi,
ich habe ein kleines Problem(chen)
Und zwar: Ich habe ein Event auf meiner Form erstellt, welches ich aus einem BGW aufrufe.
In der dem Event zugeordneten Sub starte ich eine andere Form mit einem WMP. Dann bekomme ich folge Fehlermeldung.
Spoiler anzeigen
Code
Ich würde mich über eine Rückmeldung freuen,
mbfan
ich habe ein kleines Problem(chen)
Und zwar: Ich habe ein Event auf meiner Form erstellt, welches ich aus einem BGW aufrufe.
In der dem Event zugeordneten Sub starte ich eine andere Form mit einem WMP. Dann bekomme ich folge Fehlermeldung.
System.InvalidOperationException wurde nicht von Benutzercode behandelt.
Message=Fehler beim Erstellen des Formulars. Weitere Informationen finden Sie in Exception.InnerException. Fehler: Das ActiveX-Steuerelement 6bf52a52-394a-11d3-b153-00c04f79faa6 kann nicht instanziiert werden, da der aktuelle Thread kein Singlethread-Apartment ist..
Source=FPH lcarsRadio
StackTrace:
bei FPH_lcarsRadio.My.MyProject.MyForms.Create__Instance__[T](T Instance) in 17d14f5c-a337-4978-8281-53493378c1071.vb:Zeile 190.
bei FPH_lcarsRadio.My.MyProject.MyForms.get_Form1()
bei FPH_lcarsRadio.Login.Hauptform(Boolean ohneuser, String benutzername) in D:\Dropbox\eigene Programme\lcarsRadio\FPH lcarsRadio\Login.vb:Zeile 95.
bei FPH_lcarsRadio.Login.bgw_login_DoWork(Object sender, DoWorkEventArgs e) in D:\Dropbox\eigene Programme\lcarsRadio\FPH lcarsRadio\Login.vb:Zeile 71.
bei System.ComponentModel.BackgroundWorker.OnDoWork(DoWorkEventArgs e)
bei System.ComponentModel.BackgroundWorker.WorkerThreadStart(Object argument)
InnerException: System.Threading.ThreadStateException
Message=Das ActiveX-Steuerelement 6bf52a52-394a-11d3-b153-00c04f79faa6 kann nicht instanziiert werden, da der aktuelle Thread kein Singlethread-Apartment ist.
Source=System.Windows.Forms
StackTrace:
bei System.Windows.Forms.AxHost..ctor(String clsid, Int32 flags)
bei System.Windows.Forms.AxHost..ctor(String clsid)
bei AxWMPLib.AxWindowsMediaPlayer..ctor()
bei FPH_lcarsRadio.Form1.InitializeComponent() in D:\Dropbox\eigene Programme\lcarsRadio\FPH lcarsRadio\Form1.Designer.vb:Zeile 50.
bei FPH_lcarsRadio.Form1..ctor() in D:\Dropbox\eigene Programme\lcarsRadio\FPH lcarsRadio\Form1.vb:Zeile 10.
InnerException:
Aufrufcode
Formstartcode bei Form1:
VB.NET-Quellcode
- Event Start(ByVal ohneuser As Boolean, ByVal benutzername As String)
- Private Sub bgw_login_DoWork(sender As System.Object, e As System.ComponentModel.DoWorkEventArgs) Handles bgw_login.DoWork
- '[...]
- RaiseEvent Start(False, benutzer)
- End Sub
- Sub Hauptform(ByVal ohneuser As Boolean, ByVal benutzername As String) Handles Me.Start
- Form1.Show() 'hier tritt der Fehler auf
- Form1.init(ohneuser, benutzername)
- Me.Close()
- End Sub
VB.NET-Quellcode
- Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
- CheckForIllegalCrossThreadCalls = False
- tb_lautstärke.Value = AxWindowsMediaPlayer1.settings.volume()
- If My.Computer.FileSystem.FileExists(datei) = False Then
- If My.Computer.FileSystem.DirectoryExists(IO.Path.Combine(Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData), "lcarsRadio\")) Then
- My.Computer.FileSystem.WriteAllBytes(datei, My.Resources.Radio, False)
- Else
- My.Computer.FileSystem.CreateDirectory(IO.Path.Combine(Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData), "lcarsRadio\"))
- My.Computer.FileSystem.WriteAllBytes(datei, My.Resources.Radio, False)
- End If
- Elbow2.Text = "Standardradios geladen - Startsequenz abgeschlossen - Willkommen beim lcarsRadio"
- End If
- lvladen(datei, lokal)
- ListView1.ForeColor = Color.White
- ListView1.BackColor = Color.Black
- For Each item As ListViewItem In ListView1.Items
- item.ForeColor = Color.White
- item.BackColor = Color.Black
- Next
- End Sub
Ich würde mich über eine Rückmeldung freuen,
mbfan