Autore Topic: [RISOLTO] Salvare e aprire testo  (Letto 1858 volte)

Offline Luca

  • Gamberetto
  • *
  • Post: 22
    • Mostra profilo
[RISOLTO] Salvare e aprire testo
« il: 19 Dicembre 2009, 08:32:06 »
Salve ragazzi sono nuovo di Gambas  :-D
Come faccio ad aprire e salvare un testo contenuto in una textarea?

Offline Golia

  • Senatore Gambero
  • ******
  • Post: 1.298
  • no xe mai massa tardi
    • Mostra profilo
Re: Salvare e aprire testo
« Risposta #1 il: 19 Dicembre 2009, 10:48:08 »
Ciao, dipende da dove vuoi salvarlo, se su ub file di testo o un database..

Se vuoi salvarlo in un file di testo l'esempio è questo
Codice: [Seleziona]

public sub salvafile()
DIM hFile AS File

     IF NOT Exist(User.Home & "/Dati.txt") THEN
     hFile = OPEN User.Home & "/Dati.txt" FOR CREATE  
     ELSE
     hFile = OPEN User.Home & "/Dati.txt" FOR WRITE  
     END IF
 
     PRINT #hFile, tuatextarea.text
         
     CLOSE #hFile

end

public sub leggifile()
DIM hFile AS File

  IF NOT Exist(User.Home & "/Dati.txt") THEN
  tuatextarea.text = "Vuoto"  
  ELSE
  hFile = OPEN User.Home & "/Dati.txt" FOR INPUT
  LINE INPUT #hFile, tuatextarea.text
  ENDIF
    CLOSE #hFile

end

Facci sapere come vuoi fare che ti aiutiamo, ciao

Offline Luca

  • Gamberetto
  • *
  • Post: 22
    • Mostra profilo
Re: Salvare e aprire testo
« Risposta #2 il: 19 Dicembre 2009, 11:14:09 »
Grazie, il codice che mi hai postato modificato per le mie esigenze funziona a meraviglia!

ehm... quasi! Il salvataggio funziona bene, ma quando carico un testo mi copia nella textarea solo il primo rigo :(

Offline Golia

  • Senatore Gambero
  • ******
  • Post: 1.298
  • no xe mai massa tardi
    • Mostra profilo
Re: Salvare e aprire testo
« Risposta #3 il: 19 Dicembre 2009, 11:30:07 »
E si.. in una textarea possono esserci più righe...
Non ho mai affrontato questo problema, ma non disperare adesso arriva la cavalleria :-) . Sono sicuro che il buon Cescho ha la soluzione.

Intanto se ti serve per salvare più dati nello stesso file basta che aggiungi e vai a leggere su più righe, così
Codice: [Seleziona]


     'scrivi
     PRINT #hFile, textbox1.text
     PRINT #hFile, textbox2.text
     PRINT #hFile, textbox3.text
         
  'leggi
  LINE INPUT #hFile, textbox1.text
  LINE INPUT #hFile, textbox2.text
  LINE INPUT #hFile, textbox2.text

Ciao

Offline Luca

  • Gamberetto
  • *
  • Post: 22
    • Mostra profilo
Re: Salvare e aprire testo
« Risposta #4 il: 19 Dicembre 2009, 11:36:51 »
uhm la cosa strana è che posso scrivere normalmente nella textarea in tutti i righi :D credo che ci sia qualcosa che non va nel codice... :P
per caso in gambas come in vb esiste la proprietà multiline nella textarea?

Offline Golia

  • Senatore Gambero
  • ******
  • Post: 1.298
  • no xe mai massa tardi
    • Mostra profilo
Re: Salvare e aprire testo
« Risposta #5 il: 19 Dicembre 2009, 14:08:48 »
Si penso che bisogna sistemare il codice perchè legga tuttel le righe della textarea. Mi spiace ho usato poco textarea e non so dirti, aspetta un pò vedrai che ti risponde qualcuno che ne sà di più. Ciao :ciao:

Offline Luca

  • Gamberetto
  • *
  • Post: 22
    • Mostra profilo
Re: Salvare e aprire testo
« Risposta #6 il: 19 Dicembre 2009, 15:02:56 »
OK, Grazie!

Offline Ceskho

  • Amministratore
  • Senatore Gambero
  • *****
  • Post: 3.778
  • Vi Veri Veniversum Vivus Vici
    • Mostra profilo
    • Pagina Personale
Re: Salvare e aprire testo
« Risposta #7 il: 19 Dicembre 2009, 15:03:55 »
Citazione

Golia ha scritto:
Non ho mai affrontato questo problema, ma non disperare adesso arriva la cavalleria :-) . Sono sicuro che il buon Cescho ha la soluzione.


Ceskho ti suggerisce di usare la ricerca...l'argomento è stato molto trattato...

Offline Luca

  • Gamberetto
  • *
  • Post: 22
    • Mostra profilo
Re: Salvare e aprire testo
« Risposta #8 il: 19 Dicembre 2009, 15:38:55 »
ehm... sarà che non so' cercare bene ma usando il tag "textarea", "open" o "aprire" non trovo quello che mi serve...

Offline Ceskho

  • Amministratore
  • Senatore Gambero
  • *****
  • Post: 3.778
  • Vi Veri Veniversum Vivus Vici
    • Mostra profilo
    • Pagina Personale

Offline Luca

  • Gamberetto
  • *
  • Post: 22
    • Mostra profilo
Re: Salvare e aprire testo
« Risposta #10 il: 19 Dicembre 2009, 17:42:43 »
Grazie 1000 :D

Offline Ceskho

  • Amministratore
  • Senatore Gambero
  • *****
  • Post: 3.778
  • Vi Veri Veniversum Vivus Vici
    • Mostra profilo
    • Pagina Personale
Re: Salvare e aprire testo
« Risposta #11 il: 19 Dicembre 2009, 18:15:16 »
Di niente...;-)

Se il tuo problema è stato risolto torna al primo messaggio e inserisci [RISOLTO] nel titolo...grazie...:-)

Offline fsurfing

  • Moderatore
  • Senatore Gambero
  • *****
  • Post: 2.484
    • Mostra profilo
Re: Salvare e aprire testo
« Risposta #12 il: 19 Dicembre 2009, 18:56:15 »
si può caricare un testo in una text area ache così:

Codice: [Seleziona]

textarea1.text=file.load(percorso_file/nomefile)

 


e salvare il testo in un file così:

Codice: [Seleziona]

file.save(textarea1.text,percorso_file/nomefile)