E' normale che Round non arrotondi?

[Gianluigi]

Ho notato una cosa che forse è normale ma ne vorrei se possibile conferma da voi:

Se inserisco nella funzione aritmetica Round un'espressione tipo: Round(Paint.Font.Size * 1.3441,-2) invece di ottenere un numero con due decimali ottengo il numero originale e cioè non arrotondato. In effetti nella guida si parla di numero arrotondato, però nella mia ingenuità credevo funzionasse anche così.

Grazie dell'attenzione

[vuott]

Come premessa rinvio ad una essenziale, ma efficace ed esaustiva, spiegazione scritta da md9327 sulla funzione Round():
http://www.gambas-it.org/smf/index.php?topic=1865.msg20789#msg20789


Se io scrivo un semplice codice (di cui riporto appresso la parte che ci interessa) rifacendomi al tuo caso:

Codice: gambas [Seleziona]

.......

    Paint.Font.Size = 12
  
 
    Print Paint.Font.Size * 1.3441
   
' Viene chiesto alla funzione "Round()" di arrotondare il secondo numero decimale:
    Print Round(Paint.Font.Size * 1.3441, -2)

End

in console ottengo questi risultati:

16,1292  senza funzione Round();
16,13  con la funzione Round().

Quindi funziona. 

[Gianluigi]

Come premessa rinvio ad una essenziale, ma efficace ed esaustiva, spiegazione scritta da md9327 sulla funzione Round():
http://www.gambas-it.org/smf/index.php?topic=1865.msg20789#msg20789
Se io scrivo un semplice codice (di cui riporto appresso la parte che ci interessa) rifacendomi al tuo caso:

Codice: gambas [Seleziona]

......
    Paint.Font.Size = 12 
    Print Paint.Font.Size * 1.3441   
' Viene chiesto alla funzione "Round()" di arrotondare il secondo numero decimale:
    Print Round(Paint.Font.Size * 1.3441, -2)
End

in console ottengo questi risultati:

16,1292  senza funzione Round();
16,13  con la funzione Round().
Quindi funziona. 

Beato te a me no ora vado a scrivere un piccolo esempio e lo posto
ciao

[vuott]

Quando devi allegare un file, dopo aver cliccato su "Rispondi", devi cliccare in basso a sinistra su "Opzioni aggiuntive...", quindi sul tasto virtuale "Browse...".

Ad ogni modo, puoi anche solo inserire nella tua risposta il codice (...possibilmente solo la parte essenziale !), usando il tasto in alto a destra "Evidenzia la sintassi".

[Gianluigi]

 

(secondo tentativo)
scusa vuott ma non capisco come funzionano gli inserimenti delle foto e dei file non so se è colpa loro ma se tento di citarti (era già successo prima ma non me ne ero accorto)  nel mio sommario della discussione la citazione del tuo post mi appare ripetuta parecchie volte.

Spero ci siano gli allegati che sono: l'ultimo esempio che avevo postato nella discussione Differenze fra testo disegnato e testo scritto con l'aggiuta di MessageBox e Print, più la foto dei risultati nella mia console.
Io sto usando:
3.5.99.1+svn20140209+build18~ubuntu13.10.1
ciao e grazie

[vuott]

Ho dato un'occhiata al codice che hai allegato, i cui risultati in console sono coerenti con quelli visibili nell'immagine che hai allegato.

Il tuo codice mostra 5 risultati in rispettivi MessageBox. Al riguardo faccio notare che all'interno della Sub DisegnoX:
* il valore mostrato nel primo Message non è soggetto alla funzione Round(), in quanto non previsto;
* il valore mostrato nel secondo Message non è soggetto alla funzione Round(), in quanto non previsto;
* il valore mostrato nel terzo Message non è soggetto alla funzione Round(), perché non v'è passaggio nella riga precedente con l'istruzione IF ;
* il valore mostrato nel quarto Message non è soggetto alla funzione Round(), perché non v'è passaggio nella riga precedente con l'istruzione IF .

[Gianluigi]

Ho dato un'occhiata al codice che hai allegato, i cui risultati in console sono coerenti con quelli visibili nell'immagine che hai allegato.

