× Linguagem de Programação ADVPL

Perguntas TComboBox armazenar o valor selecionado, TGet armazenar o valor digitado

Mais
9 anos 11 meses atrás #26276 por dgs
Olá sou um programador mirim kkkss em ADVPL, tenho uma grande dificuldade em achar código fonte em ADVPL "programação na unha", tipo criar uma tela customizada alem do site tdn.totvs.com/ , vejo que a maioria é só chamada de métodos, alguém pode me indicar um site ?
Vamos lá, minha duvida é, gostaria de armazenar numa variável o valor do TGet "textbox" o que foi digitado e o do TComboBox "combox" o valor que foi selecionado. Obrigado :S
//
cTGet1 := TGet():New( 010,090,{||cTGet1},oDlg,100,010,;
"@!",,0,,,.F.,,.T.,,.F.,,.F.,.F.,,.F.,.F.,,cTGet1,,,, )
//
@050,090 MSCOMBOBOX aCombo VAR vItems ITEMS vCombo SIZE 100,10 OF oDlg PIXEL
vCombo := {}
vItems := space(15)
dbSelectArea("SA3")
dbSetOrder(2)
dbSeek(xFilial("SA3")+A3_NOME,.T.)
DO WHILE !EOF().AND.A3_Filial==xFilial("SA3")
AADD(vCombo , SA3->A3_NREDUZ )
vItems := IIF(EMPTY(vItems) , SA3->A3_NREDUZ , vItems )
ObjectMethod(aCombo,"SetItems(vCombo)")
dbSkip()
ENDDO

Por favor Acessar ou Registrar para participar da conversa.

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