Visualizza post

Questa sezione ti permette di visualizzare tutti i post inviati da questo utente. N.B: puoi vedere solo i post relativi alle aree dove hai l'accesso.


Topics - Gianluigi

Pagine: 1 ... 3 4 [5] 6 7 ... 12
61
Programmazione / Ottenere ore minuti e secondi dai soli secondi
« il: 17 Aprile 2019, 23:50:49 »
Visto che Akrobaticone è curioso di sapere come funziona TimeBox allego una immagine e un codice che ne simula il valore di ritorno.
Vorrei sapere se esistono altri modi per ottenere quanto in oggetto.

Codice: [Seleziona]
'' s1 e s2 simulano il risultato del nuovo controllo TimeBox.
'' Per l'esattezza di due controlli TimeBox...'
Public Sub Main()

  Dim Data1, Data2 As Date
  Dim s1 As String = "01:12:08"
  Dim s2 As String = "02:04:14"

  Data1 = Time(s1)
  Data2 = Time(s2)
  Print TimeDiff(DateDiff(Data1, Data2, gb.Second))

End

Private Function TimeDiff(iSec As Integer) As String

  Dim h, m, s, res As Integer

  If iSec > 3600 Then
    h = iSec Div 3600
    res = iSec Mod 3600
    m = res Div 60
    s = res Mod 60
  Else If iSec > 60 Then
    h = 0
    m = iSec Div 60
    s = iSec Mod 60
  Else
    h = 0
    m = 0
    s = iSec
  Endif
  Return Format(h, "0#") & ":" & Format(m, "0#") & ":" & Format(s, "0#")

End

62
Guardate qui:

Creiamo una nuova Command-line application che possiamo nominare Sinonimous
Aggiungiamo al progetto una nuova classe statica nominata CPaths con questo codice:

Codice: [Seleziona]
Create Static
Property Read sPathDB, PercorsoDatabase As String
Private $sPathDB As String
Property Read sPathIm, PercorsoImmagini As String
Private $sPathIm As String
Property Read sPathTx, PercorsoTxt As String
Private $sPathTx As String

Public Sub _new()

  $sPathDB = User.Home &/ Application.Name &/ "Database"
 ' 'If Not Exist...
  $sPathIm = User.Home &/ Application.Name &/ "Immagini"
 ' 'If Not Exist...
  $sPathTx = User.Home &/ Application.Name &/ "FileTesto"
 ' 'If Not Exist...

End

Private Function sPathDB_Read() As String

  Return $sPathDB

End

Private Function sPathIm_Read() As String

  Return $sPathIm

End

Private Function sPathTx_Read() As String

  Return $sPathTx

End

In Main Sub Main inseriamo questo al posto di Print "Hello world":
Codice: [Seleziona]
  With CPaths
    Print .PercorsoDatabase
    Print .PercorsoImmagini
    Print .PercorsoTxt
  End With

Nella console dovreste ottenere questo:
Citazione
/home/<vostro nome>/Sinonimous/Database
/home/<vostro nome>/Sinonimous/Immagini
/home/<vostro nome>/Sinonimous/FileTesto

Vedi anche: http://gambaswiki.org/wiki/lang/propdecl?l=it

63
Domande tecniche / Traduzione di CLOSE
« il: 23 Marzo 2019, 16:49:54 »
Chiedo la vostra collaborazione per la traduzione di CLOSE: http://gambaswiki.org/wiki/lang/close

Potete controllare se questa la ritenete corretta: http://gambaswiki.org/wiki/lang/close?l=it

Grazie

64
Programmazione / Metodo Shuffle dei vettori.
« il: 21 Marzo 2019, 15:40:28 »
Per presentare il nuovo metodo Shuffle propongo questo codice:
Codice: [Seleziona]
Public Sub Main()

  Dim aBingo As New Byte[]
  Dim iPull As Byte

  For i As Byte = 0 To 89
    aBingo.Push(i + 1)
  Next
  aBingo.Shuffle()
  iPull = aBingo.Pop()
  Print "Estratto "; iPull; "\n"
  '------------------------------'
  Print "Controlliamo:"
  aBingo.Sort()
  For Each i In aBingo
    Print i
  Next

