ImageAnimator InvalidOperationException

  • VB.NET

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

    ImageAnimator InvalidOperationException

    Tag,

    ich muss im Moment animierte Gifs darstellen bzw abspielen. Der ImageAnimator schien gut dafür, da ich ein Event schmeißen muss wenn der letzte Frame dargestellt wird und die Gifs beliebig oft abspielen möchte nicht nur looping. Ich hab mir schön ein Usercontrol dafür gemacht und auf die Form platziert, wenn ich aber jetzt die Größe der Form oder die Location oder irgendwas ändere wird mir eine InvalidOperationException geschmissen weils in einem anderen Thread läuft was ich nicht so ganz verstehe. Mit Invoke passiert garnichts oder es friert die Form weg. Ausserdem gibt GDI+ auch manchmal den Geist auf selbe Exception, nur mit dem Unterschied das diesmal das Image von einem anderen Thread gebraucht wird.
    Ich hoffe hier kann mir jemand sagen warum die Exceptions auftreten und wie ichs beheben kann.

    Grüße

    Das ist das AnimationControl
    Spoiler anzeigen

    VB.NET-Quellcode

    1. Public Class AnimControl
    2. Inherits Control
    3. Private animimg As Image = Nothing
    4. Public Event LastFrameDisplayed As EventHandler
    5. Public Event FirstFrameDisplayed As EventHandler
    6. Public Property Image As Image
    7. Get
    8. Return animimg
    9. End Get
    10. Set(value As Image)
    11. animimg = value
    12. If animimg IsNot Nothing Then
    13. Dim fd As New FrameDimension(Me.Image.FrameDimensionsList(0))
    14. frCount = Me.Image.GetFrameCount(fd) - 1
    15. Try
    16. If Me.Image.Size.Width <> 0 AndAlso Me.Image.Size.Height <> 0 Then
    17. Me.Invoke(Sub() Me.Size = Size.Add(Me.Image.Size, New Size(10, 10)))
    18. End If
    19. Catch : End Try
    20. End If
    21. Me.Invalidate()
    22. End Set
    23. End Property
    25. Public ReadOnly Property FrameCount As Integer
    26. Get
    27. Return frCount
    28. End Get
    29. End Property
    31. Private frCount As Integer = 0
    32. Private nTime As Integer
    33. Private CurrentFrame As Integer = 1
    34. Private IsPlaying As Boolean = False
    36. Protected Overrides Sub OnPaint(e As System.Windows.Forms.PaintEventArgs)
    37. e.Graphics.FillRectangle(Brushes.Fuchsia, Me.ClientRectangle)
    38. If Me.Image IsNot Nothing Then
    39. e.Graphics.DrawImage(Me.Image, 0, 0)
    40. If FrameCount = 0 Then
    41. RaiseEvent LastFrameDisplayed(Me, EventArgs.Empty)
    42. End If
    43. End If
    44. MyBase.OnPaint(e)
    45. End Sub
    47. Public Sub Play(ByVal _nTimes As Integer)
    48. If Me.Image IsNot Nothing Then
    49. nTime = _nTimes
    50. ImageAnimator.Animate(Me.Image, AddressOf OnFrameChange)
    51. End If
    52. End Sub
    54. Private Sub OnFrameChange(ByVal sender As Object, ByVal e As EventArgs)
    55. If CurrentFrame = 1 Then
    56. RaiseEvent FirstFrameDisplayed(Nothing, EventArgs.Empty)
    57. End If
    59. If FrameCount * nTime = CurrentFrame Then
    60. ImageAnimator.UpdateFrames()
    61. Try
    62. If Me.Image.Size.Width <> 0 AndAlso Me.Image.Size.Height <> 0 Then
    63. Me.Invoke(Sub() Me.Size = Size.Add(Me.Image.Size, New Size(10, 10)))
    64. End If
    65. Catch : End Try
    66. Me.Invalidate()
    67. CurrentFrame = 1
    68. ImageAnimator.StopAnimate(Me.Image, AddressOf OnFrameChange)
    69. RaiseEvent LastFrameDisplayed(Me, New EventArgs)
    70. Else
    71. ImageAnimator.UpdateFrames()
    72. Try
    73. If Me.Image.Size.Width <> 0 AndAlso Me.Image.Size.Height <> 0 Then
    74. Me.Invoke(Sub() Me.Size = Size.Add(Me.Image.Size, New Size(10, 10)))
    75. End If
    76. Catch : End Try
    77. Me.Invalidate()
    78. CurrentFrame += 1
    79. End If
    80. End Sub
    82. Public Sub New()
    83. InitializeComponent()
    84. Me.DoubleBuffered = True
    85. End Sub
    86. End Class

    Zu 1.
    Das bringt mir nicht viel ich brauch sowieso nur die Image Property, da wäre erben von Picturebox unsinnig.

    Zu 2.
    Wird gemacht

    Und zu 3.
    Das ist auch eine Notlösung die nicht bleiben soll. Mir wird halt immer die Exception geschmissen und ich versteh nicht wieso

    Gonger96 schrieb:

    und ich versteh nicht wieso

    Das wirst du auch nie, wenn du sie immer "wegfängst".

    ---
    Laut MSDN funktioniert das so:
    Spoiler anzeigen

    VB.NET-Quellcode

    1. Imports System
    2. Imports System.Drawing
    3. Imports System.Windows.Forms
    5. Public Class animateImage
    6. Inherits Form
    8. 'Create a Bitmpap Object.
    9. Private animatedImage As New Bitmap("SampleAnimation.gif")
    10. Private currentlyAnimating As Boolean = False
    12. 'This method begins the animation.
    13. Public Sub AnimateImage()
    14. If Not currentlyAnimating Then
    16. 'Begin the animation only once.
    17. ImageAnimator.Animate(animatedImage, _
    18. New EventHandler(AddressOf Me.OnFrameChanged))
    19. currentlyAnimating = True
    20. End If
    21. End Sub
    23. Private Sub OnFrameChanged(ByVal o As Object, ByVal e As EventArgs)
    25. 'Force a call to the Paint event handler.
    26. Me.Invalidate()
    27. End Sub
    29. Protected Overrides Sub OnPaint(ByVal e As PaintEventArgs)
    31. 'Begin the animation.
    32. AnimateImage()
    34. 'Get the next frame ready for rendering.
    35. ImageAnimator.UpdateFrames()
    37. 'Draw the next frame in the animation.
    38. e.Graphics.DrawImage(Me.animatedImage, New Point(0, 0))
    39. End Sub
    41. Public Shared Sub Main()
    42. Application.Run(New AnimateImage)
    43. End Sub
    44. End Class


    Da musst du jetzt ein paar Zeilen umschreiben und dann hast du schon dein "Custom-Control".

    btw: Die PictureBox kann auch GIF's anzeigen.

    Edit:
    Wenn sich die Klasse mal im Reflektor anschaut, sieht man wo das Threading herkommt:
    Spoiler anzeigen

    Quellcode

    1. // <devdoc>
    2. /// Worker thread procedure which implements the main animation loop.
    3. /// NOTE: This is the ONLY code the worker thread executes, keeping it in one method helps better understand
    4. /// any synchronization issues.
    5. /// WARNING: Also, this is the only place where ImageInfo objects (not the contained image object) are modified,
    6. /// so no access synchronization is required to modify them.
    7. /// </devdoc>
    8. [SuppressMessage("Microsoft.Performance", "CA1804:RemoveUnusedLocals")]
    9. static void AnimateImages50ms() {
    10. Debug.Assert(imageInfoList != null, "Null images list");
    12. while( true ) {
    13. // Acquire reader-lock to access imageInfoList, elemens in the list can be modified w/o needing a writer-lock.
    14. // Observe that we don't need to check if the thread is waiting or a writer lock here since the thread this
    15. // method runs in never acquires a writer lock.
    16. rwImgListLock.AcquireReaderLock(Timeout.Infinite);
    17. try {
    18. for (int i=0;i < imageInfoList.Count; i++) {
    19. ImageInfo imageInfo = imageInfoList[i];
    21. // Frame delay is measured in 1/100ths of a second. This thread
    22. // sleeps for 50 ms = 5/100ths of a second between frame updates,
    23. // so we increase the frame delay count 5/100ths of a second
    24. // at a time.
    25. //
    26. imageInfo.FrameTimer += 5;
    27. if (imageInfo.FrameTimer >= imageInfo.FrameDelay(imageInfo.Frame)) {
    28. imageInfo.FrameTimer = 0;
    30. if (imageInfo.Frame + 1 < imageInfo.FrameCount) {
    31. imageInfo.Frame++;
    32. }
    33. else {
    34. imageInfo.Frame = 0;
    35. }
    37. if( imageInfo.FrameDirty ){
    38. anyFrameDirty = true;
    39. }
    40. }
    41. }
    42. }
    43. finally {
    44. rwImgListLock.ReleaseReaderLock();
    45. }
    47. Thread.Sleep(50);
    48. }
    49. }
    /nicht getestet

    Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von „rotherford“ ()

    Das Image wird doch garnet ausgelagert. Außerdem tritt der Fehler ja nicht nur dort auf, auch auf der Parentform. Wenn ich die größe der Form ändere -> selbe Exception. Versteh ich überhaupt nicht ich hab z.B. eine Prozedur in der Klasse der Form diese wird durch einen Button gefeuert und darin wird nur die Größe der Form geändert und schon fliegt die Exception.

    @rotherford
    Den Code hab ich auch schon gesehen und zu meinem Zweck umgeschrieben, dass ist der den ich gepostet hab. Ich muss das Gif nur n-male abspielen nicht dauerhaft deswegen hilft die Picturebox nicht. Und ich muss ein Event werfen wenn das letzte Frame angezeigt wurde. Die Exception hab ich abgefangen um zu sehen obs überhaupt etwas anzeigt.

Facebook
Telefonspende