【文件属性】:
文件名称:鼠标输入-电子-增量式光电编码器与单片机的接口设计
文件大小:5.58MB
文件格式:PDF
更新时间:2021-06-07 21:36:11
Intel Visual Fortran
4.5 鼠标输入
在 QuickWin应用程序中,当用鼠标点选菜单、点击窗口控制按钮或窗口中的控件时,
系统自动捕获鼠标事件,并执行相应的命令。但在子窗口客户区产生的鼠标事情,系统并不
自动捕获,需要编程来捕获,以代替键盘输入或对窗口内的文本、图形进行操作。
鼠标属于异步设备,在程序执行的任何时候用户都可点击鼠标。当产生鼠标事件时,
Windows系统向应用程序发送鼠标消息,应用程序接到消息后执行相应的动作,这是常用的
Logical(4) Function InitialSettings()
Use IFQWin
Use NewPlotMod
Implicit None
Logical(4)::i4
!组织文件菜单
i4 = AppendMenuQQ(1,$MENUENABLED,'文件(&F)'C,NUL)
i4 = AppendMenuQQ(1,$MENUENABLED,'保存(&S)'C,WINSAVE)
i4 = AppendMenuQQ(1,$MENUENABLED,'打印(&P)'C,WINPRINT)
i4 = AppendMenuQQ(1,$MENUENABLED,'退出(&X)'C,WINEXIT)
!组织编辑菜单
i4 = AppendMenuQQ(2,$MENUENABLED,'编辑(&E)'C,NUL)
i4 = AppendMenuQQ(2,$MENUENABLED,'选择文本(&T)'C,WINSELECTTEXT)
i4 = AppendMenuQQ(2,$MENUENABLED,'选择图形(&G)'C,WINSELECTGRAPHICS)
i4 = AppendMenuQQ(2,$MENUENABLED,'全选(&A)'C,WINSELECTALL)
i4 = AppendMenuQQ(2,$MENUENABLED,'复制(&T)'C,WINCOPY)
i4 = AppendMenuQQ(2,$MENUENABLED,'粘贴(&P)'C,WINPASTE)
!组织绘图菜单
i4 = AppendMenuQQ(3,$MENUENABLED,'绘图(&P)'C,NUL)
i4 = AppendMenuQQ(3,$MENUENABLED,'正弦(&S)'C,PlotSin)
i4 = AppendMenuQQ(3,$MENUENABLED,'余弦(&C)'C,PlotCos)
InitialSettings = .True.
End Function InitialSettings