存檔後檔案顯示 「因為檔案似乎已損壞、已損毀或太大」。
程式如下:

WordApplication1.Documents.Open(FileName,EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam);
WordApplication1.Selection.WholeStory;
WordApplication1.Selection.CopyAsPicture;
Image1.Picture.Assign(Clipboard);
Image1.Picture.SaveToFile('d:\a.jpg');

WordApplication1.Selection.CopyAsPicture; 後將圖片先顯示在 Image1 是可以看的見的，但存檔後就看不見~~。

印象中TImage不支援JPG,應該還需要BMP->JPG的步驟
Ex. http://delphi.ktop.com.tw/board.php?cid=30&fid=72&tid=20515

感謝回應^^
後來我參考了 http://delphi.ktop.com.tw/board.php?cid=30&fid=69&tid=105259
目前只有轉一頁可能沒事，多頁可能就會「ExcelSelectionCopyPicture(Appearance:=xlScreen, Format:=xlBitmap);