Как программно скрыть или отобразить вкладки в TabControl

@Leksar · Регистрация: 10.02.2013

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

добавил TabControl, на нем пару вкладок, на первой вкладке ПрогрессБар, при запуске программы запускается таймер, интервал секунда,
событие Timer1.Tick

VB.NET

Private Sub Timer1_Tick(s, e) Handles Timer1.Tick
ProgressBar1.Value += 1
Me.Text = ProgressBar1.Value
End Sub

то есть каждую секунду значение прогрессбара увеличивается на 1 и это значение выводится в заголовок формы.
Удаляю первую вкладку TabControl1.TabPages.RemoveAt(0) или так TabPage1.Dispose.
Также потом вывожу TagPage1.Text, и выводит "TagPage1", то есть вкладка осталась!
И после удаления прогрессбар никуда не пропал, в заголовке формы все равно идет увеличение числа, и значение прогрессбара ProgressBar1.Created изменилось с true на false
Интересует следующее, как при удалении вкладки можно было ее восстановить? так как свойства Visible у TabPage нету.

Это потребовалось для того, что есть сторонний TabControl и в нем нельзя "листать" вкладки, то есть при заполнении, скажем, 20 вкладок, остальные уходят вниз и их не видно и листать нельзя, и никаких свойств типа AutoScroll нету.

Памирыч · 29.08.2013, 17:09

Коряво конечно, но может, хранить вкладки в коллекции?
Примерный принцип: Записываем все в коллекцию, меняем свойство Tag, очищаем табконтрол, перестраиваем вкладки, по условию.

VB.NET

    Dim TP As New List(Of TabPage)
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        TP(2).Tag = "Unvisible"
        TabControl1.TabPages.Clear()
        For Each T As TabPage In TP
            If T.Tag <> "Unvisible" Then
                TabControl1.TabPages.Add(T)
            End If
        Next
    End Sub
 
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        For Each T As TabPage In TabControl1.TabPages
            TP.Add(T)
        Next
    End Sub

@Qwertiy · 29.08.2013, 17:10

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

Удаляю первую вкладку TabControl1.TabPages.RemoveAt(0) или так TabPage1.Dispose.

Это принципиально разные вещи. Первое убирает вкладку из коллекции, но как объект она ещё жива, а второе её уничтожет.

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

так как свойства Visible у TabPage нету

Visible - это свойство Control'а, значит у TabPage оно есть...
Другое дело, что оно скрыто из автодополнения и работает не так как ты ожидаешь

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

Это потребовалось для того, что есть сторонний TabControl и в нем нельзя ...

Тогда с ним и надо разбираться.

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

как при удалении вкладки можно было ее восстановить?

Сохранить в переменную перед Remove, а потом добавить обратно.

@Leksar · 29.08.2013, 17:48 **[ТС]**

всем спасибо, еще вариант

VB.NET

1 2	TabPage1.Parent = Nothing TabPage1.Parent = TabControl1

Добавлено через 15 минут

Сообщение от Памирыч

Коряво конечно, но может, хранить вкладки в коллекции?

у меня весь код корявый, но работает же! так что это не беда)

@Qwertiy · 29.08.2013, 17:57

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

всем спасибо, еще вариант

VB.NET

1 2	TabPage1.Parent = Nothing TabPage1.Parent = TabControl1

Хороший вариант - то же, что я предлагал, только более красиво записано

Памирыч · 29.08.2013, 18:13

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

всем спасибо, еще вариант

Интересный вариант

А я-то пытался добиться сохранения порядка вкладок и возможность спрятать их неограниченное количество.
А надо то было для одной и гораздо проще

Как программно скрыть или отобразить вкладки в TabControl

Решение

Решение

@Qwertiy 834 / 642 / 101 Регистрация: 20.08.2013 Сообщений: 2,524
	29.08.2013, 17:10	3
	Сообщение от Leksar Удаляю первую вкладку TabControl1.TabPages.RemoveAt(0) или так TabPage1.Dispose. Это принципиально разные вещи. Первое убирает вкладку из коллекции, но как объект она ещё жива, а второе её уничтожет. Сообщение от Leksar так как свойства Visible у TabPage нету Visible - это свойство Control'а, значит у TabPage оно есть... Другое дело, что оно скрыто из автодополнения и работает не так как ты ожидаешь Сообщение от Leksar Это потребовалось для того, что есть сторонний TabControl и в нем нельзя ... Тогда с ним и надо разбираться. Сообщение от Leksar как при удалении вкладки можно было ее восстановить? Сохранить в переменную перед Remove, а потом добавить обратно. 1

Памирыч Почетный модератор 21413 / 9147 / 1083 Регистрация: 11.04.2010 Сообщений: 11,014
	29.08.2013, 18:13	6
	Сообщение от Leksar всем спасибо, еще вариант Интересный вариант А я-то пытался добиться сохранения порядка вкладок и возможность спрятать их неограниченное количество. А надо то было для одной и гораздо проще 0