FoxPro for Windows界面设计的小技巧

Author: 广西 韦 建 Date: 1996-12-20

        一、建立立体面板
        Windows应用软件中常出现一些立体感极强的操作面板,比起那些枯燥的方框窗口,自然不能同日而语。FoxPro虽然无此专项功能,但我们可以利用大尺寸的下推按钮制作立体面板的基板。
        下推按钮语句格式如下:
        @<坐标>GEt<变量>FUNC "*" SIZE<高度,宽度> WHEN <逻辑表达式>
        坐标:下推按钮的左上角坐标。
        FUNC:建立下推按钮。引导中的“*”是定义一个下推按钮;若引导中还包含字符串,如“*下推按钮”,则该按钮上将显示“下推按钮”的字样。
        SIZE:定义下推按钮的尺寸。高度值与行坐标之和及宽度值与列坐标之和均不能超过限值(该限值随分辨率及Windows版本而异)。
        WHEN:定义该下推按钮在遇到READ时是否有效。若表达式值为真,则有效;表达式为假,则无效。无论是否有效,该下推按钮都将出现在屏幕上。
        建立一个有立体感的基板,可以用如下语句:
        a=0
        @10,12 get a func "*" size 10,20 when a=1
        其中WHEN子句是为了使该按钮永久作为一个基板,而不会被程序当作一个按钮(a永远不会等于1)。
        二、完善立体面板
        仅有一个立体但单调的基板是不够的,我们还可以通过FoxPro中有关图形、画线的功能来建立一个有很强层次感的立体面板。
        1.图形按钮。这是FoxPro的功能,并不是什么小窍门,但由于许多FoxPro的书都忽略了对它的介绍,有必要介绍一下。
        建立方式同下推按钮,不同之处是FUNC的定义。将引号中的“*”改为“*B<位图文件名>”即可。如
        b=0
        @ 12,20 get b func "*B c:\windows\cars.bmp" size 3,6
        即可建立一个有小汽车图案的下推按钮。你还可以用该语句同时建立多个按钮,这些图形名称要包含在引号中并用冒号间隔开;还可以在“*B”后跟“H”参数或“V”参数来使按钮横向排列或纵向排列。
        FoxPro提供了许多供下推按钮使用的图案,如各种箭头、实用小图象等,你若觉得不够用,还可以用画笔做一些。
        2.凹槽。把姓名、学历之类的文字放在凹槽之中,无疑比直接显示在基板上顺眼多了。凹槽的制作很简单,只需要两条深色的和两条白色的直线。画线的语句格式如下
        @ <坐标1> TO <坐标2> COLO RGB(n1,n2,n3) PEN n
        PEN:定义线的宽度。n值为0-6,分别代表极细至6点的宽度。
        输入以下语句:
        @16,20 to 18,20 colo rgb (255,255,255) pen 2 &&左线,白色
        @18,20 to 18,30 colo rgb (255,255,255) pen 2 &&下线,白色
        @16,20 to 16,30 colo rgb (0,0,0) pen 2 &&上线,黑色
        @16,30 to 18,30 colo rgb (0,0,0) Pen 2 &&右线,黑色
        这样,基板上就出现了一个凹槽了,然后就将文字放在其中。不过切记,如果四条线的颜色弄反了,就会变成一个凸台了。
        如果用屏幕设计的方法进行上述设计将更简单,这里不再赘述。(广西   韦  建)