Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / WinForms, .Net Framework [игнор отключен] [закрыт для гостей] / добавление TabPage / 5 сообщений из 5, страница 1 из 1
26.09.2014, 13:04
    #38758786
tasha klemer
tasha klemer
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
добавление TabPage
Добрый день, использую 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:29
    #38758833
sschainik
sschainik
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
добавление TabPage
так ведь страничка удаляется TabControl1.TabPages.Remove(TabControl1.TabPages("TabPage8"))
лучше пользуйте visible или hide/show
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
26.09.2014, 14:04
    #38758898
tasha klemer
tasha klemer
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
добавление TabPage
sschainik,

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

остается только remove/add но как же при add восоздать свою первоначальную вкладку со всеми контролами на ней, а не просто новую пустую???
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
26.09.2014, 15:28
    #38759031
sschainik
sschainik
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
добавление TabPage
тогда так не через имя
TabControl1.TabPages.Add(tabPage8)
TabControl1.TabPages.Remove(tabPage8)
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
26.09.2014, 15:41
    #38759061
tasha klemer
tasha klemer
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
добавление TabPage
sschainik,

при Remove-вкладвка удаляется полностью, со всеми контролами, которые мне очень нужны, при Add контролы которые были не возврщаются, эту проблему обошла рпри помощи
Код: vbnet
1.
2.
   TabPage1.Parent = Nothing 'скрыть 
   TabPage1.Parent = TabControl1 'оттобразить
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / WinForms, .Net Framework [игнор отключен] [закрыт для гостей] / добавление TabPage / 5 сообщений из 5, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
созд. / загр.: 434ms
Закрыть
start [/forum/topic.php?fid=20&mobile=1&tid=1402428]:
 0ms
get settings:
 10ms
get forum list:
 14ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 35ms
get topic data:
 10ms
get forum data:
 2ms
get page messages:
 34ms
get tp. blocked users:
 1ms
others: 322ms
total:  434ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]