可以自己增加打印存盘功能!
增加printdialog和savedialog控件
打印：
PrintDialogDoc.Copies := 1;
if PrintDialogDoc.Execute then
begin
OleDoc.OleObject.Application.ActiveWorkBook.PrintOut(, , PrintDialogDoc.Copies, , Printer.Printers[Printer.PrinterIndex], , );
end;
保存：
if FileSave.Execute then
begin
OleDoc.OleObject.Application.ActiveWorkBook.Saveas(filename := FileSave.FileName);
end;
