OpenDialog组件及
PrintDialog组件
SaveDialog组件            *不是SaveFileDialog组件,SaveFileDialog是你用
                          *SaveDialog组件定  义的一个SaveDialog对象
在控件面板上的Dialogs页上


AnsiString PathName                //应该是定义一个文件名;
另存菜单项
SaveFileDialog->FileName=PathName; //让保存对话框的文件名为PathName的值;
if(SaveFileDialog->Excuse())       //这应该是if(SaveFileDialog1->Execute())
                                   //是当打开保存对话框为真 也就是打开了保存
                                   //对话框
{
  PathName=SaveFileDialog->FileName; //用PathName保存,当前保存对话框的
                                     // 文件名;
  Caption=ExtractFileName(PathName); //让当前窗体的标题为当前保存对话框的
                                     // 文件名;
  Save1Click(Sender);                //激发你的以定义好的Save1Click事件
}