全國最多中醫師線上諮詢網站-台灣中醫網
發文 回覆 瀏覽次數:1970
推到 Plurk!
推到 Facebook!

FastReport 2.5導出Excel問題

 
hjandy
一般會員


發表:11
回覆:4
積分:3
註冊:2004-03-18

發送簡訊給我
#1 引用回覆 回覆 發表時間:2005-06-20 11:47:08 IP:219.130.xxx.xxx 未訂閱
用FastReport 2.5打印預覽Save文件到Excel時會出現 (1)若打印文字為1/5會轉成"1月5日(2005-1-5)"(附圖Excel.jpeg) 請問怎樣處理或怎樣修改froleexl.pas (2)怎樣在用FastReport 2.5打印預覽Save文件到Excel后可用Excel打開而不用關閉當前執行文件才允許用Excel打開 (3)若帶圖輸出到Excel會縮小与某單元不對稱(附圖) 請問怎樣處理或怎樣修改froleexl.pas(或下面這段代碼) ------------------------------------------- if TfrView(PageObj[TObjPos(ObjectPos[i]).obj]) is TfrPictureView then begin Inc(CntPics); PicObj := TfrPictureView(PageObj[TObjPos(ObjectPos[i]).obj]); {$IFDEF Delphi3} PicObj.Picture.SaveToClipboardFormat(PicFormat, THandle(PicData), HPALETTE(PicPalette)); {$ELSE} PicObj.Picture.SaveToClipboardFormat(PicFormat, PicData, PicPalette); {$ENDIF} Clipboard.SetAsHandle(PicFormat,THandle(PicData)); {$IFDEF Delphi3} Excel.Range.PasteSpecial; {$ELSE} Excel.Range.PasteSpecial(EmptyParam, EmptyParam, EmptyParam, EmptyParam); {$ENDIF} Excel.WorkSheet.Pictures[CntPics].Width := PicObj.dx / 1.5; Excel.WorkSheet.Pictures[CntPics].Height := PicObj.dy / 1.5; end; --------------------------------------------------------------------
系統時間:2024-05-22 1:39:11
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!