在foxpro上激活POPUP快捷方式

时间:2016-10-14 07:02:52

标签: menu foxpro popupmenu

我有一个来自sql server的数据,然后我将一个按钮显示为菜单。我正在使用

SCAN FOR NVL(pkcustempvenid,0) != 0

    SCATTER MEMVAR FIELDS cevname

        lnBarNo = lnBarNo + 1
        lcTempName = cevname

         DEFINE BAR lnBarNo OF shortcut PROMPT ALLTRIM(cevname)

         On Selection Bar lnBarNo Of shortcut ;
            lnBarNo=Bar()


ENDSCAN 

ACTIVATE POPUP shortcut

现在我怎么知道如果我选择一个数据,它将确定我点击该数据。

enter image description here

但如果我点击所选数据,它将不会像这样显示

enter image description here

1 个答案:

答案 0 :(得分:0)

on selection bar lnBarNo of shortcut messagebox(prompt())