C++中實(shí)現(xiàn)把表的數(shù)據(jù)導(dǎo)出到EXCEL并打印實(shí)例代碼
更新時(shí)間：2017年04月04日 10:46:25 作者：咪當(dāng)我系歐巴
這篇文章主要介紹了實(shí)現(xiàn)把表的數(shù)據(jù)導(dǎo)出到EXCEL并打印實(shí)例代碼的相關(guān)資料,需要的朋友可以參考下
實(shí)現(xiàn)把表的數(shù)據(jù)導(dǎo)出到EXCEL并打印實(shí)例代碼
首先加入這兩句：
#include "utilcls.h" #include "comobj.hpp"
下面正式開始：
void __fastcall TMainForm::ToExcel(TADOQuery *TT,AnsiString str)
{//TT為被導(dǎo)出數(shù)據(jù)的表,str為命令(具體看代碼底部的if語(yǔ)句)
#define PG OlePropertyGet
#define PS OlePropertySet
#define FN OleFunction
#define PR OleProcedure
Variant excel;
try
{
excel=CreateOleObject("Excel.Application"); //啟動(dòng)Excel
}
catch(...)
{
ShowMessage("無(wú)法啟動(dòng)Excel,請(qǐng)檢查是否已經(jīng)安裝EXCEL!");
}
excel.PS("Visible", (Variant)true); //使Excel啟動(dòng)后可見(jiàn)
excel.PG("workbooks").FN("Add", 1); //單工作表
for(int i=0;i<TT->FieldCount;i++) //首先給EXCEL添加表的字段名
{
excel.Exec(PropertyGet("Cells")<<1<<i+1).Exec(PropertySet("Value")<<TT->FieldList->Strings[i]);
}
for(int j=0;j<TT->FieldCount;j++)//按字段排列
{ TT->First();
for(int i=0;i<TT->RecordCount;i++)//按數(shù)據(jù)順序排雷
{
excel.Exec(PropertyGet("Cells")<<i+2<<j+1).Exec(PropertySet("Value")<<TT->FieldByName(TT->FieldList->Strings[j])->AsString);
TT->Next();
}
}
if(str=="導(dǎo)出"){}//如果是導(dǎo)出，就什么都不干
if(str=="打印")//如果是打印
excel.OlePropertyGet("ActiveWorkBook").OlePropertyGet("ActiveSheet").OleFunction("PrintOut");
if(str=="打印瀏覽")//如果是打印瀏覽
excel.OlePropertyGet("ActiveWorkBook").OlePropertyGet("ActiveSheet").OleFunction("PrintPreview");
excel.~Variant();
}
感謝閱讀，希望能幫助到大家，謝謝大家對(duì)本站的支持！
相關(guān)文章
這篇文章主要為大家詳細(xì)介紹了使用C語(yǔ)言實(shí)現(xiàn)貪吃蛇小游戲，文中示例代碼介紹的非常詳細(xì)，具有一定的參考價(jià)值，感興趣的小伙伴們可以參考一下2022-07-07
指針提供了對(duì)地址操作的一種方法，因此，使用指針可使得?C?語(yǔ)言能夠更高效地實(shí)現(xiàn)對(duì)計(jì)算機(jī)底層硬件的操作。另外，通過(guò)指針可以更便捷地操作數(shù)組。在一定意義上可以說(shuō)，指針是?C?語(yǔ)言的精髓2022-04-04
使用C++和Direct3D (d3d)獲取屏幕截圖并根據(jù)傳入分辨率進(jìn)行縮放圖片大小(最新推薦)
這篇文章主要介紹了使用C++和Direct3D (d3d)獲取屏幕截圖并根據(jù)傳入分辨率進(jìn)行縮放圖片大小,本文給大家講解的非常詳細(xì)，對(duì)大家的學(xué)習(xí)或工作具有一定的參考借鑒價(jià)值，需要的朋友可以參考下2023-04-04
這篇文章主要為大家詳細(xì)介紹了Qt多線程的實(shí)現(xiàn)方式的相關(guān)知識(shí),文中的示例代碼講解詳細(xì),具有一定的借鑒價(jià)值,感興趣的小伙伴可以跟隨小編一起學(xué)習(xí)一下2025-01-01
C++詳解如何實(shí)現(xiàn)兩個(gè)線程交替打印
這篇文章主要介紹了使用C++庫(kù)實(shí)現(xiàn)兩個(gè)線程交替打印，一個(gè)線程打印奇數(shù)、一個(gè)線程打印偶數(shù)，文中通過(guò)示例代碼介紹的非常詳細(xì)，對(duì)大家的學(xué)習(xí)或者工作具有一定的參考學(xué)習(xí)價(jià)值，需要的朋友們下面隨著小編來(lái)一起學(xué)習(xí)學(xué)習(xí)吧2022-08-08
C++?折疊參數(shù)包詳解(悄然增強(qiáng)編程效率)
折疊參數(shù)就是一個(gè)參數(shù)包, 代表是多個(gè)未知,tuple元組就是一個(gè)折疊參數(shù)的使用，這篇文章主要介紹了C++?折疊參數(shù)包悄然增強(qiáng)編程效率,需要的朋友可以參考下2023-05-05
C語(yǔ)言 數(shù)據(jù)結(jié)構(gòu)中棧的實(shí)現(xiàn)代碼
這篇文章主要介紹了C語(yǔ)言 數(shù)據(jù)結(jié)構(gòu)中棧的實(shí)現(xiàn)代碼的相關(guān)資料,需要的朋友可以參考下2016-10-10
C++數(shù)據(jù)結(jié)構(gòu)之單鏈表的實(shí)現(xiàn)
線性表的鏈?zhǔn)酱鎯?chǔ)又稱為單鏈表，它是指通過(guò)一組任意的存儲(chǔ)單元來(lái)存儲(chǔ)線性表中的數(shù)據(jù)元素。本文將用C++實(shí)現(xiàn)單鏈表，需要的可以參考一下2022-05-05
這篇文章給大家介紹了DLL加載設(shè)置相對(duì)路徑的方法，非常不錯(cuò)，具有一定的參考借鑒加載，需要的朋友參考下吧2018-08-08
C++可變參數(shù)函數(shù)的實(shí)現(xiàn)方法示例
這篇文章主要給大家介紹了關(guān)于C++可變參數(shù)函數(shù)的實(shí)現(xiàn)方法，文中通過(guò)示例代碼介紹的非常詳細(xì)，對(duì)大家的學(xué)習(xí)或者工作具有一定的參考學(xué)習(xí)價(jià)值，需要的朋友們下面隨著小編來(lái)一起學(xué)習(xí)學(xué)習(xí)吧2020-12-12