refreshing on a get

[Silvio.Falconi]

I have a strange error or I not remeber as refresh a numeric get control after I insert another get

I wish refresh the second get with the value of first get , any help please ?

the minimal test

Code: Select all  Expand view

#include "FiveWin.ch"
#include "constant.ch"
#include "Report.ch"

Function test()
   LOcal  oDlg
Local aGet[20]
Local nApimpneto:=0
Local nApimptotal:=0


   Local nBottom   := 26.9
   Local nRight    := 46
   Local nWidth :=  Max( nRight * DLG_CHARPIX_W, 180 )
   Local nHeight := nBottom * DLG_CHARPIX_H
   Local  oFont  := TFont():New( "Lucida Console", 0, 12,, )

 DEFINE DIALOG oDlg        ;
   TITLE "test refresh"   ;
   SIZE nWidth, nHeight  TRANSPARENT PIXEL              
     

  @ 92, 10 SAY "Importo:" OF oDlg SIZE 35, 8 PIXEL FONT oFont
  @ 90, 56 GET aGet[8] VAR nApimpneto  OF oDlg SIZE 40, 10 RIGHT PIXEL PICTURE  "@E999,999.99"  FONT oFont ;
                    ON CHANGE  (nApimptotal:= nApimpneto ,aGet[13]:refresh())



   @ 128, 10 SAY "Totale:" OF oDlg SIZE 35, 8 PIXEL FONT oFont
   @ 126, 56 GET aGet[13] VAR nApimptotal OF oDlg SIZE 40, 10 PIXEL PICTURE  "@E999,999.99" FONT oFont RIGHT   READONLY



ACTIVATE DIALOG oDlg

retu nil
 

[joseluisysturiz]

Excuse, i dont speake english, try again use UPDATE en los GET...

REDEFINE GET aGet[2] VAR aVar[2] ID 102 OF oDlg UPDATE READONLY // NOMB.CLIENTE

saludos...

[Silvio.Falconi]

NOT RUN OK

[Enrico Maria Giordano]

Code: Select all  Expand view

ON CHANGE  (aGet[8]:Assign(),nApimptotal:= nApimpneto ,aGet[13]:refresh())

EMG

[joseluisysturiz]

Silvio, because you do not use the valid

@ 90, 56 GET aGet[8] VAR nApimpneto OF oDlg SIZE 40, 10 RIGHT PIXEL PICTURE "@E999,999.99" FONT oFont ;
valid( iif( nApimpneto > o, ( nApimptotal := nApimpneto, aGet[13]:refresh(), .t. ), .f. ) )

saludos...

[Silvio.Falconi]

Code: Select all  Expand view

ON CHANGE  (aGet[8]:Assign(),nApimptotal:= nApimpneto ,aGet[13]:refresh())

EMG

Emg thanks run ok

[StefanHaupt]

Enrico,

aGet[8]:Assign()

what is this method for ?

[Enrico Maria Giordano]

It assigns what you see in the edit buffer to the GET variable.

EMG

[StefanHaupt]

thanks