晕，还是在vfp 中关于页框的问题

首先感谢上次 TonyDeng老师为我解惑！


新建的一个页框（Pageframe1），将pagecount设置为3，则共有一个页面，
在init里写下如下代码：
LOCAL tmp_a1
FOR tmp_a1=1 TO this.PageCount
    this.Pages(tmp_a1).backcolor=rgb(255,0,0)
ENDFOR
将XP主题模式关掉后：已基本实现了我所希望的目的！
但新的问题又出现了！

在页框中的其他控件！假如：shape

只有在第一个页里面的背景色设置有效！其他页的shape等控件的背景色都是系统默认的颜色！
怎么会这样？所有页设置都一样啊！！！！！！！！！

你设的是Page的背景色，不是其中控件如shape的背景色，两者又不必然关联，你可以主动让它们相同的嘛。

shape的背景色分别设一下

如上图
我在表单上设置的shape、listbox和页框中设置是一样的
在表单上的背景色显示出来了，而在页框中的背景色仍是系统默认的颜色！！！！！！！！！！

我想把所有的颜色都保存为一个变量，这个颜色变量可以由用户自己设置！
可通过改变这些变更，来改变所有控件的各类颜色！

如果是我做，并不需要用shape，而且不也是很明白你要哪些控件的颜色是跟背景的。

上传了其中的一部分，还请高手多指点一下
运行表单之前，需要先执行一下 f_color.prg
用于定义颜色变量！