用DELPHI本身的控件輸出類似Excel表的數(shù)據(jù) (2000年8月18日) 

本站更新  分類:   作者:匿名  推薦:   閱讀次數(shù):1024  
(http://www.codesky.net)  

--------------------------------------------------------------------------------
----實(shí)際應(yīng)用中，使用DELPHI的QREPORT報(bào)表功能雖然很方便，但格式不如EXCEL報(bào)
表精致。所以我們常常采用DELPHI的COMOBJ功能實(shí)現(xiàn)DELPHI與MSEXCEL的對接。

V:variant;
V:=CreateOleObject('Excel.Application');
V.Visible:=True;

----這種方法雖然簡單，但顯然有它的缺點(diǎn)：

----1：機(jī)器上要有裝有MS的EXCEL軟件。

----2：實(shí)際上是從DELPHI內(nèi)部啟動(dòng)了EXCEL，對機(jī)器的內(nèi)存配
置要求較高。

----DELPHI本身實(shí)際上有一個(gè).OCX，其中的F1BOOK完全可以實(shí)現(xiàn)EXCEL表格大部功
能，而且通過DATACOTROLS等控件實(shí)現(xiàn)TABLE表中數(shù)據(jù)與"電子表格"進(jìn)行直接的操
作，示例程序使用控件如下：

F1Book1:TF1Book;
Edit1:TEdit;
Button1:TButton;
DBEdit1:TDBEdit;
DBNavigator1:TDBNavigator;
Button2:TButton;
Label1:TLabel;
DBGrid1:TDBGrid;
DataSource1:TDataSource;
//使用了DELPHI3DBDEMOS的CUSTOMER.DB
Table1:TTable;

----這里僅是一個(gè)簡單的示例程序，對于精美的表格設(shè)計(jì)，您只要在設(shè)計(jì)或運(yùn)行時(shí)，選
TF1BOOK1，然后點(diǎn)右鍵，就完全可以進(jìn)行隨心所欲的表格設(shè)計(jì)了。

----離開了MS的龐大的EXCEL，而在程序中實(shí)現(xiàn)了"電子表格"，確實(shí)值得高興。