Announcement

Collapse
No announcement yet.

List(Of IFilter)

Collapse
X
  • Filter
  • Time
  • Show
Clear All
new posts

  • List(Of IFilter)

    grüß gott zusammen,

    ich scheitere beim erstellen einer ~list of~.

    Ziel wäre aus einer (un)menge von Filtern (alle als classen vorliegend)
    per mausklick eine auszuwählen und dann auf ein bild zu "transferieren"...

    Die FilterClassen haben alle ein Interface namens IFilter.

    so lade ich die Classen "rein"

    [highlight=vbnet]

    Friend FilterList As New List(Of IFilter)

    Sub makeFilter()
    Dim Info As System.Reflection.Assembly = _
    System.Reflection.Assembly.LoadFrom("F:\3d\Af3D\Af 3D\Af3D\bin\Debug\AForge.imaging.dll")
    Dim CrLf As String = System.Environment.NewLine()

    'Try
    For Each Items As Type In Info.GetTypes()

    If Items.IsClass() Then

    Console.WriteLine(Items.Namespace)

    If Items.Namespace = "AForge.Imaging.Filters" Then
    ListBox1.Items.Add(Items.Name) ' funktioniert bestens ...
    End If

    End If
    Next
    'Catch ex As Exception
    ' MessageBox.Show(ex.Message(), "Info - " & _
    ' System.Reflection.MethodBase.GetCurrentMethod().Na me())
    'End Try

    End Sub

    [/highlight]

    Das befüllen der "FilterList(OF IFilter) klappt leider nicht.

    So wäre wohl der korrekte weg:
    [highlight=vbnet]

    Dim meinFilter as new ColorFilter() ' als EINER von eben den vielen
    FilterList.Add(meinFilter)

    ' Dim aktFilter = new Items ' geht ja nicht ...

    Sub FilterAngeklickt(f as IFilter)
    BildXYZ.Filter = f
    end Sub

    [/highlight]

    Muss ich da ein "Delegate" oder DirectCast oder ähnliches Erstellen.
    Ein klitzekleines Beispiel wäre mir da wirklich hiiiiilfreich.

    Besten Dank
    R aus München


    ' was gefunden :-)

    http://svn.espend.de/listing.php?rep...50bb8fe31afb70
    Zuletzt editiert von Fremder; 10.01.2012, 13:57. Reason: was gefunden
    Vor 4,5 Millionen Jahren lernten ~wir~ aufrecht zu gehen!
    Um heute vorm PC zu sitzen!
Working...
X