myZone: primo rilascio

[andy60]

Hai perfettamente ragione, sarà una cosa sistemata nelle versioni successive, sto cercando di capire quale è la soluzione migliore, tenuto conto che il programma desidero che sia localizzato in questa maniera:
<user home>|Gambas|myZone|varie sottocartelle

Pensavo, ma qui forse mi linciate, di mettere una costante globale in mLibs e di far riferimento a questa nelle varie form:

Codice: [Seleziona]

PUBLIC CONST CartellaDiLavoro AS String = "/Gambas/myZone/"

ad esempio in FMain:

Codice: [Seleziona]

WITH myconn
      .Name = User.Home & mLibs.cartelladilavoro" & "data/myHistory.db" 
      .Type = "sqlite3"
      .Open  
END WITH  

in questo modo modificare tutti i rif in tutte le form

[Ceskho]

Ma perchè non crei direttamente la tua variabile con il path completo?

Codice: gambas [Seleziona]

PUBLIC CONST PathDiLavoro AS String = User.Home &/ "Gambas/myZone/"

e poi

Codice: gambas [Seleziona]

WITH myconn
      .Name = mLibs.PathDiLavoro" &/ "data/myHistory.db" 
      .Type = "sqlite3"
      .Open  
END WITH 

[andy60]

Ma perchè non crei direttamente la tua variabile con il path completo?

Codice: gambas [Seleziona]

PUBLIC CONST PathDiLavoro AS String = User.Home &/ "Gambas/myZone/"

e poi

Codice: gambas [Seleziona]

WITH myconn
      .Name = mLibs.PathDiLavoro" &/ "data/myHistory.db" 
      .Type = "sqlite3"
      .Open  
END WITH 

 ma si..l'ho scritta di getto mica l'ho fatta...scrivo cosi' ...grazie la metto a posto..prendiamoci na birra prima di metterci a dieta!!

[andy60]

Ma perchè non crei direttamente la tua variabile con il path completo?

Codice: gambas [Seleziona]

PUBLIC CONST PathDiLavoro AS String = User.Home &/ "Gambas/myZone/"

e poi

Codice: gambas [Seleziona]

WITH myconn
      .Name = mLibs.PathDiLavoro" &/ "data/myHistory.db" 
      .Type = "sqlite3"
      .Open  
END WITH 

syntax error se lo copio cosi' come lo hai scritto...

[Ceskho]

Si infatti....correggo:

Codice: gambas [Seleziona]

PUBLIC CONST PathDiLavoro AS String = User.Home &/ "Gambas/myZone" 

Codice: gambas [Seleziona]

WITH myconn  
     .Name = mLibs.PathDiLavoro &/ "data/myHistory.db"   
     .Type = "sqlite3"  
     .Open    
END WITH  

[andy60]

Si infatti....correggo:

Codice: gambas [Seleziona]

PUBLIC CONST PathDiLavoro AS String = User.Home &/ "Gambas/myZone" 

Codice: gambas [Seleziona]

WITH myconn  
     .Name = mLibs.PathDiLavoro &/ "data/myHistory.db"   
     .Type = "sqlite3"  
     .Open    
END WITH  

mi funge senza CONST, rilasciato myZoneLite-0.1.85

[andy60]

se a qualcuno interessa, questa è la mia roadmap personale:
1. realizzazione dell'help (openoffice writer e in pdf) con teoria della dieta a zona e utilizzo del software
2. sto verificando i bug presenti man mano che utilizzo, se poi qualcuno mi aiutasse nel debugging gliene sarei grato.
3. idea da sviluppare volevo il vs parere: gli utilizzatori potrebbero essere interessati a pubblicare online le loro ricette su un sito web magari un blog wordpress. Il tutto automaticamente da dentro myZone. Attingere dal sito per nuove idee nutrizionali mi sembra interessante.

[fsurfing]

non puoi pretendere che qulcuno facci adelle prove del progremma se questo non si avvia

