Estou com problema no posicionamento de 4 campos sendo 2 de texto 2 de recebimento de informação no qual eles bagunçam dependendo da resolução

Resolvi o problema de posicionamento dos campos de texto, mas ainda estou com problema com os campos de recebimento de informações. Mesmo indicando uma posição fixa para eles, esses campos ficam desorganizados quando visualizados em diferentes telas.

User Function MT120TEL()

Local oNewDialog := PARAMIXB[1] Local aPosGet := PARAMIXB[2] Local aObj := PARAMIXB[3] Local nOpcx := PARAMIXB[4] Public _nVlrFre := 0.00 Public _nVlrFre2 := 0.00

If nOpcx = 3 _nVlrFre := 0.00 _nVlrFre2 := 0.00 Else _nVlrFre := U_xTotalDif(M->C7_NUM) _nVlrFre2 := U_xPercDif(M->C7_NUM) EndIf

@ 061,aPosGet[1,10] +10 SAY OemToAnsi('%') OF oNewDialog PIXEL SIZE 005,009 @ 061, aPosGet[1,11] - 037 MSGET _nVlrFre2 PICTURE PesqPict("SC7", "C7_MT3") OF oNewDialog PIXEL SIZE 038, 003

@ 061,aPosGet[1,08]-12 SAY OemToAnsi("Diferenca Total") OF oNewDialog PIXEL SIZE 038 ,009 @ 061, aPosGet[1,09] -03 MSGET _nVlrFre PICTURE PesqPict("SC7", "C7_XDIFT") OF oNewDialog PIXEL SIZE 060, 006

AAdd( aTitles, 'Observacoes' )

Return(.T.)

compartilhar
  1. Você vai ver essas setas em qualquer página de pergunta. Com elas, você pode dizer se uma pergunta ou uma resposta foram relevantes ou não.
  2. Edite sua pergunta ou resposta caso queira alterar ou adicionar detalhes.
  3. Caso haja alguma dúvida sobre a pergunta, adicione um comentário. O espaço de respostas deve ser utilizado apenas para responder a pergunta.
  4. Se o autor da pergunta marcar uma resposta como solucionada, esta marca aparecerá.
  5. Clique aqui para mais detalhes sobre o funcionamento do TOTVS DevForum!

0 resposta

Não é a resposta que estava procurando? Procure outras perguntas com as tags adpl resolucao posicionamento ou faça a sua própria pergunta.