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

cxGrid V6以上導出EXCEL的方法

 
fireflybug
一般會員


發表:18
回覆:36
積分:15
註冊:2008-07-17

發送簡訊給我
#1 引用回覆 回覆 發表時間:2009-02-23 17:45:42 IP:220.130.xxx.xxx 訂閱
出處 http://blog.sina.com.cn/s/blog_4fd3c97201000cqm.html
標籤:IT/科技 cxgrid excel
cxGrid6.26導出到Excel
從原來使用cxGrid4系列開始,都是使用ExportGrid4ToExcel的辦法,可是使用了6系列後,發現這個辦法已經不行了,從Dev官方找了解決辦法。
use
cxGridExportLink;
procedure TMainForm.cxButton_MemoExcelClick(Sender: TObject);
begin
if SaveDialog1.Execute then
begin
ExportGridToExcel(SaveDialog1.FileName,cxGrid1,True,True,True);
end;
end;
///////////注意:ExportGridToExcel導出的標準格式,從源代碼可以看出是以下的格式。
ExportGridToExcel(SaveDialog1.FileName,cxGrid1,True,True,True,'xls');
但是,後參數可以省略。如:
ExportGridToExcel(SaveDialog1.FileName,cxGrid1),參數是否需要是根據需要來定。各參數的含意可以看源代碼。源碼如下:
procedure ExportGridToExcel(const AFileName: string; AGrid: TcxGrid;
AExpand: Boolean; ASaveAll: Boolean; AUseNativeFormat: Boolean; const AFileExt: string);
begin
ExportGridToFile(AFileName, cxExportToExcel, AGrid, AExpand, ASaveAll, AUseNativeFormat, '', '', '', AFileExt);
end;
------
今天的事,留到後天再說....
系統時間:2024-11-23 5:19:36
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!