End

Codice aggiornato al posto di iPull = aBingo[aBingo.Max] e aBingo.Resize(aBingo.Max - 1) il solo iPull = aBingo.Pop() che in una sola mossa le richiude entrambe.
Suggerito direttamente da Benoit Minisini  :)

65
Programmazione / SQLite, uso corretto delle date
« il: 18 Marzo 2019, 19:17:52 »
Fabien Bodard mi ha severamente sgridato :) per come ho creato il database per il test del report nello wiki, scrivendomi giustamente che non era in stile Gambas.
Siccome già a suo tempo anche Sotema mi aveva spronato in tal senso mi sono deciso a studiare un tantino meglio gb.db ed effettivamente devo ammettere che è potente e pratico.
In attesa del suo, sottopongo al vostro giudizio questa nuova versione del modulo MBase in questo test che spera di riuscire a dimostrare come si usano le date in SQLite.

66
Programmazione / Componente gb.report2
« il: 17 Marzo 2019, 01:04:43 »
Vi informo di essermi per la prima volta cimentato nella scrittura di un wiki sul componente gb.report2.
Lo trovate qui:
https://www.gambas-it.org/wiki/index.php?title=Creare_report_con_il_componente_gb.report2
Spero sia utile e comprensibile.

P.S. Mi dimenticavo di precisare che il disegno di un report con gb.report2 è molto simile a quello di una finestra Gambas. Lo studio di questo può rendere più comprensibile l'altro e viceversa.

67
Questa mattina l'amministratore titolare del sito che ospita il nostro forum Leonardo Miliani ha attivato la cifratura SSL, il che è senz'altro una cosa buona.
Purtroppo questo fatto positivo se ne è portato dietro uno molto negativo e cioè i link antecedenti a oggi presenti nelle nostre discussioni, quelli che rimandano ad altre discussioni o alla nostra wiki non funzionano più.
Nei prossimi giorni mi riprometto di andare a cambiarli manualmente, nel frattempo (e anche in futuro per quei link che dovessero sfuggirmi) si può procedere in questa maniera:
Fare clic col tasto destro del mouse sul link anche quelli che sono mascherati dietro una frase azzurra e cliccare su:
Copia indirizzo dal menu a comparsa, quindi aprire un file di testo copiare l'indirizzo e aggiungere una s ad http cambiandolo in https es.
Codice: [Seleziona]
http://www.gambas-it.org/smf/index.php?topic=6515.msg44604#msg44604
lo cambieremo in
Codice: [Seleziona]
https://www.gambas-it.org/smf/index.php?topic=6515.msg44604#msg44604
Copiamo l'indirizzo cambiato e incolliamolo in una nuova scheda del browser.
Fatto.
Lo so è una scocciatura ma non vedo alternative a meno che uno di voi non sia in grado di offrire a Leonardo un pezzo di codice PHP che possa rimediare.

68
Programmazione / Contare le righe di una ReportTextLabel
« il: 17 Febbraio 2019, 09:49:25 »
Credevo di aver risolto il problema, ma provando a cambiare la larghezza di stampa del report (proprietà padding) ottengo una visualizzazione errata.
Qualcuno mi sa dire dove sto sbagliando?
Il codice è quello di LoremReport sulla Software farm e a me pare corretto.  :-\

69
Progetti degli utenti / Demo su come scrivere un libro con gb.report2
« il: 15 Febbraio 2019, 23:17:50 »
Mi sono messo a scrivere il wiki su gb.report2 e mi sono subito incartato nel tentativo di ricavare un semplice libro da un file di testo.
Inizialmente ero bloccato anche per la convinzione di non essere capace ad usare i giusti attrezzi per espandere le textlabel.
Poi dopo due giorni di tentativi infruttuosi mi sono deciso a chiedere a Fabien Bodard che mi ha detto che le textlabel non erano state ancora completamente implementate.
Questo mi ha sbloccato e per chi fosse interessato ho messo una demo sulla Software farm a nome LoremReport.
Ora posso riprendere a scrivere il wiki  :)

