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 - gustav_ygman

Pagine: [1]
1
Programmazione (Gambas 2) / Aggiungere fonts a gambas
« il: 12 Gennaio 2011, 18:25:47 »
Ciao!

Stavo sperimentando un po di funzioni di gambas tra le quali quella che consente di cambiare font al testo, per esempio:

Codice: [Seleziona]
TextArea2.Font.Name = "Sawasdee"

Solo che non so come fare per aggiungere fonts che non sono compresi tra quelli già disponibili. se per esempio scaricassi un file "font.ttf" come potrei fare per poterlo usare in un mio programma?

Grazie a tutti!  :2birre:

2
Progetti degli utenti / Programma per biblioteche!
« il: 10 Gennaio 2011, 17:38:12 »
Ciao popolo del forum di Gambas!

Stavo lavorando su un semplice programma per gestire i libri che leggevo e ho pensato: perchè non strutturarlo un po' meglio e renderlo disponibile alle biblioteche o ai negozi di libri? Sarebbe un ottimo modo per convertire popolazione a linux, stiamo parlando di un programma gratuito, open source, che gira su un sistema totalmente gratuito e open source! ottima maniera per silurare windows dai computer  ;D

Mi sono recato in biblioteca e ho dato un occhiata al software che utilizzavano per catalogare i libri  :'( :'( una cosa che gira all'interno della schermata di dos molto bruttina, vagamente come questa per intenderci



Ho già cominciato a lavorare sulla parte più semplice del programma, inserimento, modifica, eliminazione record tanto per iniziare, poi contavo di espandermi su qualcosa come: "titolo libro codice libro in prestito a nome cognome, dal giorno x, al giorno  y eccetera" il problema è che necessito di molti suggerimenti e di un aiuto, perchè essendo studente non ho troppissimo tempo da dedicare a questo progetto.
Inoltre mi servirebbe un mega aiuto per la parte più interessante e utile del programma, vi introduco prima la situazione in cui serve questa funzione:

Dove abito esiste una specie di convenzione tra biblioteche di comuni più o meno vicini che, se non hanno un libro, telefonano ad un'altra biblioteca, chiedendo se ne sono in possesso ed eventualmente se lo fanno spedire.

Volevo quindi strutturare il programma in maniera tale che si potesse effettuare la ricerca tramite internet anche sui database delle biblioteche associate, e inviare (sempre tramite il programma) una richiesta di spedizione di prenotazione eccetera. Il problema è che non so proprio da dove partire per questa funzione.

Cerco quindi collaboratori, suggerimenti per funzioni del programma, per l'interfaccia e tutto quello che serve  :2birre:

Ciao!

3
Programmazione (Gambas 2) / data in sqlite3
« il: 09 Gennaio 2011, 16:40:07 »
Ciao a tutti!

vorrei aggiungere ad una tabella di un database il campo data, che tipo devo indicare?

mi spiego:
sql = "CREATE TABLE biblio ( id INTEGER PRIMARY KEY, titolo VARCHAR(255) DEFAULT NULL, autore VARCHAR(255) DEFAULT NULL, annolettura VARCHAR(255) DEFAULT NULL, voto INTEGER(4) DEFAULT NULL, commento VARCHAR(255) DEFAULT NULL); "

ogni campo in questa istruzione è di un certo tipo: integer o varchar, cosa dovrei scrivere per il campo data?
che formato bisogna usare per l'inserimento della data? gg/mm/yy oppure gg-mm-yy oppure gg-mm-yyyy eccetera?

grazie a tutti!

4
Programmazione (Gambas 2) / Unable to locate database
« il: 26 Dicembre 2010, 15:08:00 »
Ciao!

Sto intasando il forum con tutte ste discussioni, scusate  :hard:

Codice: gambas [Seleziona]
  PUBLIC sName AS String = "libri" 
  PUBLIC sPercorso AS String = User.home
  PUBLIC $hConn AS NEW Connection
  PUBLIC sql AS String
  PUBLIC hTable AS Result
  PUBLIC hres AS Result
  PUBLIC i AS Integer
  PUBLIC id AS String
  PUBLIC irow AS Integer
 


PUBLIC PROCEDURE Checkdatab()
 
  WITH $hConn
  .Type = "sqlite3"
  .Host = sPercorso
  .Login = ""
  .Password = ""
  .Name = sName
  END WITH

  $hConn.Open
  IF NOT $hConn.Databases.Exist(sName) THEN
  $hConn.Databases.Add(sName)
  $hConn.Close
  $hConn.Name = sName
  $hConn.Open
  sql = "CREATE TABLE biblio ( id INTEGER PRIMARY KEY, titolo VARCHAR(255) DEFAULT NULL, autore VARCHAR(255) DEFAULT NULL, annolettura VARCHAR(255) DEFAULT NULL, voto INTEGER DEFAULT NULL, commento VARCHAR(255) DEFAULT NULL); "
  hTable = $hConn.EXEC(sql)
  $hConn.Close
  ELSE
  $hConn.Close
  ENDIF
 
END


quando provo a lanciare il programma, mi dice Unable to locate database: libri evidenziando il primo $hConn.Open

Codice: gambas [Seleziona]
 .Name = sName
  END WITH

 [b] $hConn.Open[/b]
  IF NOT $hConn.Databases.Exist(sName) THEN
  $hConn.Databases.Add(sName)


Ma nel codice gli dico di verificare se il database esiste o meno, e se non esiste di crearlo

Ho controllato un sacco di esempi, mailing list, e su tutti è fatto come ho fatto io...eppure non funziona  ???

Che caos!

Spero mi sappiate aiutare, grazie a tutti!

5
Ciao!

Ho scritto queste righe di codice in una funzione, con questa idea:

Scrivo il titolo di un libro nella textbox2, quando clicco aggiungi, controllo che il titolo del libro non sia già presente nel database, se è già presente faccio comparire una messagebox, se non è già presente lo aggiungo al database.

ho fatto questa cosa perchè la funzione cerca, se per esempio cerco la lettera a, mostra tutti i titoli che contengono la lettera a, e quindi per controllare se un titolo esiste giò ho fatto così:

Codice: gambas [Seleziona]
    sql = "SELECT * FROM biblio WHERE titolo LIKE '%" & Aggiungi.TextBox2.Text & "%'"
    hres = $hconn.Exec(sql)
    
    FOR EACH hres
      IF hres!titolo = Aggiungi.TextBox2.Text THEN
      Message.Info("Libro già presente nel database", "Ok")
      BREAK  
      ENDIF
    NEXT
    
    IF NOT hres.Available THEN
      $hconn.Begin
      hres = $hconn.Create("biblio") 
      hres!titolo = Aggiungi.TextBox2.Text
      hres!autore = Aggiungi.TextBox3.Text
      hres!annolettura = Aggiungi.TextBox4.Text
      hres!commento = Aggiungi.TextArea1.Text
      hres.Update
      $hConn.Commit
      $hConn.Close
      Aggiungi.TextBox2.text = ""
      Aggiungi.TextBox3.text = ""
      Aggiungi.TextBox4.text = ""
      Aggiungi.TextArea1.Text = ""
      Message.Info("Libro aggiunto al database", "Ok")
    
    ENDIF
ENDIF
END


Solo che secondo me c'è qualcosa di sbagliato,perchè anche se per esempio cerco "a" che non combacia con nessun titolo, hres contiene informazioni, quindi non dovrebbero venire eseguite tutte le righe di codice sotto IF NOT hres.Available THEN invece lo fa!

Non va bene che non capisca cosa ho fatto  :rolleyes:

Qualcuno mi spiega cosa fa il mio codice per piacere?

Grazie!!

p.s. il doppio endif alla fine è perchè c'è un'altro if prima della parte di codice che ho postato  :)

