Messages
Reply
Edit
Delete01:45 am
3OT03RXF2
| From: | Thierry Nivelet (FoxInCloud) |
| To: | Tuvia Vinitsky |
What I have done so far is I have unselectedm the prope wlactivepagecolors/wlactivepagehighlight/wnactivetabraise/wntabmargin props and set them back to defauklts.
After I did that, the pageframe and tabs look "normal", although of course without those settings. I can draw the tabs in CSS , but that does not give me the ability to access the "active" tab like wlactivepagecolors/wlactivepagehighlight/wnactivetabraise does. Please advise any suggestions.
I was wondering it maybe I should re-try the pag.activate code to vchange clors without the wlactivepagecolors/wlactivepagehighlight/wnactivetabraise props set. Could there be a conflict amongst those new props?
BTW, I saw how you accessed the disabled tabs in CSS - terrific! Since all the user sees is the tab, changing the "page" color changes the tab it seems. I refer to this line:
#dtcform_scx-pageframe_1 *[disabled="disabled"], #dtcform_scx-pageframe_1 *[disabled="disabled"] * {color:grey;}
But back to the topic, KI am guesing there is some conflict between those 4-5 pageframe properties.
Also, the height of tabs where enabled=.f. is always drawn only a few pixels high. It does not matter if the other tabs are drawn with FiC default or with specific size.
Not even close. Also the tabs start out raising and displaying poperly, but after switching to any other than the iniial tab, all the tab fonts revert to a small font and stay that way and no more special effects. I have
wlactivepagecolors = .t.
wlactivepagehighlight=.t.
wnactivetabraise = 2
wntabmargin=2
pgf.init:
IF NOT thisform.wlHTMLgen
*this.ActivePage = 1
this.Pages[1].activate()
RETURN DODEFAULT()
ENDIF
in each page.activate:
IF m.thisForm.wlHTMLGen
RETURN .T.
ELSE
THIS.PARENT.setAll('BACKCOLOR', RGB(116,189,46) , 'PAGE')
THIS.BACKCOLOR= RGB(255,255,255)
ENDIF
But when it loads I get this (two tabs are disabled):
Then when I click on the middle "leave info" tab I get:
should be close to that
PROCEDUREpageframe.Initthis.Pages(1).ActivatereturnDoDefault()ENDPROCPROCEDUREpageframe.somePage.activateIF m.thisForm.wlHTMLGen RETURN .T.ELSETHIS.PARENT.setAll('BACKCOLOR', inactivePageRGB, 'PAGE')THIS.BACKCOLOR=activePageRGB ...ENDIFENDPROC
Still unclear what code goes in pgf init to get that appearance.
Thierry Nivelet (FoxInCloud)
Never explain, never complain (Queen Elizabeth II)