Questo sito utilizza cookies solo per scopi di autenticazione sul sito e nient'altro. Nessuna informazione personale viene tracciata. Leggi l'informativa sui cookies.
Username: Password: oppure
Delphi - salvare e aprire dati da file testo
Forum - Delphi - salvare e aprire dati da file testo

Avatar
carmelo (Normal User)
Pro


Messaggi: 100
Iscritto: 15/06/2007

Segnala al moderatore
Postato alle 17:18
Venerdì, 13/12/2013
Buonasera a voi...
riprendendo questa vecchia discussione, http://www.pierotofy.it/pages/extras/forum/171/1006554-sal ...

vorrei avere notizie in più su come salvare e aprire dei dati (integer e string) utilizzando la risposta data da systemgvp.
Grazie mille
Carmelo

PM Quote
Avatar
Poggi Marco (Member)
Guru


Messaggi: 969
Iscritto: 05/01/2010

Segnala al moderatore
Postato alle 23:46
Venerdì, 13/12/2013
Ciao!

Systemgvp suggerisce di convertire il dato numerico in stringa, e successivamente, scriverla su file.
Dove trovi maggiori difficoltà ? ( Nell' apertura del file o in scrittura ? )


PM Quote
Avatar
carmelo (Normal User)
Pro


Messaggi: 100
Iscritto: 15/06/2007

Segnala al moderatore
Postato alle 10:40
Sabato, 14/12/2013
buondi...
premesso che uso lazarus, ho risolto con Tstringlist.

Con questo salvo i valori:

Codice sorgente - presumibilmente Delphi

  1. procedure TForm1.Button1Click(Sender: TObject);
  2. var
  3. F: TStringList;
  4. begin
  5.   SaveDialog1.Filter := 'GPP files (*.GPP)|*.GPP';
  6. if SaveDialog1.Execute then
  7. begin
  8. F := TStringList.Create;
  9. with F do
  10. begin
  11. Add(nome.Text);
  12. Add(cognome.Text);
  13. Add(identificativo.Text);
  14. SaveToFile(Savedialog1.Filename);
  15. Free;
  16. end;



con quest'altro carico i valori:
Codice sorgente - presumibilmente Delphi

  1. procedure TForm1.Button2Click(Sender: TObject);
  2. var
  3. F: TextFile;
  4. S: string;
  5. begin
  6.   if OpenDialog1.Execute then          
  7.   begin
  8.     AssignFile(F, OpenDialog1.FileName);
  9.     Reset(F);
  10.     Readln(F, S);                        
  11.     nome.Text := S;
  12.     Readln(F, S);
  13.     cognome.Text := S;
  14.     Readln(F, S);
  15.     identificativo.Text := S;
  16.     CloseFile(F);
  17.   end;
  18. end;



vorrei invece sapere come stampare in pdf la form...apro un altro post?
grazie e buon sabato

PM Quote
Avatar
Poggi Marco (Member)
Guru


Messaggi: 969
Iscritto: 05/01/2010

Segnala al moderatore
Postato alle 11:43
Sabato, 14/12/2013
Per creare un pdf, devi scaricare un' apposita libreria ( http://forum.lazarus.freepascal.org/index.php?topic=17192.0 , oppure https://github.com/jepafi/Free-JPDF-Pascal )

PM Quote
Avatar
carmelo (Normal User)
Pro


Messaggi: 100
Iscritto: 15/06/2007

Segnala al moderatore
Postato alle 12:29
Sabato, 14/12/2013
Esiste la possibilità di salvare nello stesso file la posizione dei radiobutton e dei checkbox (se checked o unchecked) in modo tale che quando carico il file mi ritornano al valore salvato?
Grazie ancora

PM Quote
Avatar
systemgvp (Normal User)
Expert


Messaggi: 296
Iscritto: 14/04/2008

Segnala al moderatore
Postato alle 1:24
Domenica, 15/12/2013
Certo, basta salvare la proprietà che ti da il True o il False dell'oggetto allo stesso modo di come salvi il contenuto degli Edit

PM Quote
Avatar
carmelo (Normal User)
Pro


Messaggi: 100
Iscritto: 15/06/2007

Segnala al moderatore
Postato alle 14:50
Lunedì, 16/12/2013
Testo quotato

Postato originariamente da Poggi Marco:

Per creare un pdf, devi scaricare un' apposita libreria ( http://forum.lazarus.freepascal.org/index.php?topic=17192.0 , oppure https://github.com/jepafi/Free-JPDF-Pascal )



non c'è un tutorial sull'uso e sull'installazione?

PM Quote
Avatar
carmelo (Normal User)
Pro


Messaggi: 100
Iscritto: 15/06/2007

Segnala al moderatore
Postato alle 11:33
Lunedì, 23/12/2013
Testo quotato

Postato originariamente da systemgvp:
Certo, basta salvare la proprietà che ti da il True o il False dell'oggetto allo stesso modo di come salvi il contenuto degli Edit
  



ma dato che il valore checked è di tipo true and false, devo convertirlo in stringa per poterlo leggere?

PM Quote
Avatar
carmelo (Normal User)
Pro


Messaggi: 100
Iscritto: 15/06/2007

Segnala al moderatore
Postato alle 12:35
Lunedì, 23/12/2013
risolto con
Codice sorgente - presumibilmente Plain Text

  1. Add(booltostr(radiobutton1.Checked));


e per richiamarlo con
Codice sorgente - presumibilmente Plain Text

  1. radiobutton1.Checked:=strtobool(S);



PM Quote