[Insfin from Australia]

Hi,

We are using 6.42 commercial version.

There is a rather annoying and perculiar behaviour in TPageControl:

Setting (a TPageControl instance).ActivePageIndex does does skin
TButton instances inside the TTabSheet.

How To Reproduce?

Create a form with TPageControl, place 4 sheets on it. In each
sheet place several TButton.

On the the form now, place four buttons. Click event on each
button would set (a TPageControl instance).ActivePageIndex := [0,2,3,4]
respectively.

(Off course there should be skin manager and skin provider as well.)

Now run the program, click on each button on the form, active page
changed, but the TButtons inside each active page do not get skinned.

Now, click on the page control tab, child TButtons get skinned!

Would you please have a look at this bug?

Thank you and best regards.

Insfin Australia.

PS: I have searched through the forum, and there is no similar
problem reported yet.

[Insfin from Australia]

Hi,

I should mention that we do know TsPageControl would eliminate this problem.

But TsPageControl does not have the ability to hide all tab buttons. The
control we are using is JCL TJvPageControl. It and TPageControl suffer the
same problem that I have outlined above.

Regards,

Insfin Australia.

[Support]

Hello
Please try an attached demo, there is my unsuccessful attempt to reproduce a problem with standard TPageControl. Where I'm wrong?
Also I have added 'Change tabs visibility' button where is shown how a tabs may be hidden in standard PageControl (is working with TsPageControl too)…

[Insfin from Australia]

Hi Serge,

Thank you very much for looking into this. We appreciate it very much.

We are also very impressed with the level to details you provided for
this particularly query.

But the problems are still there.

I forgot to mention that we are using Delphi Enterprise Version 6.0
build (6.240) Update Pack 2.

And as mentioned previously Alpha commercial version 6.42.

We are able to also build the demo you provided, and indeed it has
no problems. But please have a look at the attached demo.

Please follow our descriptions step by step:

1. Please start P01.exe

2. Please click on the “Config Editor” button

3. On the “Configuration Editor” dialog that pops up, you will see
four buttons on the left hand side (LHS).

4. Please click on the “Profile” button on the LHS,
you will see that the “Change” button on the Profile tabsheet
is not skinned.

5. Similarly, if you click on the “Tools” button on the LHS,
you will see the list view and three buttons are not skinned.

6. The same goes for “Web Sites” button on the LHS.

Now, shut down P01.exe and restart it again, and bring up
“Configuration Editor” dialog, this time, please click on the
tab buttons on top.

All controls are skinned as they are supposed to.

Very strange!

Would you please kindly investigate this?

We appreciate your helps very much Serge.

Best regards.

Be Hai Nguyen

[Support]

Hello and thank you for demo, I'll try it today or tomorrow.

[mrdutchie]

QUOTE (Support @ Aug 12 2009, 10:34 AM)

Hello
Please try an attached demo, there is my unsuccessful attempt to reproduce a problem with standard TPageControl. Where I'm wrong?
Also I have added 'Change tabs visibility' button where is shown how a tabs may be hidden in standard PageControl (is working with TsPageControl too)…

tried downloading this, to see what it looked liked. BUT there is a Virus in it

9/2/2009 7:32:39 PM http://www.alphaskins.com/forum/index.php?…ol/Project1.exe

Detected: Virus.Win32.Induc.a

[Support]

QUOTE (mrdutchie @ Sep 3 2009, 03:34 AM)

Detected: Virus.Win32.Induc.a

You are right, I'm sorry. Virus was killed now.

Insfin from Australia, please try latest release of AlphaControls, problems must be solved there.

[Insfin from Australia]

Hi Serge,

We did not try 6.43. We have just tried 6.44. And indeed the problem has been fixed.

Thank you and best regards.

[Author]

Posts