Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Заменить TTabControl на TChromeTabs / 8 сообщений из 8, страница 1 из 1
03.03.2021, 13:51
    #40050297
cycloness
cycloness
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Заменить TTabControl на TChromeTabs
Есть демо проект с использованием TTabControl для открытия и навигации по встроенным формам. Хотел попробовать заменить TTabControl на TChromeTabs (https://github.com/norgepaul/TChromeTabs)

Подскажите на какие методы и свойства заменить строчки ниже (у TChromeTabs таких методов нет) -
Код: pascal
1.
2.
3.
4.
5.
6.
7.
TabControl1.TabIndex := GetIndexByForm(AEmbeddableForm);

TabControl1.Tabs.AddObject(AEmbeddableForm.Caption, AEmbeddableForm);

TabControl1.Tabs.Objects[TabControl1.TabIndex] 

AEmbeddableForm = TabControl1.Tabs.Objects[i]



или если не сложно замените в тестовом проекте TTabControl на TChromeTabs, чтоб дальше поковырять самому.

демо проект с TTabControl здесь- https://disk.yandex.ru/d/s2IaUmd-tV4Jww

ОГРОМНОЕ СПАСИБО!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
03.03.2021, 18:43
    #40050417
_Vasilisk_
_Vasilisk_
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Заменить TTabControl на TChromeTabs
cycloness
Код: pascal
1.
TabControl1.TabIndex

ChromeTabControl1.ActiveTabIndex
cycloness
Код: pascal
1.
TabControl1.Tabs.AddObject(AEmbeddableForm.Caption, AEmbeddableForm);

Код: pascal
1.
2.
3.
Tab := ChromeTabControl1.Tabs.Add;
Tab.Caption := AEmbeddableForm.Caption;
Tab.Data:= AEmbeddableForm;


cycloness
Код: pascal
1.
AEmbeddableForm = TabControl1.Tabs.Objects[i]

Код: pascal
1.
AEmbeddableForm = TabControl1.Tabs[i].Data
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
03.03.2021, 20:29
    #40050450
cycloness
cycloness
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Заменить TTabControl на TChromeTabs
смена открытых форм не выходит((
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
03.03.2021, 20:40
    #40050453
defecator
defecatorПривилегированный пользователь
Модератор форума
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Заменить TTabControl на TChromeTabs
cycloness
смена открытых форм не выходит((

а можно узнать, по какой причине жутко захотелось TChromeTabs ?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
03.03.2021, 21:21
    #40050467
_Vasilisk_
_Vasilisk_
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Заменить TTabControl на TChromeTabs
cycloness
смена открытых форм не выходит((
Читайте исходники. До вашего поста я понятия не имел о таком компоненте
defecator
а можно узнать, по какой причине жутко захотелось TChromeTabs ?
Красиво же!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
03.03.2021, 22:42
    #40050488
cycloness
cycloness
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Заменить TTabControl на TChromeTabs
defecator
а можно узнать, по какой причине жутко захотелось TChromeTabs ?

Нравица крестик закрытия на активной вкладке ))))

А никто не знает его, не юзал?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
04.03.2021, 01:43
    #40050506
DarkMaster
DarkMaster
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Заменить TTabControl на TChromeTabs
cycloness,

Я - делал свой, а что?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
04.03.2021, 12:26
    #40050609
cycloness
cycloness
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Заменить TTabControl на TChromeTabs
cycloness
смена открытых форм не выходит((

Спасибо. Разобрался.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Заменить TTabControl на TChromeTabs / 8 сообщений из 8, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 420ms
Закрыть
start [/forum/topic.php?fid=58&tablet=1&tid=2037555]:
 0ms
get settings:
 4ms
get forum list:
 12ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 141ms
get topic data:
 7ms
get forum data:
 2ms
get page messages:
 38ms
get tp. blocked users:
 1ms
others: 211ms
total:  420ms
x
x
Закрыть


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