Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Помогите изменить цвет закладок в Tab Controlе, ;цвет формы, [D5, Win95/98]


Rule ©   (2002-10-14 23:09:00) 

главного мнею и вобщем хочеться добавить что это довольно не просто как я понял поэтому был бы очень благодарен заранее ужасно благодарен!!!!!!!!!


pusrg   (2002-10-17 16:12:00) [1]

Уважаемый, что же тут сложного, все очень просто


procedure TForm1.TabControl1DrawTab(Control: TCustomTabControl;
TabIndex: Integer; const Rect: TRect; Active: Boolean);
begin
Control.Canvas.Brush.Color:=$00DBD3A6;
Control.Canvas.FillRect(Rect);
Control.Canvas.TextOut(Rect.Left+4,Rect.Top+2,TabControl1.Tabs[TabIndex]);
end;


Не забудь поставить OwnerDraw:=true;


Darrin   (2002-10-17 15:37:00) [2]

Form1.color:="FFFFFF" или в инспекторе объектов, для формы.
А TabCpontrol походу принимает цвет своего владельца (Parent), в ближайшем рассмотрении


Наверх

Титульная страница Поиск, карта сайта Написать письмо