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
/@ 063,431 SAY "Diferenca Total" OF oNewDialog PIXEL SIZE 050, 008 @ 063,493 MSGET _nVlrFre PICTURE PesqPict("SC7", "C7_XDIFT") OF oNewDialog PIXEL SIZE 060, 006/
@ 061, aPosGet[1,10] + 022 SAY "%" OF oNewDialog PIXEL SIZE 050, 008 @ 061, aPosGet[1,11] - 037 MSGET _nVlrFre2 PICTURE PesqPict("SC7", "C7_MT3") OF oNewDialog PIXEL SIZE 038, 003
@ 061, aPosGet[1,08] - 012 SAY "Diferenca Total" OF oNewDialog PIXEL SIZE 050, 008 @ 061, aPosGet[1,09] - 003 MSGET _nVlrFre PICTURE PesqPict("SC7", "C7_XDIFT") OF oNewDialog PIXEL SIZE 060, 006
AAdd( aTitles, 'Observacoes' )
Return(.T.)
Preciso que os campos e o texto fique alinhados na mesma posição independente da resolução