Il tuo codice mostra 5 risultati in rispettivi MessageBox. Al riguardo faccio notare che all'interno della Sub DisegnoX:
* il valore mostrato nel primo Message non è soggetto alla funzione Round(), in quanto non previsto;
* il valore mostrato nel secondo Message non è soggetto alla funzione Round(), in quanto non previsto;
* il valore mostrato nel terzo Message non è soggetto alla funzione Round(), perché non v'è passaggio nella riga precedente con l'istruzione IF ;
* il valore mostrato nel quarto Message non è soggetto alla funzione Round(), perché non v'è passaggio nella riga precedente con l'istruzione IF .

 
Hai ragione il tutto era un po confuso e per giunta dopo il ciclo di rimpicciolimento la scritta non l'avevo passata al Round però se poi davi la stampa vedevi tutti gli arrotondamenti. Se fossi però passato prima dalla stampa ottenevi un bug (mi ero dimenticato di passare la 'misura video' anche qui, e le prove le facevo disegnando sempre prima... cosa vuoi che ti dica, però ti assicuro che se mi danno del furbo mi offendo).
Come è difficile essere precisi...

Una cosa non capisco se io faccio  Paint.Font.Size = Round(Paint.Font.Size * 1.3441, -2) poi non devo controllare il valore restituito da  Paint.Font.Size per sapere se la funzione “Funziona” 

[vuott]

Una cosa non capisco se io faccio  Paint.Font.Size = Round(Paint.Font.Size * 1.3441, -2) poi non devo controllare il valore restituito da  Paint.Font.Size per sapere se la funzione “Funziona”

Non capisco se è una domanda o un'affermazione.

[Gianluigi]

Una cosa non capisco se io faccio  Paint.Font.Size = Round(Paint.Font.Size * 1.3441, -2) poi non devo controllare il valore restituito da  Paint.Font.Size per sapere se la funzione “Funziona”

Non capisco se è una domanda o un'affermazione.

E' una domanda con 3 punti interrogativi ed esclamativi, però l'ho detto che è difficile essere precisi...

[vuott]

ma... non capisco cosa potrei dirti.... se intendi verificare, poni delle istruzioni per la verifica. Cosa posso dirti ? 

[Gianluigi]

ma... non capisco cosa potrei dirti.... se intendi verificare, poni delle istruzioni per la verifica. Cosa posso dirti ? 

Se è lecito il codice Paint.Font.Size = Round(Paint.Font.Size * 1.3441, -2) allora in base al mio esempio quello denominato ProvaGian_2 Gambas non funziona. 

Non saprei come meglio spiegarmi 

[fsurfing]

quello che credo vuott ti stesse dicendo è che se nel tuo codice scrivi:

Codice: [Seleziona]

 If sDevice = "Stampante" Then Paint.Font.Size = Round(Paint.Font.Size * F_GAMBERETTO_STAMPA, -2)
    Print Paint.Font.Size   
    Message(Paint.Font.Size)

il round entra in funzione solo quando l' espressione nell' IF è vera , ovvero quando il device è stampante altrimenti il round non viene eseguito e quindi non viene eseguito l' arrotondamento

[Gianluigi]

quello che credo vuott ti stesse dicendo è che se nel tuo codice scrivi:

Codice: [Seleziona]

 If sDevice = "Stampante" Then Paint.Font.Size = Round(Paint.Font.Size * F_GAMBERETTO_STAMPA, -2)
    Print Paint.Font.Size   
    Message(Paint.Font.Size)

il round entra in funzione solo quando l' espressione nell' IF è vera , ovvero quando il device è stampante altrimenti il round non viene eseguito e quindi non viene eseguito l' arrotondamento

Si avete ragione ma dopo, successivamente, ho postato del codice meno confuso (ProvaGian_2) che ingloba nell'If anche Message e Print. E comunque anche prima (ProvaGian) usando le tue precauzioni, cioè stampando su file, appena uno usava stampa otteneva i valori da me postati.
L'unica cosa che posso aggiungere per spiegarmi meglio è che chiamare passo 3 stampa e passo 4 stampa, non spiega nulla il passo 3 stampa è l'adeguamento per la stampante del font.size ridimensionato per rientrare nel rettangolo e il passo 4 stampante è praticamente il ritorno al size originale.
Forse occorreva un esempio più semplificato ma siccome era codice di cui avevamo discusso in precedenza, ed era quello che mi ha, per così dire, ispirato la domanda...

Il punto comunque rimane questo è o non è lecito passare alla funzione ROUND un'espressione? E se è lecito, è lecito interrogare il codice come faccio io:
Paint.Font.Size = Round(Paint.Font.Size * 1.3441, -2)
Print Paint.Font.Size

perché se questo è giusto allora il mio Gambas non funziona o meglio non arrotonda. 

[fsurfing]

è lecito e a me funzionante

[vuott]

quello che credo vuott ti stesse dicendo è che....
...il round entra in funzione solo quando....

fsurfing: santo e benedetto !