TDINotebook. How to close the tab by clicking the "X" next to the title

[edsonjalves]

I would like to have an icon on the tab to close the "tdinotebook" tab like in web browsers. This would be more intuitive for users already accustomed to browsers.

[dsiders]

I would like to have an icon on the tab to close the "tdinotebook" tab like in web browsers. This would be more intuitive for users already accustomed to browsers.

Isn't that what the CloseTabButtom (sp) is for?

[edsonjalves]

I'm not referring to the close Tab button, but the close icon next to the tab title

[TRon]

afaik you are both talking about the same thing.

TTDINoteBook.Options and turn on nboShowCloseButtons

[CharlyTango]

TTDINoteBook.Options and turn on nboShowCloseButtons

in my experience, the close buttons on the tab do not work under windows, so this setting is ineffective.

[TRon]

Thank you for the heads up CharlieTango.

I was not able to decipher the OS used by TS so no definitive answer/solution in that case.

[zeljko]

There's no OnCloseTabClicked event like TPageControl have ?

[CharlyTango]

I would like to have an icon on the tab to close the "tdinotebook" tab like in web browsers. This would be more intuitive for users already accustomed to browsers.

I would also like to have close buttons in the tabs.

The derivation of TDINotebook looks like this:
TDINotebook
TExtendedNotebook
TPagecontrol
TCustomPageControl

At the level of TCustomPageControl it is possible to influence the behavior of the tabs, among other things with

Code: Pascal  [Select][+][-]

1.   // These are LCL additions
2.   TCTabControlOption = (
3.     nboShowCloseButtons, nboMultiLine, nboHidePageListPopup,
4.     nboKeyboardTabSwitch, nboShowAddTabButton, nboDoChangeOnSetIndex);  
5.  

Apparently, however, the Windows widget set is not able to display close buttons on the individual tabs. Therefore, this is not the problem of TDINotebook but the request should go directly to Microsoft.

[dseligo]

Apparently, however, the Windows widget set is not able to display close buttons on the individual tabs. Therefore, this is not the problem of TDINotebook but the request should go directly to Microsoft.

You also have some other controls that AFAIK can display close buttons, such as ATTabs: https://wiki.freepascal.org/ATTabs

[CharlyTango]

I'm not the maintainer of TDINotebook.

The only possibility would be forking TDINotebook and change the complete Tab-Mechanism to another control like ATTabs, which results in another component dependancy which i try to avoid.