Infatti andy ha dichiarato:
"questa classe e quella di Luigi"
Così la scelta è su due... se poi qualcuno contribuisce alla sistemazione e alla evoluzione del porting, è il benvenuto...
A proposito andy, come avrai potuto notare, ci sono un pò di magagne a livello di posizionamento e di conversione numerica. Queste cose non l'ho sistemate perchè mi ero buttato solo nella traduzione da php; purtroppo ci sono delle incongruenze tra le funzionalità php e quelle gambas, che necessitano di conversioni specifiche. Tra le altre cose, forse è anche possibile ottimizzare il codice, perchè anche se usa variabili molto chiarificatrici, queste allungano il codice rendendolo piuttosto prolisso... boh, non sò...
In questi giorni ho scoperto alcune incongruenze, causate dal fatto che in php non è necessario specificare le variabili come per gli altri linguaggi (cosa che a me personalmente non piace molto...).
Vabbè, mi sono dilungato troppo, e pure fuori zona...
Bye
ho scaricato la tua classe... molto interessante
ti conviene inserire qualcosa del tipo
IF NOT Exist(user.home & "/Gambas") THEN
MKDIR user.Home & "/Gambas"
ENDIF
IF NOT Exist(user.home & "/Gambas/Diet") THEN
MKDIR user.home & "/Gambas/Diet"
ENDIF
hFile = OPEN user.home & "/Gambas/Diet/" & sNomefile FOR CREATE
PRINT #hFile, ""
PRINT #hFile, ""
PRINT #hFile, "
"
PRINT #hFile, ""
PRINT #hFile, ""
CLOSE #hFile
per evitare problemi dovuti alla mancanza del persorso dove generi il file.
inoltre ho notato che avviando il programma la console di gambas mi da questi avvisi che con altri programmi non ho:
X Error: BadDevice, invalid or uninitialized input device 158
Major opcode: 149
Minor opcode: 3
Resource id: 0x0
Failed to open device
X Error: BadDevice, invalid or uninitialized input device 158
Major opcode: 149
Minor opcode: 3
Resource id: 0x0
Failed to open device
kbuildsycoca running...
DCOP Cleaning up dead connections.
@Fabio:
kbuildsycoca running...
DCOP Cleaning up dead connections.
Sì, vero. E non sono errori. Sono messaggi che Gambas dà sempre quando viene eseguito su Gnome (Gambas, ricordo, è sviluppato con le Qt).
@fsurfing:
io so solo che quei messaggi di errore sono causati da ciò. Prova a commentare le righe suddette ed a vedere se funziona lo stesso.
Ho ulteriormente 'irrobustito' la classe inserendo una nuova funzione (chiamata build2) che genera grafici a torta 3d...allego form del mio softwarino Diet&Sports
Ecco la funzione aggiunta alla classe chart:
PUBLIC SUB Build2()
DIM sUrl AS String
DIM x AS Integer
DIM hfile AS Stream
sUrl = "http://chart.apis.google.com/chart?cht=p3&chd=t:"
FOR EACH arraydati
x = x + 1
IF x = Numrecs(arraydati) THEN
sUrl = sUrl & CStr(arraydati[x - 1])
ELSE
sUrl = sUrl & CStr(arraydati[x - 1]) & ","
ENDIF
NEXT
sUrl = sUrl & "&chs=" & ll & "x" & al & "&chl=Prot|Gra|Carb&chtt=" & ti & "&chf=bg,s," & cs
hFile = OPEN user.home & "/Gambas/Diet/" & nomefile FOR CREATE
PRINT #hFile, ""
PRINT #hFile, ""
PRINT #hFile, "
"
PRINT #hFile, ""
PRINT #hFile, ""
CLOSE #hFile
END