Recent

Author Topic: [solved] how to have colorful tabs  (Read 1215 times)

Kraig

  • New Member
  • *
  • Posts: 27
[solved] how to have colorful tabs
« on: March 19, 2024, 09:52:50 am »
I’m trying to make a control that is a descendant of tpagecontrol so that I can control the color of the tabs better.
What is the best way to do this?
So far I have
Code: Pascal  [Select][+][-]
  1.  Tmypagecontrol = class (tpagecontrol)
I’m not sure what I need to override to draw the tabs the same color as page
« Last Edit: March 20, 2024, 07:01:59 pm by Kraig »

dseligo

  • Hero Member
  • *****
  • Posts: 1458
Re: Tpagecontrol descendant
« Reply #1 on: March 19, 2024, 10:29:02 am »
Look at ATTabs control.
It's not descendant of TPagecontrol, but it may be easier to achieve what you want:
https://wiki.freepascal.org/ATTabs

Kraig

  • New Member
  • *
  • Posts: 27
Re: Tpagecontrol descendant
« Reply #2 on: March 19, 2024, 01:06:39 pm »
Thanks for 5he reply I’ll look into that. Do you know if it has a multiline property?

Also at one point I was trying to use  ttab control but I couldn’t seem to control the height of the tabs.

dseligo

  • Hero Member
  • *****
  • Posts: 1458
Re: Tpagecontrol descendant
« Reply #3 on: March 19, 2024, 01:37:28 pm »
Thanks for 5he reply I’ll look into that. Do you know if it has a multiline property?

I see it has option OptMultiline but I didn't use it.

Quote
Also at one point I was trying to use  ttab control but I couldn’t seem to control the height of the tabs.

ATTabs has OptTabHeight to set height of the tabs.

Thaddy

  • Hero Member
  • *****
  • Posts: 16520
  • Kallstadt seems a good place to evict Trump to.
Re: Tpagecontrol descendant
« Reply #4 on: March 20, 2024, 12:59:16 pm »
alex is indeed a - very active - forum member, so he will read this.
But I am sure they don't want the Trumps back...

 

TinyPortal © 2005-2018