VFP6.0中实现菜单特效

王守银 
2001年 45期

#1　　改变菜单的字体
　　　　使用菜单设计器设计出来的菜单，字体、字号都是相同的，如果需要改变某一菜单中某菜单项的字体和字号，可以作如下操作:
　　　　打开菜单设计器，在提示列表中，单击菜单下的一个菜单项，如文件菜单下的打开菜单项，单击该菜单项后面的选项按钮显示提示对话框，选择标题为跳过（K）文本编辑框，并在编辑框中输入以下命令:
　　　　.f. FONT “Courier New”，16 style “BI”
　　　　两次点击确认按钮返回到菜单设计器，这时选择系统菜单中的“菜单”中的“生成”，并运行菜单，现在的文件菜单中的打开菜单项的字体变得更大并且是粗斜体了。这样用户只要改变上面的命令参数，就可根据需要为不同的菜单项选择不同的字体、字号，以达到醒目和提示用户注意的效果。
　　#1　　为菜单项加入标记
　　　　在菜单中，有时根据需要在菜单项的左边加上一个复选标记“√”，用来表明此菜单项对应的功能正在使用，例如在VFP系统中当对表单进行编辑操作时，此时显示菜单下的表单控件工具栏，如果复选标记是“√”，则表示当前正在使用表单控件工具栏，如再次选择该菜单项，则标记消失，表单控件工具栏被取消。实现这种功能可以通过使用SET MARK OF命令为某一个菜单项设置复选标记，如为一工具菜单下的尺子菜单项设置复选标记，可将尺子菜单项的操作结果设为过程，并在该过程中写入如下命令:
　　　　IF!MRKBAR（“工具”，1）&&如果该菜单项没有设置标记
　　　　SET MARK OF BAR 1 OF 工具 TO .T. &&为该菜单项设置标记，1代表尺子菜单项在工具菜单中的位置，这里尺子为工具菜单中的第一项。
　　　　ELSE
　　　　SET MARK OF BAR 1 OF 工具 TO .F. &&取消该菜单项标记。
　　　　ENDIF
　　　　保存生成这个菜单，在运行时我们可以发现，当使用鼠标点击尺子这个菜单项时，可以方便地设置或取消该菜单项的标记。
　　
　　 
 