FiveTech Software tech support forums

sorry my error Now only with local nValore:= 6 local nTipo := 3 run ok For n= 1 to 90 For k= 1 to 90 For j= 1 to 90 nTotale := Calcolo_3_numeri(n,k,j,ntipo) If nTotale=nvalore nAt := AScan( aTmp, { |a| a[1] = k .and. a[2] = n .or. a[3] = j } ) If nAt == 0 aadd(aTmp,{n,k,j}) Endif Endif next next nex...

change into For n= 1 to 90 For k= 1 to 90 For j= 1 to 90 nTotale := Calcolo_3_numeri(n,k,j,ntipo) If nTotale=nvalore nAt := AScan( aTmp, { |a| a[1] = j .and. a[2] = k .or. a[3] = n} ) If nAt == 0 aadd(aTmp,{n,k,j}) Endif Endif next next next the calc is fast but is also bad because there are also du...

... sta cosa non l'ho capita probabilmente io nel lontano 92 avevi visto che potevo chiedere solo 22 numeri perché non avevo spazio oppure siccome il calcolo andava a stampare a video i risultati poi erano troppi e non entravano che ti devo dire ...non lo so...quindi il ciclo get chiede 22numeri che ...

oDlg:bStart := {||Calcolo(@aItems) }

Local aRow

aPrevisti:= Calcolo_Previsione(oPrevisione,primo,ba,ca,fi,ge,mi,na,pa,rm,to,ve,nz,aRuote)

for each aRow in aPrevisti
ASort( aRow, 2, nil, { |x,y| x > y } )
next

Error description: Error BASE/1003 Variabile inesistente: AROW

aPrevisti:= Calcolo_Previsione(oPrevisione,primo,ba,ca,fi,ge,mi,na,pa,rm,to,ve,nz,aRuote)

for each aRow in aPrevisti
ASort( aRow, 2, nil, { |x,y| x > y } )
next

Silvio,

You can use a var that will show the message only at once.

lMessage := .F.
oDlg:bPainted := {|| IIF( lMessage = .F., ( Calcolo(@aItems), lMessage := .T.), NIL ) }

regards
Uwe

Silvio,

just change to :
.....
.....
oDlg:bPainted := {||Calcolo(@aItems) }

ACTIVATE DIALOG oDlg CENTERED;
ON INIT ( oPanelGreen := PanelGreen(oFolder),;
EVAL( oDlg:bResized))

regards
Uwe

I have a dialog at init go to add a array aItems I need on xbrowse from a function calcolo() if I make a check calcolo function have some message boxes I wish before create the dialog with all object and then the calcolo function can show the messages my problem ...

salve per marco , la tua logica non fà una grinza , ma tu non sei un programmatore sogei :D :D Controllo corretto calcolo del PrezzoTotale codice errore 00423: 2.2.1.11 <PrezzoTotale> non calcolato secondo le regole definite nelle specifiche tecniche BloccoDettaglioLinee = ...

... Configurazione(nscelta) .... @ 2.3, 2 FOLDER oFld PIXEL ADJUST ; ITEMS "&Dati della scuola","Parametri Generali",; "Calcolo","Orario delle lezioni","Ore per giorno","Assenze"; SIZE 235,190 oFld:nOption:=nscelta there is a method ...

Giussepe,

Modifica tu código asi:

oSco:Connect( "textChanged(QString)",{| cValue | nSco := cValue, Calcolo(oDlg, oPre, nPre, nSco,1)})

Aqui funciona bien asi

¡Buenos dias! ¿usted podrìa probar el código que he publicado ? Si no utilizo la variable "nSco" no funciona {||Calcolo(oDlg, oPre, nPre, nSco,1)} pero funciona asì {|nSco|Calcolo(oDlg, oPre, nPre, nSco,1)}. Si yo digito primer campo(Prezzo) 100 segundo campo(Sconto) 20 obtengo ...

Giussepe,

Este bloque decódigo no recibo nSco como parámetro:

{|nSco|Calcolo(oDlg, oPre, nPre, nSco,1)}

luego debería ser:

{||Calcolo(oDlg, oPre, nPre, nSco,1)}

No se si eso lo soluciona. Puedes probarlo e intentarme explicar nuevamente lo que ocurre ? gracias

si escribo la segunda variable consigo el resultado. mientras que la variable está llena si uso el botón "Calcolo " que llama a la función de calcolo() la variable " nSco " está vacía ? #include "FiveTouch.ch"function Main()LOCAL oDlgLOCAL ...