Hallo
das ist mein Source um eine einfache Textdatei in einer Textbox darzustellen und zu speichern.
Irgendwie finde ich das der Umweg über StreamReader und StreamWriter ganz schön groß ist.
Oder habe ich hier von hinten durch die Brust ins Auge geschossen ?
Delphi-Quellcode:
procedure TWinForm.Button2_Click(sender: System.Object; e: System.EventArgs);
// Inhalt von TextBox1 speichern
var
sr : StreamWriter;
begin
sr:=StreamWriter.Create(FFilename);
sr.Write(TextBox1.Text);
sr.Close;
end;
procedure TWinForm.Button1_Click(sender: System.Object; e: System.EventArgs);
// Textdatei öffnen und in TextBox1 darstellen
var
sr : StreamReader;
begin
IF OpenFileDialog.ShowDialog()=System.Windows.Forms.DialogResult.OK then
begin
Label1.Text:=OpenFileDialog.FileName;
FFilename:=OpenFileDialog.FileName;
sr:=StreamReader.Create(FFilename);
TextBox1.Text:=sr.ReadToEnd;
sr.Close;
end;
end;