请问：用F1Book保存文件为什么保存后的文件里什么也没有呢？

Question

源代码如下：
procedure TForm1.ToolButton2Click(Sender: TObject);
var 
    FFileName: string;
    FFileType: Integer;
begin
    SaveDialog1.Execute;
    FFileName := SaveDialog1.FileName;
    FFileType := SaveDialog1.FilterIndex;
    F1Book601.WriteEx(FFileName,FFileType);
end;我用的是windows标准保存对话框（因为用F1Book的保存对话框的时候，怎么也打不开！），不知道是什么问题，程序可以运行，但是保存后的文件是空的，不论是*.txt,还是 *.xls的，好像程序根本就没有执行到WriteEx里头去，怎么回事呢？请高手不吝赐教！多谢！！