FileExplorere List and TiewView

  • Ich freue mich, euch eine UDF vorzustellen, welche eine TreeView und/oder ListView zu einem FileExplorer umwandelt :)

    Ein kleines Beispielscript:

    Spoiler anzeigen
    [autoit]

    #include "FileExplorerTreeAndListview UDF.au3"
    Opt("GUIOnEventMode", 1)

    [/autoit] [autoit][/autoit] [autoit]

    $GUI=GUICreate("Explorer",500,800)
    $TreeView=GUICtrlCreateTreeView(10,10,480,385)
    $ListView=GUICtrlCreateListView("",10,405,480,385)
    GUISetState(@SW_SHOW)
    $oExplorer=_TLE_CreateTreeViewExplorer(true,$TreeView,$ListView)
    GUIRegisterMsg($WM_NOTIFY, '_WM_NOTIFY')
    GUISetOnEvent($GUI_EVENT_CLOSE, "_ExplorerGui_Close")

    [/autoit] [autoit][/autoit] [autoit]

    _TLE_TreeViewOpenPath(@DesktopDir,$oExplorer)

    [/autoit] [autoit][/autoit] [autoit]

    while 1
    sleep(100)
    WEnd

    [/autoit] [autoit][/autoit] [autoit]

    Func _WM_NOTIFY($hWnd, $iMsg, $iwParam, $ilParam)
    _TLE_WM_NOTIFY($hWnd, $iMsg, $iwParam, $ilParam,$oExplorer)
    Return $GUI_RUNDEFMSG
    EndFunc ;==>_WM_NOTIFY

    [/autoit] [autoit][/autoit] [autoit]

    Func _ExplorerGui_Close()
    exit
    EndFunc

    [/autoit]

    Es muss also eine Notifity eingerichtet werden, welche die genannte Funktion aufruft und dann muss nur noch die Funktion zum umwandeln aufgerufen werden. :)

    Viel Freude damit! Ich freue mich schon auf eure Kritik! ;)

    Im Anhang befindet sich auch die benötigte AutoIt-Objekt UDF.