[Solved] ATTabs_Package and adding components

[madref]

I am using ATTabs_Packagde 1.6 and i have created one ATTabs.
I have it setup in the colors i want, but i can't add components to the tabs.


How can i add components to the different tabs?

[taazz]

you can't. Tabs are not pages. It only paints the tabs and has events you can use to respond to various actions (change tab etc).

[madref]

This sucks....
Is there a component that does it and looks like ATTabs?

[taazz]

This sucks....
Is there a component that does it and looks like ATTabs?

I don't know of any control that behaves as tpagecontrol with custom look.

[madref]

Then i will add a page control component and make it look like the tabs are being used

[Handoko]

I am using ATTabs_Packagde 1.6 and i have created one ATTabs.
I have it setup in the colors i want, but i can't add components to the tabs.

Maybe you can combine ATTabs and TNotebook. TNotebook allows you to have multiple pages. When user click a tab (on ATTabs), use TNotebook.PageIndex to switch page.

[madref]

i am doing the came with TPageControl.

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

1. procedure TForm_Evaluatie_Referee.ATTabs_EvaluatieTabClick(Sender: TObject);
2. begin
3.   PageControl1.TabIndex := (Sender as TATTabs).TabIndex;
4. end;

[Blaazen]

Yes, TPageControl with property ShowTab set to False. And you can switch tabs with any component: ATTabs, TTreeView and others. I use it to.

[taazz]

i am doing the came with TPageControl.

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

1. procedure TForm_Evaluatie_Referee.ATTabs_EvaluatieTabClick(Sender: TObject);
2. begin
3.   PageControl1.TabIndex := (Sender as TATTabs).TabIndex;
4. end;

what happens if you move the tab with your mouse at runtime in to a new position?

[Blaazen]

Hmmm, he must restrict moving of tabs or use some Tag property (if ATTab has it).

[taazz]

Hmmm, he must restrict moving of tabs or use some Tag property (if ATTab has it).

or assign the tpage to the tab's data property and set the activepage property instead of activepageindex.

[madref]

i am doing the came with TPageControl.

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

1. procedure TForm_Evaluatie_Referee.ATTabs_EvaluatieTabClick(Sender: TObject);
2. begin
3.   PageControl1.TabIndex := (Sender as TATTabs).TabIndex;
4. end;

what happens if you move the tab with your mouse at runtime in to a new position?

I have disabled this feature and also disabled adding a new one