× Linguagem de Programação ADVPL

Perguntas Pegar conteúdo do listbox

Mais
10 anos 11 meses atrás #19255 por RonaldoLopes
Bom dia, estou precisando pegar o valor do item seleciona de um listbox via double click.
A posição eu consigo pegar, mas o seu valor não.
Obrigado

Por favor Acessar ou Registrar para participar da conversa.

Mais
10 anos 11 meses atrás #19307 por THALESCOTR
Respondido por THALESCOTR no tópico Pegar conteúdo do listbox
Bom dia Ronaldo,
segue um exemplo de como pegar o valor selecionado.

Private oQual
Private cVarQ
Private aArq := {}

AADD(aArq,"000000","Teste")
AADD(aArq,"000001","Teste2")
AADD(aArq,"000002","Teste3")

@ 30,20 LISTBOX oQual VAR cVarQ Fields HEADER "Código", "Descrição" SIZE;
273,090 OF oDlg PIXEL

oQual:SetArray(aArq)
oQual:bLine := { || {aArq[oQual:nAt,1],aArq[oQual:nAt,2]}}
oQual:blDblClick := {||TesteMsg()}
oQual:Refresh()


Static Function TesteMsg

For Nx:=1 To Len(aArq)
If Nx == cVarQ
msgAlert("Código: "+aArq[Nx][1]+" Descrição: "+aArq[Nx][2])
EndIf
Next Nx

Return


Att
Thales

Por favor Acessar ou Registrar para participar da conversa.

Tempo para a criação da página:0.104 segundos
Joomla templates by a4joomla