|
利用Authorware制作几何课件时，.我们经常需要画虚线，但Authorware并没有提供画虚线的工具，怎样画虚线呢？在此介绍两种方法。
利用图形工具箱画虚椭圆
用椭圆工具画出椭圆，再用矩形工具画一长约等于椭圆长轴长、宽稍大于椭圆短半轴的矩形，将矩形移去遮住椭圆的上半部分。
选择矩形（注意只选择矩形），双击直线工具，打开线形工具箱，点击最顶上的线形（无线，去除矩形边框）；双击矩形工具，打开填充模式工具箱，选择第二行中的第二或第三种填充图；双击绘图工具箱中的选择工具，打开遮蔽方式工具箱，选择透明方式；双击椭圆工具，打开颜色工具箱，设置此矩形的填充色与展示窗口的背景色相同，此时便可见到上半部分为虚线的椭圆了。为图形移动的需要，此时最好将椭圆与矩形组合。
这种方法的基本要点是叠加，但要注意叠加图形的线型、遮蔽方式、填充模式及填充颜色等因素。
用函数做虚直线
原理：将一条直线等分为若干段，利用直线的定比分点坐标公式求出各分点的坐标，从第一段起，交替采用前景色和背景色来画前后两段，则可画出虚直线。
方法：在流程线上添加一运算图标，双击该图标，输入下面这段程序，运行该图标可在展示窗口中从（x1,y1）到(x2,y2)画一条虚直线。
--画虚直线程序.
--参数：
p:=40 --将直线分成的段数
x1:=50 --起点坐标
y1:=100
x2:=450 --终点坐标.
y2:=400
xk:=1 --线宽
fc:=RGB(255,0,0) --前景色
bc:=RGB(255,255,255) --背景色 |
--语句：
Line(xk,x1,y1,x1,y1) --产生LastX和LastY
repeat with i:=1 to p-1
b:=1/(p-i) --分点的定比
xc:=(LastX+b*x2)/(1+b) --分点坐标
yc:=(LastY+b*y2)/(1+b)
if i/2＜＞INT(i/2) then --判断前后段，交替设置为前景色和背景色
SetFrame(1,fc)
else
SetFrame(1,bc)
end if
Line(xk,LastX,LastY,xc,yc)
end repeat |
用程序作虚线时，利用系统变量LastX和LastY可极大地优化程序。将上述程序所属的运算图标放入自己的库，需要时调用之，根据要求修改参数即可画出满足要求的虚直线。
| 
设为主页
收藏本站
相关文章:
