PDA

Visualizza la versione completa : Delphi:Salvare il testo di un Tedit


gokan
24-09-2003, 19:05
Ciao,come potrei fare a salvare il campo Text di un TEdit in un file?
Con un componente TMemo basta fare ad esempio:


if SaveDialog.Execute then Memo1.Lines.SaveToFile(SaveDialog1.FileName)

Dal momento che TEdit non possiede una proprietÓ simile a quella di TMemo, c'Ŕ qualche modo per aggirare tale ostacolo?
Grazie

alka
24-09-2003, 20:13
Puoi usare i classici TextFile del Pascal, oppure servirti della classe TStringList, che poi Ŕ la stessa che viene utilizzata per memorizzare le righe dei controlli Memo:



var
S: TStringList;
begin
S := TStringList.Create;
try
S.Text := Edit1.Text;
S.SaveToFile('filename.txt');
finally
S.Free;
end;
end;


Semplice come bere un bicchier d'acqua... ;)

gokan
25-09-2003, 08:53
Originariamente inviato da alka
Puoi usare i classici TextFile del Pascal, oppure servirti della classe TStringList, che poi Ŕ la stessa che viene utilizzata per memorizzare le righe dei controlli Memo:



var
S: TStringList;
begin
S := TStringList.Create;
try
S.Text := Edit1.Text;
S.SaveToFile('filename.txt');
finally
S.Free;
end;
end;


Semplice come bere un bicchier d'acqua... ;)
Grazie, del Pascal puro mi mancano le basi del salvataggio,apertura etc. dei files,...mi sono troppo abituato al comodissimo Delphi :bubu:
Grazie

alka
25-09-2003, 10:36
Originariamente inviato da gokan
Grazie, del Pascal puro mi mancano le basi del salvataggio,apertura etc. dei files,...mi sono troppo abituato al comodissimo Delphi :bubu:
Grazie
Non Ŕ grave... Anche io preferisco l'uso delle classi su cui si basa la VCL, salvo casi specifici e particolari. ;)

Loading