Delphi:Salvare il testo di un Tedit

[gokan]

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]

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]

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]

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.