Backcolor for Page on page frame 3

• Mar 28, 2007

1
• #2

GriffMG

Programmer

Mar 4, 2002

6,309

FR

I don't know why yours isn't working, but mine works if I use RGB() instead of a regular number:

Code:

** make my background color red
thisform.pageframe1.page2.BackColor = rgb(255,0,0)
thisform.Refresh()

Is it possible that you have some contrary code in your refresh() method?



Regards

Griff
Keep [Smile]ing

 

Upvote 0 Downvote

• Mar 28, 2007

• Thread starter
• #3

FoxEgg

Programmer

Mar 24, 2002

749

AU

Well I don't get it Griff.. but I tried your code and it worked

I then re tried with the color picker... and it worked again

Bloody Hell Mate


I will need to try again tomorrow in the morning at work.... but whatever RGB does it worked...

I will advise

JF

 

Upvote 0 Downvote

• Mar 28, 2007

• #4

GriffMG

Programmer

Mar 4, 2002

6,309

FR

Magic fairy dust!

Do you have any thoughts on my doevents thing?

(Perhaps you have some magic dust of your own?)

B-)

Regards

Griff
Keep [Smile]ing

 

Upvote 0 Downvote

• Mar 28, 2007

• Thread starter
• #5

FoxEgg

Programmer

Mar 24, 2002

749

AU

I will read all about do events... another hole (black hole) in my knowledge.

JF

 

Upvote 0 Downvote

• Mar 28, 2007

• #6

dgrewe

MIS

Dec 1, 1999

1,285

US

FoxEgg,
There is a problem with the PageFrame refreash, I Can not remember when they fixed it Version 8 or 9. But the Pages of a page frame do not refreash with a Thisform.Refreash() call. The Pages had to be called individually to refreash.

In the Refreash of the page frame place this code someplace,

.....
FOR i = 1 TO THIS.PageCount
THIS.Pages.Refresh()
ENDFOR
.....

That will make each page refreash then the Main Page does. Not needed in Version 9.


David W. Grewe (Dave)

 

Upvote 0 Downvote

• Mar 28, 2007

• #7

ilyad

Programmer

May 9, 2003

251

US

I don't think you need this code. Why do you have to refresh each page and not the active page only? Though I believe we recently discussed this, I just forgot where.

Anyway, for pages to change their color you have to set Themes off.

Also there is a great blog by Cesar Chalom at

http://weblogs.foxite.com/cesarchalom/archive/2007/02/16/3291.aspx

 

Upvote 0 Downvote

• Mar 28, 2007

1
• #8

Mike Lewis

Programmer

Jan 10, 2003

17,509

Scotland

I don't know if this is relevant, but keep in mind that a page frame's BackColor is only visible if the page's Themes is .F.

There are also some issues with the transparency of a page - you can't change the BackStyle when the page frame's Tabs is .T.

Mike


__________________________________
Mike Lewis (Edinburgh, Scotland)

My Visual FoxPro site: www.ml-consult.co.uk

 

Upvote 0 Downvote

• Mar 28, 2007

• Thread starter
• #9

FoxEgg

Programmer

Mar 24, 2002

749

AU

OK.. now here is something that has knocked my socks off...

What I did was went home and used XP Remote Desktop to hook up to work (both machines are running XPPro)...

The REMOTE VIEW of the WORK Machine demonstrated proper behaviour (That is I could make the page of the pageframe change colour with either bit of code above).

Now I am back at work .. sitting at the actual work machine and the Page Frame colour will not change with either bit of code... or with a SYS(2700) command.

So does this mean it is an XP thing ???

I have tried _SCREEN.Themes = .T.

and checked that MESSAGEBOX(SYS(2700)) returns 1

and the command SYS(2700,1)

So Pageframe backcolor works when I look with Remote Desktop but doesn't work when am sitting amy workstation...

Any help appreciated

JF

 

Upvote 0 Downvote

• Mar 28, 2007

1
• #10

white605

Technical User

Jan 20, 2003

394

US

from:

http://www.foxdevsd.org/ftp/Newsletters/Newsletter_2005_08.txt

THE TROUBLE WITH THEMES by Dan Covill
You can set Themes off for a grid, a pageframe, or a form, but the simplest solution is to set _screen.Themes = .F. at the beginning of your application. That says "Hands Off!" to XP, and everything works the way God intended.

 

Upvote 0 Downvote

• Mar 28, 2007

• Thread starter
• #11

FoxEgg

Programmer

Mar 24, 2002

749

AU

Thanks White-ster and Mike

It would have been nice if I read Mike Lewis' post a bit more closely.... As I wrote I wrote

_screen.Themes = .T.

Oh Doh !!!!

Once it was written clearly I got the message... it worked with

_screen.Themes = .F.


Thanks to All (I think problem solved)

FoxEgg

 

Upvote 0 Downvote

• Mar 29, 2007

• #12

ilyad

Programmer

May 9, 2003

251

US

Didn't I also tell the same as Mike?

 

Upvote 0 Downvote

• Mar 29, 2007

• Thread starter
• #13

FoxEgg

Programmer

Mar 24, 2002

749

AU

Yes Sorry Ilyad.. You did...

It looks like I didn't appreciate the tips when they were give... my VFP ignorance...

Thanks to you all for the input....

Just a thought in passing...

If I understand it correctly that this is a XP Pro 'THING'... Can I ask, is there a switch somewhere in XP Pro that I can set to avoid the need for the _screen.Themes = .F.

My home computer VFP backcolor thing works without setting themes...

JF

 

Upvote 0 Downvote

• Mar 29, 2007

• Thread starter
• #14

FoxEgg

Programmer

Mar 24, 2002

749

AU

I have just ran

Code:

run>services.msc

and there is a 'Themes' section which I can stop..

Interestingly it is Running 'on ' on both computers... yet the performance on my work computer needs the _screen.Themes=.F. to make it work properly.

Mmmmm

JF

 

Upvote 0 Downvote

• Mar 30, 2007

• #15

TamarGranor

Programmer

Jan 26, 2005

2,479

US

You can't control whether your users are using Windows XP themes or older appearance schemes. What _Screen.Themes controls is what happens in VFP, which is all you should try for.

Tamar

 

Upvote 0 Downvote