请问opendialog和savedialog怎么用？？

Question

用在打开，txt，doc文件和保存memo里的文字！！

Answer 1

if OpenDialog1.Execute then
 if OpenDialog1.FileName<>'' then
  Memo1.Lines.LoadFromFile(OpenDialog1.FileName);if SaveDialog1.Execute then
 if SaveDialog1.FileName<>'' then
  Memo1.Lines.SaveToFile(SaveDialog1.FileName);

Answer 2

SaveDialog/OpenDialog中设置 filter 属性，可以过滤文件扩展名。

Answer 3

OpenDialog1.Filter := 'Text files (*.txt)|*.TXT|Pascal files (*.pas)|*.PAS';if OpenDialog1.Execute then
 if OpenDialog1.FileName<>'' then
  Memo1.Lines.LoadFromFile(OpenDialog1.FileName);SaveDialog1.Filter := 'Text files (*.txt)|*.TXT|Pascal files (*.pas)|*.PAS';if SaveDialog1.Execute then
 if SaveDialog1.FileName<>'' then
  Memo1.Lines.SaveToFile(SaveDialog1.FileName);

Answer 4

这二句 if SaveDialog1.Execute then
          if SaveDialog1.FileName<>'' then
可不可以用这一句代替呢？？
       if (SaveDialog1.Execute()) then还有保存文件时，是以未知文件形式保存的。
好象在文档下，要有一个.txt文件才能保存？？
请问怎样改呢？？