parametre opacité sur picturebox en wpf

Question

salut 
je sais pas tres bien ou il fallais mettre ce sujet 
libre au admin de le deplacé 

je souhaiterais avoir une petite info sur le parametre opacity d'une picture box (c plus un controle image en wpf,il me semble  )

donc pour vous decrire un peu la config du prog :
c'est une form wpf
g une un controle image (dim image1 as image) 
je veu jouer sur le parametre opacity pour changer la source de l'image image1.opacity
(faire un enchainement d'image en fondu )
mon probleme est que en wpf je fais varié la value de image1 il fige quelque second sur 0.98 avant d'arrivé a 1
pourkoi 
sa vient de mon timer ou d'autre chose 
je vous laisse le code que j'ai fé 


dim statusimage as object = false
Public Sub timer()

        Me.InitializeComponent()

        Dim myTimer As New DispatcherTimer()
        myTimer.Interval = New TimeSpan(0, 0, 0, 0, 100)
        AddHandler myTimer.Tick, AddressOf myTimer_Tick

        myTimer.Start()

    End Sub
Private Sub myTimer_Tick(ByVal sender As Object, ByVal e As EventArgs)

If statusimage = True Then
      Image1.Opacity = Image1.Opacity + 0.1
         If Image1.Opacity >= 1 Then
             statusimage = False
         end if
 elseif statusimage = false Then
      Image1.Opacity = Image1.Opacity - 0.1
         If Image1.Opacity <=1 Then
'je change l'image a ce moment la 
             statusimage = False
 End If
 End Sub

j'espere d'etre sufisament claire dans mes explication 


merci d'avance  de vos reponse

julienmus · Answer

desolé c'est juste une petite mise en forme 
pour facilité la lecture 

dim statusimage as object = false 
Public Sub timer() 

Me.InitializeComponent() 

Dim myTimer As New DispatcherTimer() 
myTimer.Interval = New TimeSpan(0, 0, 0, 0, 100) 
AddHandler myTimer.Tick, AddressOf myTimer_Tick 

myTimer.Start() 

End Sub 
Private Sub myTimer_Tick(ByVal sender As Object, ByVal e As EventArgs) 

If statusimage = True Then 
Image1.Opacity = Image1.Opacity + 0.1 
If Image1.Opacity >= 1 Then 
statusimage = False 
end if 
elseif statusimage = false Then 
Image1.Opacity = Image1.Opacity - 0.1 
If Image1.Opacity <=1 Then 
'je change l'image a ce moment la 
statusimage = False 
End If 
End Sub

Parametre opacité sur picturebox en wpf

1 réponse

Votre réponse

Discussions similaires