微信公众号 
图码生活

每天发布有五花八门的文章,各种有趣的知识等,期待您的订阅与参与
电脑报 1992-2001 十年文章全集
电脑报 1992-2001 十年文章全集
包含从 1992 年 - 2001 年间,两万余篇期刊文章,查询最少输入两个字符
随便看看
读取中
读取中
标题FoxPro for Windows界面设计的小技巧
栏目软件操作与技巧
作者广西 韦建
发布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 &&右线,黑色
  这样,基板上就出现了一个凹槽了,然后就将文字放在其中。不过切记,如果四条线的颜色弄反了,就会变成一个凸台了。
  如果用屏幕设计的方法进行上述设计将更简单,这里不再赘述。(广西  韦 建)