9.　如何实现电子画板功能

　　问：我想在课件运行时在画板上随意涂写，实现电子画板功能。请问我应该如何做呢？

　　阿鸣解惑：实现电子画板功能的方法如下：

　　
　　创建画板对象“画板_0”。在“属性箱/边框”选项卡中单击“填充设置”按钮。在“填充设置”对话框中设置画板的填充色为灰色。

　　执行菜单“页面/属性”命令，在“属性/变量表“选项卡中单击“创建变量”按钮，创建“整数型”变量“x1”、“x2”、“y1”、“y2”，“变量初值”均为“0”。创建变量“loop”，“变量类型”为“布尔型”，“变量初值”为“假”，如图.101所示。

图.101　创建页面变量

　　单击选中“画板_0”，在“属性箱/动作”选项卡中双击“鼠标按下”事件。在打开的“动作编辑”对话框中单击“赋值”按钮，为“画板_0”的“对象属性”赋值，并为变量“loop”赋值“1”，如图.102所示。

图.102　为变量赋值

　　
　　在“动作编辑”对话框中为变量“x1”赋值，单击“表达式”编辑框的“插入/插入函数”，在打开的“选择库函数”对话框中，“库函数类型”选择为“系统函数”，并单击函数列表中的“GetCursorPosX（）”选项，单击“确定”按钮。按同样的方法为“y1”赋值“GetCursorPosY（）”，如图.103所示。

图.103　选择系统函数

　　
　　单击“循环”按钮，选取“按条件循环”单选框。单击“插入/插入变量”，选择变量“loop”并单击“选择变量”按钮。

　　
　　单击“赋值”按钮，分别为变量“x2”和“y2”赋值“GetCursorPosX（）”和“GetCursorPosY（）”。单击“对象方法”按钮，设置“画板_0”的对象方法为“DrawLine”，参数为“x1,y1,x2,y2”，如图5所示。

图5　设置“画板_0”的对象方法

　　
　　单击“赋值”按钮，分别为“x1”和“y1”赋值“x2”和“y2”。单击“等待”按钮，在“等待时间”编辑框输入“5”，单击“确定”按钮，如图.105所示。

图.105　设置延时时间

　　
　　在“属性箱/动作”选项卡中双击“鼠标抬起”事件。为变量“loop”赋值“0”，单击“确定”按钮。

　　创建按钮对象“下推按钮_0”，编辑其标签为“擦除”。双击“属性箱/动作”选项卡中的“鼠标点按”事件，在打开的“动作编辑”对话框中单击“对象方法”按钮，设置“画板_0”的对象方法为“EraseAll”，单击“确定/确定”按钮。

　　执行菜单“控制/预演”命令观看效果，如图.106所示。

图.106　演示效果

文章页数:[1]