Как запомнить последний выбор пользователя в TreeView

@AMG38 · Регистрация: 29.08.2016

Author24 — интернет-сервис помощи студентам

Добрый день!
Подскажите, знающие люди))
Задача заключается в следующем:

Есть TreeView1 в котором пользователь выбирает тип некого расчета, после двойного клика по ноду - открывается тот или иной калькулятор для расчета.
Я хочу добавить checkbox для запоминания последнего выбора пользователя и при новом открытии программы, treeview разворачивается на последнем открытом узле предыдущего сеанса.

Я так понимаю, что запоминание выбора можно реализовать через my.settings, но остальную программную часть не могу додумать...
Кто может объяснить, как реализовать данную задумку, желательно с примером,
Спасибо!

@MrCrown · 23.12.2017, 13:20

Сообщение от AMG38

запоминание выбора можно реализовать через my.settings

А остальное примерно так

VB.NET

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        'Dim saveNode As String = "Узел15"
        Dim saveNode As String = My.Settings.SaveNode
        Dim nd As TreeNode
        nd = tv.Nodes.Find(saveNode, True)(0)
        tv.SelectedNode = nd
    End Sub
 
    Private Sub Form1_FormClosing(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing
        My.Settings.SaveNode = tv.SelectedNode.Name
    End Sub

@AMG38 · 23.12.2017, 13:43 **[ТС]**

Спасибо большое!
Все оказалось просто)

У меня калькуляторы открываются по двойному клику на нод, как реализовать программный клик по необходимому ноду, для того, чтобы узел не просто раскрылся, а отобразился необходимый калькулятор?

@MrCrown · 23.12.2017, 14:09

AMG38, Трудно что-либо сказать наверняка не зная, как у вас все реализовано, но попробуйте перенести код, который был в событии в отдельную процедуру, и вызывайте ее в Form_Load

VB.NET

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        ' ' '
        LoadCalc()
    End Sub
 
    Private Sub TreeView1_DoubleClick(ByVal sender As Object, ByVal e As System.EventArgs) Handles TreeView1.DoubleClick
        LoadCalc()
    End Sub
 
    Private Sub LoadCalc()
        'Здесь код, который был в событии _DoubleClick
    End Sub

@AMG38 · 23.12.2017, 14:25 **[ТС]**

Вот код...
Открывалось при помощи события по тексту нода

VB.NET

  Sub treeView1_NodeMouseDoubleClick(ByVal sender As Object, ByVal e As TreeNodeMouseClickEventArgs) Handles TreeView1.NodeMouseDoubleClick
        Try
            If e.Node.Text = "Электросварная" Then
                TabControl3.SelectedTab = TabPage16
            End If
            If e.Node.Text = "Бесшовная" Then
                TabControl3.SelectedTab = TabPage14
            End If
        Catch
        End Try
 
        My.Settings.TreePosition = TreeView1.SelectedNode.Name
    End Sub

Я так понимаю, что нужно пересмотреть условие открытия с e.NodeText на что-то другое?

@MrCrown · 23.12.2017, 14:47

Ну, тогда как-то так

VB.NET

Sub treeView1_NodeMouseDoubleClick(ByVal sender As Object, ByVal e As TreeNodeMouseClickEventArgs) Handles TreeView1.NodeMouseDoubleClick
        LoadCalc(e.Node.Text)
    End Sub
 
    Private Sub LoadCalc(ByVal nodeText As String)
        Try
            If nodeText = "Электросварная" Then
                TabControl3.SelectedTab = TabPage16
            End If
            If nodeText = "Бесшовная" Then
                TabControl3.SelectedTab = TabPage14
            End If
        Catch
        End Try
    End Sub

Добавлено через 3 минуты
Да, и в FormLoad:

VB.NET

1	LoadCalc(nd.Text)

@AMG38 · 23.12.2017, 15:24 **[ТС]**

Большое спасибо!
Со всем разобрался, все получилось)

@MrCrown · 23.12.2017, 15:55

AMG38, несколько замечаний вдогонку:
1. Блок Try/Catch здесь явно лишний, тем более без обработки исключения. При отладке кода иногда это может сильно затруднить поиск ошибки.
2. В коде лучше оперировать именами элементов, нежели их текстом.
3. Блоки If/Then я бы заменил на один Select Case. На мой взгляд - выглядит более лаконично и читаемо.

VB.NET

Private Sub LoadCalc(ByVal nodeText As String)
        Select Case nodeText
            Case "Электросварная"
                TabControl3.SelectedTab = TabPage16
            Case "Бесшовная"
                TabControl3.SelectedTab = TabPage14
        End Select
    End Sub

Как запомнить последний выбор пользователя в TreeView

Решение

Решение

@AMG38 0 / 0 / 0 Регистрация: 29.08.2016 Сообщений: 131
		1
	.NET 4.x Как запомнить последний выбор пользователя в TreeView 23.12.2017, 12:31. Показов 1768. Ответов 7 Метки treeview (Все метки) Добрый день! Подскажите, знающие люди)) Задача заключается в следующем: Есть TreeView1 в котором пользователь выбирает тип некого расчета, после двойного клика по ноду - открывается тот или иной калькулятор для расчета. Я хочу добавить checkbox для запоминания последнего выбора пользователя и при новом открытии программы, treeview разворачивается на последнем открытом узле предыдущего сеанса. Я так понимаю, что запоминание выбора можно реализовать через my.settings, но остальную программную часть не могу додумать... Кто может объяснить, как реализовать данную задумку, желательно с примером, Спасибо! 0

@AMG38 0 / 0 / 0 Регистрация: 29.08.2016 Сообщений: 131
	23.12.2017, 13:43 [ТС]	3
	Спасибо большое! Все оказалось просто) У меня калькуляторы открываются по двойному клику на нод, как реализовать программный клик по необходимому ноду, для того, чтобы узел не просто раскрылся, а отобразился необходимый калькулятор? 0

@AMG38 0 / 0 / 0 Регистрация: 29.08.2016 Сообщений: 131
	23.12.2017, 15:24 [ТС]	7
	Большое спасибо! Со всем разобрался, все получилось) 0

	23.12.2017, 15:55