none
Archivo que queda abierto RRS feed

  • Pregunta

  • Buen dia

    Estoy usando el código, que agrego más abajo, con el cual cargo una imagen en un image.source

    Esto funciona bien pero el archivo en cuestion queda abierto y no puede ser usado en otros procedimientos.

    No logro cerrarlo. 

    Alguna ayuda

    Gracias

        Public Sub PonerenTira()
            Dim aux As String
            Dim p As String = System.AppDomain.CurrentDomain.BaseDirectory()
            Dim rempath As String = p & "imapag/A.png"
            For Each cTRL As Object In Me.canTira.Children
                If TypeOf cTRL Is Image Then
                    aux = CType(cTRL, Image).Name
                    If Right(aux, 1) = "1" Then
    
                        CType(cTRL, Image).Source = (New BitmapImage(New Uri(rempath, UriKind.Absolute)))
    
                    End If
                End If
            Next
        End Sub


    Pedro López

    miércoles, 10 de enero de 2018 11:32

Respuestas

Todas las respuestas