6
Programmazione (Gambas 2) / Menu tasto destro del mouse
« il: 25 Dicembre 2010, 10:16:09 »
Ciao!

Sempre all'interno del programma per catalogare i libri, vorrei far si che cliccando su una riga della gridview in cui sono mostrate le informazioni su un libro compaia un menu a tendina contenente varie opzioni, ma non riesco a trovare l'evento right_click, come posso fare?

Grazie in anticipo!  ;)

7
Programmazione (Gambas 2) / Espandere oggetti form
« il: 25 Dicembre 2010, 10:11:32 »
Ciao!

Non riesco a capire come far espandere i vari oggetti in una form (o solo alcuni) quando ridimensiono la form oppure la espando a tutto schermo.
Adesso se espando il form a tutto schermo i componenti restano grandi uguali, come faccio a farli espandere mantenendo le proporzioni?

Grazie in anticipo!!  :D

8
Programmazione (Gambas 2) / Andare a capo TextArea
« il: 25 Dicembre 2010, 10:08:53 »
Ciao a tutti!

come da titolo, come si fa a far andare a capo le righe in una textarea senza che tagli le parole? ho cercato sul forum, ho trovato un vecchio esempio ma non corrisponde a quello che stavo cercando  ???

Grazie a tutti!  :)

9
Programmazione (Gambas 2) / [RISOLTO]Gestione database .odb
« il: 19 Dicembre 2010, 22:29:41 »
Ciao a tutti!

Volevo creare un semplice programma che mi permettesse di catalogare man mano i libri che leggo   :)

Usando Ubuntu ed avendo a disposizione OpenOffice database ho pensato di creare un database .odb (all'interno del quale c'è una tabella con i vari campi: Titolo autore eccetera...)

Il problema è che non so come poter poi gestire questo database con gambas.

Con visual basic la cosa è semplicissima, ma con gambas non so da dove partire, qualcuno potrebbe darmi una mano per cortesia?  :)

Il programma volevo strutturarlo come in immagine, e quando si clicca su aggiungi o modifica si apre una nuova form per l'inserimento/modifica/elimina dati.


Edit: nella schermata del programma ci vorrebbe anche un cerca, mi sono dimenticato di metterlo  :2birre:



allego il codice che sto provando ad usare per connettere un database a caso:

Codice: [Seleziona]
' Gambas class file
PRIVATE $hConn AS Connection

PUBLIC SUB Form_Open()

  DIM sName AS String

  sName = "Lista"

  TRY $hConn.Close

  WITH $hConn
      .Name = "Lista"
      .Type = "sqlite"
  END WITH
  

  $hConn.Open
  IF NOT $hConn.Databases.Exist(sName) THEN
     $hConn.Databases.Add(sName)
  ENDIF
  $hConn.Close

  $hConn.Name = sName
  $hConn.Open
END

ma continua a darmi errore: Null object

Che vuol dire?

10
Ciao a tutti! cercavo di crearmi un semplice file manager con gambas, così ho googleato e sono incappato in questa pagina:

http://gambasdoc.org/help/comp/gb.form/fileview?it

vorrei realizzare una scheda come quella di destra per capirsi, con colonne con nome, dimensione, data modifica eccetera, ma non so come fare!

Qualcuno sa per caso da dove potrei partire?

Grazie a tutti in anticipo per le risposte!

Ciao!

Gustav.

Pagine: [1]