usando ListBox

[bencz]

Olá, bom dia.

Gostaria de saber, como posso fazer para usar o ListBox.... pois, qnd eu aperto Enter, para escolher a opção q eu escoli no list box, nada acontece, nao consigo fazer nada, a unica forma q estou conseguido usar o listbox, é com o double click do mouse...

Código: Selecionar todos

@ 3,2 GET LISTBOX oList1 VAR vList1 ;
        ITEMS {[Ajuda - 1],"Ajuda - 2","Ajuda - 3","Ajuda - 4"} SIZE 360,362   
        oList1:Anchor := 15 

nesse código, deixei sem o comando do double click...

[Pablo César]

Não trabalho com hwgui, mas será que não dá para definir com:

ON KEY RETURN ACTION funcao_seleciona()

[bencz]

Bom, acabo de tentar.... e nao funcionou :/

[Imatech]

Leitura de Arquivios Header tambem é excelente fonte de informação

Código: Selecionar todos

ON KEYDOWN {|o, nKey| If( nKey == K_ENTER , MsgInfo("Agora implemento alguma coisa aqui..."), .T. ) }

[sygecom]

Seria bom postar o exemplo completo para ver o que você está tentando fazer...aqui funciona.

[bencz]

Desculpa pela demora ;x

mas a solução é simples...

Código: Selecionar todos

ON KEYDOWN {|o, nKey| If( nKey == 13 , ::call(), .T. )  }

Obrigado (: