FoxPro/Visual FoxPro - popup

   
Vista:

popup

Publicado por hugo hugobaieli@yahoo.com (9 intervenciones) el 01/08/2014 04:48:17
hola, necesito un favor
trabajo con listas de datos usando get popup, todo bien, el tema es hay forma de saber
en que registro estoy sin hacer doble clik, solo al pasar por ensima ?
este es el ejemplo

use clientes
DEFINE POPUP XX FROM 3,0 in windows win2 PROMPT FIELD nombre MARGIN SCROLL shadows color 0/7*
zz=0
@ 9,8 GET zz POPUP XX FUNCTION "&T" SIZE 20,40
read cycle



gracias.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

popup

Publicado por Ernesto Hernandez (4632 intervenciones) el 01/08/2014 21:20:44
PROMPT '\<Bananas' MARK CHR(4) && Second item
DEFINE BAR 3 OF popFruits ;
PROMPT '\<Grapes' MARK CHR(5) && Third item
DEFINE BAR 4 OF popFruits ;
PROMPT '\<Lemons' MARK CHR(6) && Fourth item
@ 12,5 SAY 'Your choices:'
ON SELECTION POPUP popFruits DO yourchoice && Choice routine
ACTIVATE POPUP popFruits


PROCEDURE yourchoice && Executed when choice is made
@ 13,5 CLEAR
FOR gnCount = 1 TO CNTBAR('popFruits') && Loop for # of items
IF MRKBAR('popFruits', gnCount) = .T. && Option is marked,
? PRMBAR('popFruits', gnCount)+ " NUMERO"+ STR(GNCOUNT) AT 5 && display caption
ENDIF
NEXT
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar