三。创建主菜单：例：建立一个简单的菜单 1.打开"菜单设计器"1 d* L3 e# x2 f
2.在"菜单名称"输入第一个菜单项的名称"浏览工资情况",在"结果"列表中选"过程",然后单击右侧的"创建",在弹出的代码窗口中输入如下代码：: I+ ?+ E" U2 c0 G9 k5 l9 X
set default to e:\myvfp
5 t1 ]/ a( y1 t/ b; |8 C if !used("工资情况") &&如果"工资情况"表没打开，打开它;如果已经打开，则选择它
4 b) E( M; y7 J use 工资情况
; g3 D5 ~- }% K% H+ ^, k else
, H# j+ f# I1 r0 k0 F2 O: s+ R select 工资情况
+ O! K# H0 Q: ~$ p% a endif
1 f+ ~. ^4 h1 {' Z browse
9 W& R' V5 C/ R) ^ return
8 Y+ B0 g" E" j6 I 3.同样方法，建立第二个菜单项，名为"浏览职工档案","结果"列表中选"过程",过程代码为：
- g* \: m) P9 u0 o( [' Z p set default to e:\myvfp
( i9 q( L7 v5 Z9 B$ I& o if !used("职工档案") &&如果"职工档案"表没打开，打开它;如果已经打开，则选择它 \% i& H+ l0 z1 p/ @9 @3 t" E
use 职工档案+ A- ?' C- p% W& y& W
else
8 K' p9 x+ S# r0 \ select 职工档案
) ]- S! |' R0 w% s endif3 p. O) L6 B. U8 Q5 A& f
browse
$ S" I- ?2 ~! I return
! r% u6 [- D5 h& @% | 4.菜单定义完毕后，回到菜单设计器界面，如图68,
* R4 ~4 Z3 B6 @% j. g h. B
; M$ j8 S; j! R3 s 单击VFP系统菜单中的"菜单",选择"生成"命令，此时弹出"生成菜单"对话框，如图69所示，
, Q# Q( D; x$ b4 @) t , `$ t% K1 F, ^3 i9 I
在对话框中单击生成按钮，系统自动生成这个菜单的程序代码，并以扩展名。mpr存盘。此时，单击菜单设计器中的"预览"按钮，即可预览设计好的菜单。
' B: {* J9 f, q 四。执行自定义的菜单：在命令窗口中输入命令：do 菜单1.mpr,如果是在项目管理器中，选择要运行的菜单文件，单击项目管理器中的"运行"按钮即可。
+ p) N) ]) a* m" F 执行菜单后，新的菜单将替换系统菜单，如图70所示$ K" @1 v$ A- T5 m+ W Q7 D; O
 4 w* A1 V2 g( h3 x# ~5 @
如果要恢复系统的主菜单，可以命令窗口执行如下命令：8 O$ \$ g. s5 R
set sysmenu to default% W$ c8 s) {5 N; \& C8 t4 m+ a+ \
1.使用项目管理器：打开项目管理器后，选择"全部"或"其他"选项卡，"文件"类型选"菜单",单击项目管理器中"新建"按钮，在弹出的"新建菜单"对话框中，选"快捷菜单"命令，如图64% j; @9 K6 r3 _6 C2 F0 {! A- i
e w6 {& ?9 N) y 2.弹出的"快捷菜单设计器"使用方法与"菜单设计器"的使用方法相同，这里不再多述。( b }$ s. q3 R4 n; D
3.创建并生成快捷菜单后，可将其附加到对象中，这样，当用户右击对象时，即会显示快捷菜单。
& q$ l, v- ^! M 4.将快捷菜单附加到对象中的步骤：
4 f' R1 e9 L3 u1 m (1)选择要附加快捷菜单的对象(例如，表单或表单上的某个控件，比如命令按钮)
7 L! h2 k5 z4 G (2)在"属性"窗口中选择"全部"或"方法程序"选项卡，再选择"rightclick event"项(即右击事件)
: J' T* W5 e/ r ?: B( k! ? (3)双击"rightclick event"项，在弹出的代码窗口中输入"do right.mpr"命令(假设我们刚才设计并生成一个名为right.mpr的快捷菜单)5 s- u8 E( t t; E
(4)运行时，右击此对象，即会弹出快捷菜单 |
发表于 2012-7-31 22:17:54
/ w+ C1 f8 X$ L1 z' \
楼主
