Moin zusammen,
kann mir einer sagen, wie ich den Fokus auf das Item eines treeViews bekomme, welches ich mit der RMT anklicke?
Spoiler anzeigen
#include <File.au3>
#include <Array.au3>
#include <GUITreeView.au3>
#include <GUIConstantsEx.au3>
Global $MainTreeView
[/autoit] [autoit][/autoit] [autoit];--------------------GUI erstellen--------------------------------------------------------------------------------------------------------------
$gui = GUICreate("SQL-Test", 800, 600)
$EditTitel = GUICtrlCreateInput("Hier bitte den Titel eintragen", 10, 15, 250, 25)
$EditInhalt = GUICtrlCreateEdit("Hier bitte den Inhalt eintragen", 10, 50, 500, 500)
$NewMainEntry = GUICtrlCreateButton("Neuen Haupteintrag anlegen", 15, 570, 150, 25)
[/autoit] [autoit][/autoit] [autoit]_TreeView()
$ContextTreeView = GUICtrlCreateContextMenu($MainTreeView)
$UnterEintrag_erstellen = GUICtrlCreateMenuItem("Untereintrag erstellen", $ContextTreeView)
GUISetState()
;--------------------GUI fertig--------------------------------------------------------------------------------------------------------------
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $UnterEintrag_erstellen
$Item = GUICtrlRead($MainTreeView)
$text = GUICtrlRead($Item, 1)
$checkparent = _GUICtrlTreeView_GetChildCount($MainTreeView, $Item) ; >0 dann ist ein Parent und -1 kein Parent
If $checkparent = -1 Then
MsgBox(0, "Achtung", "Du kannst nur Themen in Themenbereichen erstellen")
Else
MsgBox(0, "", "parent")
EndIf
EndSwitch
WEnd
Func _Themenbereich_anlegen($name)
DirCreate(@ScriptDir & "\Themen\" & $name)
EndFunc ;==>_Themenbereich_anlegen
Func _TreeView()
GUICtrlDelete($MainTreeView)
$MainTreeView = GUICtrlCreateTreeView(600, 15, 190, 570)
$aFileList = _FileListToArray(@ScriptDir & "\Themen\")
If IsArray($aFileList) Then
For $i = 1 To $aFileList[0]
$Sub = GUICtrlCreateTreeViewItem($aFileList[$i], $MainTreeView)
$aFileTheme = _FileListToArray(@ScriptDir & "\Themen\" & $aFileList[$i])
For $f = 1 To $aFileTheme[0]
GUICtrlCreateTreeViewItem(StringReplace($aFileTheme[$i], ".txt", ""), $Sub)
Next
Next
EndIf
EndFunc ;==>_TreeView
Hier ein kleines Bsp.
MfG
MrB