Модераторы: Poseidon, Snowy, bems, MetalFan
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> PageControl его корешок, Вопрос поро корешок 
:(
    Опции темы
ivan219
  Дата 22.2.2007, 22:40 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1121
Регистрация: 19.11.2005
Где: Планета земля

Репутация: 2
Всего: 12
Есть PageControl, на нём создаём TabSheet, получается корешок с верху.

Вопросы:
Что из себя представляет этот корешок это элемент управления или просто рисунок на PageControl smile 
И кто его родитель PageControl или TabSheet smile
И как к нему можно обратится (если это элемент управления) smile 



--------------------
Мой первый сайт и моя первая программа!!!!!
PM MAIL ICQ   Вверх
aktuba
Дата 22.2.2007, 23:19 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Смышленный
***


Профиль
Группа: Завсегдатай
Сообщений: 1915
Регистрация: 24.4.2006
Где: Планета Земля

Репутация: 16
Всего: 38
Не понял. У PageControl свои "корешки", у TabControl - свои... Какие именно интересуют?


--------------------
user posted image
PM MAIL WWW Skype   Вверх
Pakshin A. S.
Дата 23.2.2007, 00:11 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Участник Клуба
Сообщений: 5056
Регистрация: 16.2.2003

Репутация: 21
Всего: 61
Вкладка, закладка или как там это назвать... То, на чем пишется название странички или то, что можно отменить поставив TabVisible = false (наскалько помнится)...


ПО-моему это отдельаня единица без предкаЮ, которая реализована в самом копоненте... Но на чем она реализована - TabSheet или COntrol самому стало интеерсно...
PM   Вверх
ivan219
Дата 23.2.2007, 00:12 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1121
Регистрация: 19.11.2005
Где: Планета земля

Репутация: 2
Всего: 12
Ну что вы это который переключает TabSheet сверху который накотором TabSheet1, TabSheet2 написанно.

Добавлено @ 00:17 
Цитата(Pakshin A. S. @  23.2.2007,  00:11 Найти цитируемый пост)
Но на чем она реализована - TabSheet или COntrol самому стало интеерсно...

Вот и мне хочется это знать посмотрел код VCL там этот корешок создаётся также как и Button, Edit и.т.д. хотел его перерисовать а точнее вобще заменить на свой не перерисовывая этот да и кнопку на него прилепить хотя и с обычным это реализуется но всёже smile 


--------------------
Мой первый сайт и моя первая программа!!!!!
PM MAIL ICQ   Вверх
Lence
Дата 23.2.2007, 01:21 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Чухарадземадзупэ
*


Профиль
Группа: Участник
Сообщений: 209
Регистрация: 9.5.2006
Где: Ташкент

Репутация: 3
Всего: 3
поставь пакет Rize - там куча вариантов отображения "Коришков"
--------------------
Шуруп, забитый молотком, крепче сидит чем гвоздь, закрученный отверткой ....  
PM MAIL ICQ Skype   Вверх
ivan219
Дата 23.2.2007, 01:47 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1121
Регистрация: 19.11.2005
Где: Планета земля

Репутация: 2
Всего: 12
Lence, спасибо но я сам хочу зделать.


--------------------
Мой первый сайт и моя первая программа!!!!!
PM MAIL ICQ   Вверх
Sunvas
Дата 23.2.2007, 13:12 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Соль и сахар
****


Профиль
Группа: Участник
Сообщений: 3388
Регистрация: 12.3.2006
Где: Тосно

Репутация: 28
Всего: 89
Цитата(ivan219 @  22.2.2007,  22:40 Найти цитируемый пост)
Что из себя представляет этот корешок это элемент управления или просто рисунок на PageControl 

Рисунок. Просто ресуется все табы каждый по своему rect-y. В этом легко убедиться при помощи OnDrawTab:
Код

procedure TForm1.PageControl1DrawTab(Control: TCustomTabControl;
  TabIndex: Integer; const Rect: TRect; Active: Boolean);
begin
control.Canvas.Rectangle(0,0,505,5);
end;

Как видно, прямоугольник рисуется по всей плоскости этих самых "корешков".
Цитата(ivan219 @  22.2.2007,  22:40 Найти цитируемый пост)
И кто его родитель PageControl или TabSheet

Его родитель = родитель page controla , ведь корешки - это не отдельные окна, а составная часть page controla.

Цитата(ivan219 @  23.2.2007,  00:12 Найти цитируемый пост)
 хотел его перерисовать

Дык тебе в OwnerDraw надо писать. Например:
Код

procedure TForm1.PageControl1DrawTab(Control: TCustomTabControl;
  TabIndex: Integer; const Rect: TRect; Active: Boolean);
begin
if active then
begin
 control.Canvas.Brush.Color:=clwhite;
 control.Canvas.Rectangle(rect);
end;
end;




Это сообщение отредактировал(а) Sunvas - 23.2.2007, 13:13


--------------------
Воспитывая детей по своему образу и подобию, родители почему-то надеются, что они будут лучше их.
PM MAIL   Вверх
ivan219
Дата 23.2.2007, 14:34 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1121
Регистрация: 19.11.2005
Где: Планета земля

Репутация: 2
Всего: 12
Спасибо.

Добавлено @ 14:36 
Жалко что не контролы былобы легче управлять и переделать.


--------------------
Мой первый сайт и моя первая программа!!!!!
PM MAIL ICQ   Вверх
Sunvas
Дата 23.2.2007, 17:04 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Соль и сахар
****


Профиль
Группа: Участник
Сообщений: 3388
Регистрация: 12.3.2006
Где: Тосно

Репутация: 28
Всего: 89
Цитата(ivan219 @  23.2.2007,  14:34 Найти цитируемый пост)
Жалко что не контролы былобы легче управлять и переделать.

Дык, разве это повод чтобы останавливаться? Просто надо потрудиться над переписыванием кода. Конечно, это несколько трудно, но зато можно добиться результата.


--------------------
Воспитывая детей по своему образу и подобию, родители почему-то надеются, что они будут лучше их.
PM MAIL   Вверх
ivan219
Дата 23.2.2007, 17:32 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1121
Регистрация: 19.11.2005
Где: Планета земля

Репутация: 2
Всего: 12
Sunvas, вот этим сейчас и занимаюсь smile 


--------------------
Мой первый сайт и моя первая программа!!!!!
PM MAIL ICQ   Вверх
  
 Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Общие вопросы"
SnowyMetalFan
bemsPoseidon
Rrader

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

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

  • Литературу по Дельфи обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи

Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, MetalFan, bems, Poseidon, Rrader.
 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Общие вопросы | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




[ Время генерации скрипта: 0.0603 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
 По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.