DispatcherTimer & Slider = System.StackOverflowException

  • WPF

Es gibt 9 Antworten in diesem Thema. Der letzte Beitrag () ist von ErfinderDesRades.

    DispatcherTimer & Slider = System.StackOverflowException

    Hallo erst mall
    Habe folgendes Problem

    VB.NET-Quellcode

    1. Imports System.Windows.Threading
    2. Class MainWindow
    4. Declare Sub OPENCOM Lib "PORT" (ByVal A As String)
    5. Declare Sub TXD Lib "PORT" (ByVal Wert As Integer)
    6. Declare Sub RTS Lib "PORT" (ByVal Wert As Integer)
    7. Declare Sub DTR Lib "PORT" (ByVal Wert As Integer)
    8. Declare Sub CLOSECOM Lib "PORT" ()
    9. 'Dim g As Graphics
    10. Dim p As Integer = 0
    11. Dim i As Integer = 0
    12. Private dpTimer As DispatcherTimer
    13. Public Sub Ne()
    14. dpTimer = New DispatcherTimer
    15. 'MsgBox("")
    16. dpTimer.Interval = TimeSpan.FromMilliseconds(500 + CInt(Slider.Value * 100))
    17. AddHandler dpTimer.Tick, AddressOf TickMe
    18. dpTimer.Start()
    19. End Sub
    20. Private Sub TickMe()
    21. Dim openstring As String = "COM1: baud=19200 data=8 parity=N stop=1"
    23. If p = 1 Then
    25. Try
    26. OPENCOM(openstring)
    27. RTS(0)
    28. Catch ex As Exception
    30. End Try
    34. If i = 0 Then
    37. TXD(1)
    38. cantxd.Background = Brushes.Green
    39. DTR(0)
    40. candrt.Background = Brushes.Red
    41. ElseIf i = 1 Then
    42. RTS(1)
    43. canrts.Background = Brushes.Green
    44. TXD(0)
    45. cantxd.Background = Brushes.Red
    46. ElseIf i = 2 Then
    47. DTR(1)
    48. candrt.Background = Brushes.Green
    49. RTS(0)
    50. canrts.Background = Brushes.Red
    51. End If
    52. i += 1
    53. If i = 3 Then
    54. i = 0
    55. End If
    57. Else
    58. dpTimer.Stop()
    59. Exit Sub
    60. End If
    63. End Sub
    64. Private Sub bttport_Click(sender As System.Object, e As System.Windows.RoutedEventArgs) Handles bttport.Click
    65. Try
    66. If p = 0 Then
    67. Dim openstring As String = "COM1: baud=19200 data=8 parity=N stop=1"
    68. Try
    69. OPENCOM(openstring)
    70. canport.Background = Brushes.Green
    71. RTS(0)
    72. Slider.IsEnabled = False
    73. Ne()
    74. p = 1
    75. Catch ex As Exception
    76. MsgBox(ex.Message)
    77. End Try
    78. Else
    79. CLOSECOM()
    80. canport.Background = Brushes.Red
    81. p = 0
    82. TXD(0)
    83. cantxd.Background = Brushes.Red
    84. dpTimer.Stop()
    85. RTS(0)
    86. canrts.Background = Brushes.Red
    88. DTR(0)
    89. candrt.Background = Brushes.Red
    90. Slider.IsEnabled = True
    91. dpTimer = New DispatcherTimer
    92. End If
    93. Catch ex As Exception
    94. End Try
    95. End Sub
    96. End Class



    Das bei den hier geposteten Programm immer dan wen ich den timer anhalte und den slider verschiben will folgende Fehlermeldung kommt

    Eine nicht behandelte Ausnahme des Typs "System.StackOverflowException" ist in mscorlib.dll aufgetreten.

    aber nur solange die MsgBox nicht drin ist

    VB.NET-Quellcode

    1. Public Sub Ne()
    2. dpTimer = New DispatcherTimer
    3. 'MsgBox("")
    4. dpTimer.Interval = TimeSpan.FromMilliseconds(500 + CInt(Slider.Value * 100))
    5. AddHandler dpTimer.Tick, AddressOf TickMe
    6. dpTimer.Start()
    7. End Sub


    hier noch der xaml code

    XML-Quellcode

    1. <Window x:Class="MainWindow"
    2. xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation"
    3. xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml"
    4. Title="MainWindow" Height="174" Width="142">
    5. <Grid Background="#52000000">
    6. <Button Content="Port an/aus" Height="23" HorizontalAlignment="Left" Margin="12,70,0,0" Name="bttport" VerticalAlignment="Top" Width="90" />
    7. <Canvas Background="{x:Null}" Height="23" HorizontalAlignment="Left" Margin="44,41,0,0" Name="canport" VerticalAlignment="Top" Width="26" />
    8. <Canvas Height="23" Margin="12,12,0,0" Name="cantxd" VerticalAlignment="Top" HorizontalAlignment="Left" Width="26" />
    9. <Canvas Margin="44,12,0,0" Name="canrts" Width="26" Height="23" VerticalAlignment="Top" HorizontalAlignment="Left" />
    10. <Canvas Height="23" Margin="76,12,0,0" Name="candrt" Width="26" HorizontalAlignment="Left" VerticalAlignment="Top" />
    11. <Slider Height="23" HorizontalAlignment="Left" Margin="8,100,0,0" Name="Slider" VerticalAlignment="Top" Width="100" SelectionEnd="5" />
    12. </Grid>
    13. </Window>

    Ich weiß jetzt nicht, was den Fehler veruracht, aber Du kanns ja mal den Fehler provozieren und dann in der Aufrufliste (Google "Visual Studio Aufrufliste anzeigen") nachschauen, was aufgerufen wurde (von unten nach oben).
    Weiters frage ich mich, warum Du nicht die System.IO.Ports.SerialPort-Klasse verwendest, sondern diese komischen importierten Methoden.
    "Luckily luh... luckily it wasn't poi-"
    -- Brady in Wonderland, 23. Februar 2015, 1:56
    Desktop Pinner | ApplicationSettings | OnUtils

    Du kanns ja mal den Fehler provozieren und dann in der Aufrufliste (Google "Visual Studio Aufrufliste anzeigen") nachschauen
    ka was du meinst? bin noch relative unerfahren

    und zu den tehma warum ich die dll verwende

    was ich hier mache ist ausbildungs inhalt und auf windows Froms bezogen ich muss mir das selber auf WPF umstellen da mein ausbilder selber noch nie mit WPF gearbeitet hatt

    Blackcat schrieb:

    ausbildungs inhalt und auf windows Froms bezogen ich muss mir das selber auf WPF umstellen da mein ausbilder selber noch nie mit WPF gearbeitet hatt
    Kannste vergessen.
    Wpf basiert auf einer ganz anneren Denkweise als WinForms, und daher kommt nur Crap dabei raus, wenn man "WinForms umstellen auf Wpf" versucht.

    Ich würde dir von Wpf erstmal ganz abraten, lern stattdessen Winforms richtig, das könnte deinem Ausbildungs-Abschluß nützen.

    Wpf würde ich dir allenfalls als Freizeit-Vergnügen empfehlen, welches nix mitte Ausbildung zu tun hat.
    Weil so grundlegend neue Dinge lernt man besser ohne jeden Druck dahinter: MVVM–Pattern (Josh Smiths Artikel)

    Und guck auch mal in' Wpf-Tutorial-Bereich.

    nur Crap kommt dabei gans sicher nicht raus (ich über nehms ja net 1 zu 1 ich beu mir nur das WPF so das es das gleiche macht wie das Windows Forms)
    und ich brauche das da ich im ramen meiner ausbildung ein Praktikum absolwiere ( aller 6 monate 1 ) in den ich mit WPF arbeiten muss

    da ich eine überbetriebliche ausbildung absolviere steht kein druck dahinter

    naja, ich würde schon eine wpf-Anwendung, die nicht nachm MVVM-Pattern aufgebaut ist, als Crap bezeichnen.
    Wird mir sicher auch widersprochen, aber ich glaub, das ist doch weitgehender Konsenz unter Leuten, die sich damit auskennen. Jdfs. auf myCSharp im Wpf-Bereich tut auch keiner was ohne MVVM, und auf CodeProject kannste ja mal die Artikel durchgucken, ob und wieviele unter den hoch-gerateten wpf-Artikeln an MVVM vorbei-gecodet sind.

    gut das MVVM-Pattern kenn bzw kannte ich noch nicht

    aber das würde sich auch nicht endern wen ich windows forms kennen würde ^^

    dem entsprechend schon mall danke an den hinweis mit den MVVM (habe es erst mall kurtz überflogen)

    das mit den crap naja sind zwar ohne MVVM keine schönen programme aber trotsdem fubnktions tüchtig deshalb auch kein crap

    aber davon mall zurück zu mein Problemm bzw zu meiner frage

    mich interesiert nur wiso das Programm mit der msgbox funktioniert und ohne nicht obwohl die so rein garnix macht.

    wollte es nur wissen da ja irgend was falsch sein muss und ich nicht drauf komme

    PS. werden versuchen mich in MVVM rein zu lessen und danach meine nächste programme zu erstellen

    deinen Code könnemer hier glaub nicht debuggen. DA sind zu viele hier unbekannte Rahmenbedingungen drin.
    Ausserdem die ganzen TryCatchens - da bekommt man ja garkeine Fehlermeldung, wenn eine Exception auftritt.
    ZB habich keine Ahnung, in welcher Zeile der Fehler ühaupt auftritt - weißt du's?

    Wen ich das wüste ^^
    das ding ist ja er trit immer nur dan auf wen ich den slider zum 2. mall verschibe (beim verschieben giebts keineanweisung)
    also müste der fehler ja im steuerelement ligen (was ich wiederum bezweifel)

    so amrande wen du msgbox(ex.message) nach cathe eingiebst bekommste fehlermeldungen

Facebook
Telefonspende