aggiungi questo codice in fmain per la copia dei db al primo avvio:

Codice: gambas [Seleziona]

PRIVATE SUB crea_directory()
  
  IF NOT Exist(mLibs.CartellaDiLavoro) THEN 
      TRY MKDIR user.Home & "/Gambas"
      TRY MKDIR user.Home & "/Gambas/myZoneLite"
      TRY MKDIR user.home & "/Gambas/myZoneLite/data"
      
    
       COPY "data/myBlog.db" TO mLibs.CartellaDiLavoro & "data/myBlog.db"
       COPY "data/myHistory.db" TO mLibs.CartellaDiLavoro & "data/myHistory.db"
      TRY COPY "data/mySports.db" TO mLibs.CartellaDiLavoro & "data/mySports.db"
      TRY COPY "data/myZone.db" TO mLibs.CartellaDiLavoro & "data/myZone.db"
      
  ENDIF     
  
  CATCH 
            Message.Error(Error.Text & "\n" & Error.Where)
  
END

PUBLIC SUB Form_Open()
      DIM infod1 AS String
      DIM infod2 AS String
      
  crea_directory    
  
      
      
  mLibs.FormCenter(ME)
  ME.Title = Application.Title & " v." & Application.Version
  UsersRead
  UsersCombo
  cboUSERS.Index = 0
  cboUSERS_Click
  IF WeekDay(Now) = 0 THEN

...
....

alle righe 464 e 429 di fmain devi cambiare il percorso da ssoluto a relativo

per il resto direi che devi assolutamente creare una guida , perchè non saprei proprio come usare il programma

[andy60]

excuse me la 0.85 stai provando..che mi risulti i percorsi li avevo sistemati

[fsurfing]

ho scaricato quella su sf, si si i percorsi li hai sistemati , ne hai saltati solo due

manca però il codice di copia dei db che ti ho scritto sotto

cmq sembra un bel software, ottima l' dea delle ricette online, ma credo che prima devi ancora rifinirlo ma soprattutto fare una miniguida , io da ignorante delle diete a zona non lo trovo molto intuitivo

[andy60]

ho scaricato quella su sf, si si i percorsi li hai sistemati , ne hai saltati solo due

manca però il codice di copia dei db che ti ho scritto sotto

cmq sembra un bel software, ottima l' dea delle ricette online, ma credo che prima devi ancora rifinirlo ma soprattutto fare una miniguida , io da ignorante delle diete a zona non lo trovo molto intuitivo

1. errore da sistemare ......saltati due: quali cosi li sistemo?

2. grazie x i complimenti..., sicuramente lo devo rifinire, cmq gia' funziona nelle sue funzioni-base

3. guida. ho iniziato a lavorarci

4. le ricette online su uno stesso blog di wordpress...su wp.com: si puo' postare sul blog attraverso una mail pero' vorrei utilizzare un altro sistema, sarebbe niente male capire se si possono sfruttare le api di wordpress da dentro gambas, in questo modo il webmaster avrebbe maggior controllo sui post, forse

[fsurfing]

alle righe 464 e 429 di fmain devi cambiare il percorso da ssoluto a relativo

[andy60]

sistemato, allego codice della sola form

[fsurfing]

vedo che non hai seguito il mio suggerimento di qualche post fa è il programma continua a non funzionare...
non puoi pretendere che ognuno metta i sorgenti in gambas/myzonelite, il prog deve funziona ovunque vengano messi i sorgenti, il problema poi si crea ancor di più il giorno in cui decifderai di distribuire dei binari della tua applicazione!

[andy60]

vedo che non hai seguito il mio suggerimento di qualche post fa è il programma continua a non funzionare...
non puoi pretendere che ognuno metta i sorgenti in gambas/myzonelite, il prog deve funziona ovunque vengano messi i sorgenti, il problema poi si crea ancor di più il giorno in cui decifderai di distribuire dei binari della tua applicazione!

i riferimenti sono assoluti ora, mi dici con esattezza dove si blocca x favore? grazie