- Fórum
- Protheus/Microsiga/Totvs
- AdvPL (Advanced Protheus Language)
- Dúvidas Gerais
- Duvida Criação de Tela
×
Linguagem de Programação ADVPL
Perguntas Duvida Criação de Tela
- kanaamlrr
- Desconectado
- Membro Platina
Menos
Mais
- Postagens: 1576
- Obrigados Recebidos: 4
11 anos 6 meses atrás #13354
por kanaamlrr
Respondido por kanaamlrr no tópico Duvida Criação de Tela
Adiciona mais um botão ai, ou se preferir, adiciona o msselect na parte inferior.
Acho que o botão fica mais estético.
Coloca o botão, declara sua tela com o objeto oDlg com nome diferente e a variável de retorno tem que declarar como private antes da 1ª tela, assim você consegue usar no resto.
Acho que o botão fica mais estético.
Coloca o botão, declara sua tela com o objeto oDlg com nome diferente e a variável de retorno tem que declarar como private antes da 1ª tela, assim você consegue usar no resto.
Por favor Acessar ou Registrar para participar da conversa.
- henry.charriere
- Autor do Tópico
- Desconectado
- Membro Platina
Menos
Mais
- Postagens: 492
- Obrigados Recebidos: 0
11 anos 6 meses atrás - 11 anos 6 meses atrás #13379
por henry.charriere
Respondido por henry.charriere no tópico Duvida Criação de Tela
Kanaãm,
Muito obrigado bicho! Tudo que vc me explicou até agora consegui fazer.
Me ficou 2 dúvidas.
Tenho essa parte do código que chama a tela de vendedores escolhidos:
oSay4:= tSay():New(92,010,{||"Vendedores:"},oDlg,,oFont12,,,,.T.,CLR_BLUE,CLR_RED,50,10)
oGet6:= TGet():New(92,045,{|u| if(PCount()>0,cGet6:=u,cGet6) } , oDlg, 70,10,"@!",,,,,,,.T.,,,,,,,,,,"cGet6")
oButton2:=tButton():New(92,116,"&...",oDlg,{||Processa({||U_TestSelec()},"Aguarde...","Processando...")},9,10,,,,.T.)
oget6 := oButton2
Está funcionando está chamando tranquilo.
Perguntas.
1 - Como faço para o retornou ir para oGet6 ?
2 - Se eu chamar a tela de vendedores mais de 1 vez da erro, como posso resolver isso?
Agradeço pra muito a ajuda!
Henry
Muito obrigado bicho! Tudo que vc me explicou até agora consegui fazer.
Me ficou 2 dúvidas.
Tenho essa parte do código que chama a tela de vendedores escolhidos:
oSay4:= tSay():New(92,010,{||"Vendedores:"},oDlg,,oFont12,,,,.T.,CLR_BLUE,CLR_RED,50,10)
oGet6:= TGet():New(92,045,{|u| if(PCount()>0,cGet6:=u,cGet6) } , oDlg, 70,10,"@!",,,,,,,.T.,,,,,,,,,,"cGet6")
oButton2:=tButton():New(92,116,"&...",oDlg,{||Processa({||U_TestSelec()},"Aguarde...","Processando...")},9,10,,,,.T.)
oget6 := oButton2
Está funcionando está chamando tranquilo.
Perguntas.
1 - Como faço para o retornou ir para oGet6 ?
2 - Se eu chamar a tela de vendedores mais de 1 vez da erro, como posso resolver isso?
Agradeço pra muito a ajuda!
Henry
Ultima edição: 11 anos 6 meses atrás por henry.charriere.
Por favor Acessar ou Registrar para participar da conversa.
- kanaamlrr
- Desconectado
- Membro Platina
Menos
Mais
- Postagens: 1576
- Obrigados Recebidos: 4
11 anos 6 meses atrás - 11 anos 6 meses atrás #13392
por kanaamlrr
Respondido por kanaamlrr no tópico Duvida Criação de Tela
Então, para atribuir o retorno, é só você atribuir a sua string de vendedores na variavel private cGet6
Outra coisa, tira a linha
oget6 := oButton2
dessa forma você está sobrepondo o objeto, pode ser uma das causas do erro.
no final da sua tela de vendedores, fecha o alias TTRB, ele deve estar dando pau quando entra na segunda vez pois já está em uso.
Tenta ai e ve o que rola, se continuar com o erro quando abrir mais de uma vez a tela, posta o erro ai que eu vejo se sei o que é.
Valeu!
Outra coisa, tira a linha
oget6 := oButton2
dessa forma você está sobrepondo o objeto, pode ser uma das causas do erro.
no final da sua tela de vendedores, fecha o alias TTRB, ele deve estar dando pau quando entra na segunda vez pois já está em uso.
Tenta ai e ve o que rola, se continuar com o erro quando abrir mais de uma vez a tela, posta o erro ai que eu vejo se sei o que é.
Valeu!
Ultima edição: 11 anos 6 meses atrás por kanaamlrr.
Por favor Acessar ou Registrar para participar da conversa.
- Fórum
- Protheus/Microsiga/Totvs
- AdvPL (Advanced Protheus Language)
- Dúvidas Gerais
- Duvida Criação de Tela
Tempo para a criação da página:0.096 segundos