добавление TabPage / WinForms, .Net Framework

ReSQL.ru

Мобильная версия Контакт Правила FAQ Помощь

Гость

Войти | Регистрация | Профиль | Очистить

Новые сообщения | Избранное

Форумы | Пользователи | Статистика | Мод. лог | Поиск

Цитировать

Написать

Автор*:

Ввести пароль для входа

Тема*:

Сообщение

Данное сообщение тематическое

Сообщение содержит картинки или видео 18+

Автор:

ВНИМАНИЕ! На данном подфоруме действуют строгие правила. Удостоверьтесь, что ваше сообщение соответствует им!

Форум или тема закрыты для гостей. Необходима авторизация!

Загрузить последнюю сохраненную версию

Вложение:

Вставить как галерею

Максимальный размер вложений: 4,0 МБ, аудио/видео: 8,0 МБ. Картинки большего размера ужимаются, если возможно.

Введите код, изображенный на картинке. Если код нечитаемый, кликните картинку, чтобы загрузить другой вариант.

Отправляя сообщение, я выражаю свое согласие с правилами форума и принимаю пользовательское соглашение.

Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр

Форумы / WinForms, .Net Framework [игнор отключен] [закрыт для гостей] / добавление TabPage

5 сообщений из 5, страница 1 из 1

добавление TabPage

#38758786

tasha klemer

Гость

Добрый день, использую Tabcontrol для отоброжения разной информациии, в зависимости от условия должен отображаться тот или иной tab.На каждом tab в зависимости от условия отображается информация
Всего у меня 10 tab
изменения видимости от условия касается с 1-5 tab
делаю след. образом

Код: vbnet

1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.

 ElseIf vTypeBuild.SelectedIndex = 2 Then
                    'ds.Tables("INDEXFORM").Rows(0)("ID_TypeBild").ToString = 10 Then
                    If Not TabControl1.TabPages("TabPage1") Is Nothing Then
                        TabControl1.TabPages.Remove(TabControl1.TabPages("TabPage1"))
                    End If
                    If Not TabControl1.TabPages("TabPage6") Is Nothing Then
                        TabControl1.TabPages.Remove(TabControl1.TabPages("TabPage6"))
                    End If
                    If Not TabControl1.TabPages("TabPage8") Is Nothing Then
                        TabControl1.TabPages.Remove(TabControl1.TabPages("TabPage8"))
                    End If
                    If Not TabControl1.TabPages("TabPage9") Is Nothing Then
                        TabControl1.TabPages.Remove(TabControl1.TabPages("TabPage9"))
                    End If
                    If Not TabControl1.TabPages("TabPage10") Is Nothing Then
                        TabControl1.TabPages.Remove(TabControl1.TabPages("TabPage10"))
                    End If

но когда vTypeBuild.SelectedIndex изменяется например на 3, то нужный мне TabPage8 не добавляется

Код: vbnet

1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.

 ElseIf vTypeBuild.SelectedIndex = 3 Then
                    If Not TabControl1.TabPages("TabPage1") Is Nothing Then
                        TabControl1.TabPages.Remove(TabControl1.TabPages("TabPage1"))
                    End If
                    If Not TabControl1.TabPages("TabPage6") Is Nothing Then
                        TabControl1.TabPages.Remove(TabControl1.TabPages("TabPage6"))
                    End If
                    If Not TabControl1.TabPages("TabPage7") Is Nothing Then
                        TabControl1.TabPages.Remove(TabControl1.TabPages("TabPage7"))
                    End If
                    'If TabControl1.TabPages("TabPage8") Is Nothing Then
                    '    TabControl1.TabPages.Insert(TabControl1.TabPages("TabPage8"))
                    'End If
                    If Not TabControl1.TabPages("TabPage9") Is Nothing Then
                        TabControl1.TabPages.Remove(TabControl1.TabPages("TabPage9"))
                    End If
                    If Not TabControl1.TabPages("TabPage10") Is Nothing Then
                        TabControl1.TabPages.Remove(TabControl1.TabPages("TabPage10"))
                    End If

Каким образом возможно реализовать данную задумку.

...

Рейтинг:

0 / 0

26.09.2014, 13:04

| Ответить | Цитировать | Написать

добавление TabPage

#38758833

sschainik

Гость

так ведь страничка удаляется TabControl1.TabPages.Remove(TabControl1.TabPages("TabPage8"))
лучше пользуйте visible или hide/show

...

Рейтинг:

0 / 0

26.09.2014, 13:29

| Ответить | Цитировать | Написать

добавление TabPage

#38758898

tasha klemer

Гость

sschainik,

к сожалению использоване Hide- ни как не изменяет внешнего вида и видимости Page ....

остается только remove/add но как же при add восоздать свою первоначальную вкладку со всеми контролами на ней, а не просто новую пустую???

...

Рейтинг:

0 / 0

26.09.2014, 14:04

| Ответить | Цитировать | Написать

добавление TabPage

#38759031

sschainik

Гость

тогда так не через имя
TabControl1.TabPages.Add(tabPage8)
TabControl1.TabPages.Remove(tabPage8)

...

Рейтинг:

0 / 0

26.09.2014, 15:28

| Ответить | Цитировать | Написать

добавление TabPage

#38759061

tasha klemer

Гость

sschainik,

при Remove-вкладвка удаляется полностью, со всеми контролами, которые мне очень нужны, при Add контролы которые были не возврщаются, эту проблему обошла рпри помощи

Код: vbnet

1.
2.

   TabPage1.Parent = Nothing 'скрыть 
   TabPage1.Parent = TabControl1 'оттобразить

...

Рейтинг:

0 / 0

26.09.2014, 15:41

| Ответить | Цитировать | Написать

5 сообщений из 5, страница 1 из 1

Форумы / WinForms, .Net Framework [игнор отключен] [закрыт для гостей] / добавление TabPage

Читали тему (0):

Читали форум (0):

Пользователи онлайн (0):

start [/forum/topic.php?fid=20&gotonew=1&tid=1402428]:	0ms
get settings:	11ms
get forum list:	13ms
check forum access:	3ms
check topic access:	3ms
track hit:	33ms
get topic data:	9ms
get first new msg:	7ms
get forum data:	2ms
get page messages:	38ms
get tp. blocked users:	1ms
others:	342ms

total:	462ms