70
Progetti degli utenti / ReportTest - esempio sull'uso di gb.report2
« il: 11 Febbraio 2019, 15:02:07 »
Il progetto è nella Software farm.
Vi comunico di aver fissato (anche se non sembra non avendo aggiornato la versione) lo stupido errore che estraeva le date solo parzialmente (8 caratteri anziché 10).
Se lo scaricate ora dovrebbe funzionare a dovere.
Se lo avete già scaricato, basta Disinstallare e poi re-Installare è un attimo.
Scusate per l'inconveniente.

 :ciao:

71
Domande tecniche / Compressione immagini e traduzioni
« il: 08 Febbraio 2019, 14:44:51 »
Nell'ultimo master, se andiamo alla pagina Progetti della finestra Preferenze, troveremo due novità:
La capacità di comprimere maggiormente i file png con pngquant
La possibilità di ottenere una traduzione automatica attraverso vari motori grazie alla shell di traduzione di Google.
Per il loro funzionamento è necessario installare i programmi correlati.
In Debian, Ubuntu e derivate, possiamo scrivere in un terminale:
Codice: [Seleziona]
sudo apt install pngquant 
sudo apt install translate-shell

 :ciao:

72
Programmazione / Come affrontare il carattere $ nel nome dei file
« il: 31 Gennaio 2019, 22:38:23 »
Oggi Ujlain mi ha chiesto come inserire nel comando Shell mv il nome di un file contenente il carattere speciale $ e per la precisione /home/uzi/test file $GivesError more#**.txt.

Gli ho mandato due risposte la prima dicendogli di usare direttamente la funzione Gambas:
Codice: [Seleziona]
Move "/home/uzi/test file $GivesError more#**.txt" To "/home/uzi/testfile.txt"
L'altra che teneva conto del fatto che nel terminale occorre anteporre al carattere speciale la barra rovesciata e al contempo inserire la frase fra doppi apici così (comando bash):
Codice: [Seleziona]
mv /home/uzi/"test file \$GivesError more#**.txt" /home/uzi/testfile.txt
Tenendo conto che la barra rovesciata è un carattere speciale anche in Gambas il comando Shell andava formattato così:
Codice: [Seleziona]
  Dim sPath As String = "/home/uzi/\"test file \\$GivesError more#**.txt\""
  Shell Subst$("mv &1 &2", sPath, "/home/uzi/testfile.txt")

73
Debian, Ubuntu e derivate / Linux Mint 19
« il: 23 Gennaio 2019, 18:58:35 »
Oggi mi sono impratichito un pochino con Mint 19 è carino, capisco perché molti lo scelgono.
Sarà per via dell'abitudine ma io continuo a preferire Ubuntu (Ambiance) che è più o meno come era Unity, trovo che con i nuovi schermi che si ampliano in larghezza avere la dock sul fianco sia più pratico.

74
Mailing List / Come documentare un componente
« il: 09 Gennaio 2019, 09:26:57 »
La domanda di Hans ha senso se si visualizza anche l'immagine

75
Domande tecniche / Traduzioni in italiano
« il: 03 Gennaio 2019, 14:05:17 »
Vi comunico che nell'ultima versione master di Gambas le traduzioni in italiano della IDE sono state tutte implementate, vedi qui. https://gitlab.com/gambas/gambas/commit/bceaa0ae538d0cffb596646cbdd5684952988043
Vi sarei grato se mi comunicaste eventuali errori di traduzione (anche traduzioni poco chiare) o qualunque altro suggerimento vi possa apparire utile darmi.
Grazie

Pagine: 1 ... 3 4 [5] 6 7 ... 12