內容包含 紙張大小--印表幾的基本設定取得 邊界設定 文字轉表格 自動圖文集 頁眉頁首 每頁插入表格抬頭等 表格內容位置設定,字型設定等

附加檔案：22702_word02source.zip

引言: 內容包含 紙張大小--印表幾的基本設定取得 邊界設定 文字轉表格 自動圖文集 頁眉頁首 每頁插入表格抬頭等 表格內容位置設定,字型設定等

delphiwww兄，請問可否用Delphi叫出Excel的印表機設定畫面和預覽畫面，我試了好久都沒有辦法，看巨集只是用PreviewOut，可是我用了之後會當機。我是用CreateOleObject控制的。

人生有夢，逐夢而行。 人若為善，福雖未至，禍已遠離。 人若為惡，禍雖未至，福已遠離。 http://www.taconet.com.tw/jieshu/

發表人 - jieshu 於 2002/11/06 18:13:04

找了一下,不知道是不是你要的 procedure TForm1.Button4Click(Sender: TObject); begin ExcelWorkbook1.PrintPreview; //預覽 end; //版面設定,其中EmptyParam共有30個 procedure TForm1.Button5Click(Sender: TObject); begin ExcelApplication1.Dialogs.Item[xlDialogPageSetup].Show(Emptyparam,Emptyparam,Emptyparam,Emptyparam,Emptyparam, Emptyparam,Emptyparam,Emptyparam,Emptyparam,Emptyparam,Emptyparam,Emptyparam,Emptyparam,Emptyparam,Emptyparam, Emptyparam,Emptyparam,Emptyparam,Emptyparam,Emptyparam,Emptyparam,Emptyparam,Emptyparam,Emptyparam,Emptyparam, Emptyparam,Emptyparam,Emptyparam,Emptyparam,Emptyparam); end;

引言: 找了一下,不知道是不是你要的 procedure TForm1.Button4Click(Sender: TObject); begin ExcelWorkbook1.PrintPreview; //預覽 end; //版面設定,其中EmptyParam共有30個 procedure TForm1.Button5Click(Sender: TObject); begin ExcelApplication1.Dialogs.Item[xlDialogPageSetup].Show(Emptyparam,Emptyparam,Emptyparam,Emptyparam,Emptyparam, Emptyparam,Emptyparam,Emptyparam,Emptyparam,Emptyparam,Emptyparam,Emptyparam,Emptyparam,Emptyparam,Emptyparam, Emptyparam,Emptyparam,Emptyparam,Emptyparam,Emptyparam,Emptyparam,Emptyparam,Emptyparam,Emptyparam,Emptyparam, Emptyparam,Emptyparam,Emptyparam,Emptyparam,Emptyparam); end;

感謝delphiwww兄，我會試看看的，請問你是到哪裡找資料的？不會是MSDN吧，那裡資料好多，害我都不曉得要從哪裡查起。

人生有夢，逐夢而行。 人若為善，福雖未至，禍已遠離。 人若為惡，禍雖未至，福已遠離。 http://www.taconet.com.tw/jieshu/

這是我自己try出來了,msdn看了很久,幾乎是沒用

引言: 這是我自己try出來了,msdn看了很久,幾乎是沒用

之前發問時打錯了，我是用PrintPreview沒錯，可是為什麼沒有辦法預覽呢？昨天又試了一下，原來是沒有開啟Excel的關係，後來發現有些功能沒有開啟Excel是無法執行的。我是用OleContainer和CreateOleObject的方式來控制的。 真的是要多謝delphiwww兄的幫忙，那個Dialogs我也知道，但是就是不會用(試了很久)，有了你的範例，很多對話框都叫的出來了，例如：列印前先出現選擇印表機的對話框。 再次謝謝delphiwww兄的幫忙。

人生有夢，逐夢而行。 人若為善，福雖未至，禍已遠離。 人若為惡，禍雖未至，福已遠離。 http://www.taconet.com.tw/jieshu/

-->有些功能沒有開啟Excel是無法執行的 在Word&Excel中,有許多功能真的是沒有開啟是無法找到, 所以第二篇中,有關於版面設定,就只好求助於FR的source,這是沒有辦法的 Dialog是不小心發現的想法,不過說真的 試了Word & Excel後覺得報表用Word與Excel好像以前用 HE及PE2一樣,越來越好用 希望寫完這幾篇後,以後大家作報表越來越容易 delphiwww

引言: -->有些功能沒有開啟Excel是無法執行的 在Word&Excel中,有許多功能真的是沒有開啟是無法找到, 所以第二篇中,有關於版面設定,就只好求助於FR的source,這是沒有辦法的 Dialog是不小心發現的想法,不過說真的 試了Word & Excel後覺得報表用Word與Excel好像以前用 HE及PE2一樣,越來越好用 希望寫完這幾篇後,以後大家作報表越來越容易 delphiwww

FR是指FastReport吧！想不到FR也有用到Office，沒有辦法現在我都還是用QR。拿Office來當報表是好用，不過也好貴。目前的做法都是那台電腦得裝Office才行。

人生有夢，逐夢而行。 人若為善，福雖未至，禍已遠離。 人若為惡，禍雖未至，福已遠離。 http://www.taconet.com.tw/jieshu/

對不起,講的不夠清除,是指參考 FR的Source code,完成版面設定的部分 否則需要先開啟Word 或 Excel才可以做版面設定

引言: 對不起,講的不夠清除,是指參考 FR的Source code,完成版面設定的部分 否則需要先開啟Word 或 Excel才可以做版面設定

delphiwww兄，我了解我不是說用FR還要裝Office，是指用Office當報表還要裝Office，我想你說的FR的Source code部分是指將報表另存成Office吧！ ps.這裡的Office是指Word和Excel。

人生有夢，逐夢而行。 人若為善，福雖未至，禍已遠離。 人若為惡，禍雖未至，福已遠離。 http://www.taconet.com.tw/jieshu/