ACTIVATE POPUP shortcut on foxpro

Question

У меня есть данные из sql-сервера, а затем я должен ввести кнопку, чтобы она отображалась в виде меню. Я использую

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 

Теперь, как я узнаю, могу ли я выбрать данные, он определит, что я нажимаю эти данные.

но если я нажимаю выбранные данные, он не будет появляться, как эта

Answer 1

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