海信家电”换帅 “ 高玉玲接替代慧忠出任新任董事长
2024-11-22
利用Authorware制作几何课件时,.我们经常需要画虚线,但Authorware并没有提供画虚线的工具,怎样画虚线呢?在此介绍两种方法。
利用图形工具箱画虚椭圆
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可极大地优化程序。将上述程序所属的运算图标放入自己的库,需要时调用之,根据要求修改参数即可画出满足要求的虚直线。
评论 {{userinfo.comments}}
{{child.content}}
{{question.question}}
提交