（小菜的问题）如何用delphi编一个读入数据，再输出你输得那个数据

本人是个小菜鸟，pascal学了一年，自己想用用delphi编点东西，但好多不会，谁能帮我写一个用从框中读入数据，再输出你输得那个数据的程序我自己弄得只能输出，弄出来个文本框，但不知道怎样保存输进去的东西。
那位乐于助人的delphi高手留个QQ，教教我哈

利用文件保存。
工程建一个主窗口form1,拖一个按钮，一个编辑框。再建一个form2，也拖一个按钮一个编辑框，在主窗口uses 这个单元。
两个按钮的onclick事件
procedure TForm1.btn1Click(Sender: TObject);
var
tempfile : textfile;
filename : string;
s : string;
begin
if Form2.ShowModal=mrok then
begin
filename := ParamStr(0)+'tempfileforcc.txt';
AssignFile(tempfile,filename);
Reset(tempfile);
Readln(tempfile,s);
Edit1.Text := s;
CloseFile(tempfile);
if FileExists(filename) then
DeleteFile(filename);
end;
end;

procedure TForm2.Button1Click(Sender: TObject);
var
tempfile : TextFile;
filename : string;
begin
filename := ParamStr(0)+'tempfileforcc.txt';
AssignFile(tempfile,filename);
Rewrite(tempfile);
if Trim(Edit1.Text)<>'' then
Writeln(tempfile,edit1.text)
else
Writeln(tempfile,'啥也没有输入');