>I am trying to set a specific colour on a PageFrame current tab so that it is easily identified when I change tabs.
>(e.g. I want all tabs to be grey, except the current tab which I want Red)
>
>I would like to do this at the class level. So I set up an _assign method attached to the active page event. Now this works fine if I programatically change the Page , but not if I just select a tab by clicking on it.
>Is there maybe another way to have this functionality, at the class level.?
>
>Regards,
>
>Gerard

---

Hi Gerard,

I don't think there is a way you can do this directly.
But why not make a workaround for this.
Create a custom label class.
In that class place something like

LPARAMETERS lEnable          &&   Red      Gray
This.Parent.BackColor = iif(lEnable,RGB(...),RGB(...))

Then in the init event of the pageframe place something like this

Local lnTel
For lnTel = 1 to this.PageCount
  This.Pages(lnTel).Addobject('lblColor','colorclass')
EndFor

I hope this may help you,