Slider.Value mit If Schleife erheben

  • WPF

Es gibt 1 Antwort in diesem Thema. Der letzte Beitrag () ist von VaporiZed.

    Slider.Value mit If Schleife erheben

    Hallo zusammen
    Ich steh auf dem Schlauch! Ich habe in einer WPF Anwendung einen Slider, mit welchem ich Bilddateien zoomen kann. Nun möchte ich, dass der Slider beim Laden eines Bildes mit einer Bildbreite < 700 auf die aktuelle Position (zB 350) wechselt. Ansonsten soll der Slyder auf 700 stehen. Ich habs so versucht, aber der Slider reagiert nichtIch danke schon jetzt für eure Rückmeldungen!!

    Private Sub lbImage_SelectionChanged(
    sender As Object,
    e As SelectionChangedEventArgs)

    Dim liste As ListBox = sender
    If liste IsNot Nothing Then
    Dim index As Integer = liste.SelectedIndex
    If index >= 0 Then
    Dim auswahl As String = liste.SelectedItem.ToString()

    If auswahl.Length <> 0 Then
    Dim selLoc As New Uri(auswahl)
    Dim bildId As New BitmapImage(selLoc)
    Dim aktFileInfo As New IO.FileInfo(auswahl)

    aktImage.Source = bildId

    tblDateiname.Text = aktFileInfo.Name
    tblFormat.Text =
    bildId.PixelWidth.ToString() &
    " x " &
    bildId.PixelHeight.ToString()
    tblDatei.Text =
    aktFileInfo.Length.ToString() & " Byte"

    Dim Slider As New Slider

    If bildId.PixelWidth.ToString < 700 Then

    Slider.Value = bildId.PixelWidth.ToString
    Else
    Slider.Value = 700
    End If

    End If
    End If
    End If
    End Sub


    Edit by hal2000: Toteditiert --> Beitrag wiederhergestellt

    Dieser Beitrag wurde bereits 4 mal editiert, zuletzt von „hal2000“ ()

    1. Bitte CodeTags benutzen. Code im Fließtext ist ... schwierig zu lesen.
    2. Bitte mach Option Strict On. Sowas wie

    VB.NET-Quellcode

    1. If bildId.PixelWidth.ToString < 700 Then
    ist inhaltlich Humbug. Danach kann es weitergehen.
    Dieser Beitrag wurde bereits 5 mal editiert, zuletzt von „VaporiZed“, mal wieder aus Grammatikgründen.

    Häufig von mir verwendete Abkürzungen: CEs = control elements (Labels, Buttons, DGVs, ...) und tDS (typisiertes DataSet)
    Aufgrund spontaner Selbsteintrübung sind all meine Glaskugeln beim Hersteller. Lasst mich daher bitte nicht in den Spekulatiusmodus gehen.