LabWindows CVI Word Excel 报表处理

LabWindows CVI Word Excel 报表处理 实现Word Excel等报表的处理。

#include “wordreport.h“
#include “word2000.h“
#include “word97.h“
#include “excelreport.h“
//#include “excel97.h“
//#include “excel2000.h“
//#include “EXCEL.fp.h“
#include 
#include “toolbox.h“
#include 
#include 
#include 		
#include 
#include “baobiao.h“

static int panelHandle;

int main （int argc char *argv[]）
{
	if （InitCVIRTE （0 argv 0） == 0）
		return -1;	/* out of memory */
	if （（panelHandle = LoadPanel （0 “baobiao.uir“ PANEL）） < 0）
		return -1;
	DisplayPanel （panelHandle）;
	RunUserInterface （）;
	DiscardPanel （panelHandle）;
	return 0;
}

int CVICALLBACK quit （int panel int control int event
		void *callbackData int eventData1 int eventData2）
{
	switch （event）
	{
		case EVENT_COMMIT:
			QuitUserInterface （0）;
			break;
	}
	return 0;
}

int CVICALLBACK open （int panel int control int event
		void *callbackData int eventData1 int eventData2）
{
	int rownum;
	char project[MAX_PATHNAME_LEN]; 
	char filename0[MAX_FILENAME_LEN];
	char filename1[MAX_FILENAME_LEN];
	char filename2[MAX_FILENAME_LEN];   
	char filename3[MAX_FILENAME_LEN];
	char filename4[MAX_FILENAME_LEN];
	
	char pathname[MAX_PATHNAME_LEN];
	int status; 
	long cellNumber=0;
	
	long a[1];
	
	double *DataToRead;
	int rowscolumns=3;
	int singleNumber;
	int nmkNum=0Num1=0Num2=0Num3=0;
	
	double *SingleDataToRead1;
    double *SingleDataToRead2;
    double *SingleDataToRead3;
	double data;
	switch （event）
	{
		case EVENT_COMMIT:
			GetProjectDir （project）;
				 sprintf（filename1“%s\\试验数据“project）; 
				 // 通过注释选择要打开的光照度数据文件
				 FileSelectPopup （filename1 “*.txt“ “*.txt“ “打开数据文件“ VAL_OK_BUTTON 1 1
										  1 0 pathname）;
				// strcat	（filename0filename1）;
				// strcat	（filename0“\\%s“）;					  
				// sscanf（pathnamefilename0filename2）; //“%s“
										  
				// sprintf（filename3“%s\\试验数据\\注释\\%s“projectfilename2）;
				// sprintf（filename4“%s\\试验数据\\%s“projectfilename2）;
				 //通过注释获得数据的个数
				// FileToArray （filename3 a VAL_INTEGER 1 1 VAL_GROUPS_TOGETHER VAL_GROUPS_AS_ROWS
							//  VAL_ASCII）;
				 GetFileInfo （pathnamea）;
				 cellNumber=（a[0]-4）/15;
				 
				 	 DataToRead=malloc（（cellNumber）*sizeof（double））; 
				 //实验数据写进来
				 
				 FileToArray （pathname DataToRead VAL_DOUBLE cellNumber 1 VAL_GROUPS_TOGETHER
							  VAL_GROUPS_AS_ROWS VAL_ASCII）;
				 
				 //将表格和图表中的数据清空
				 ClearStripChart （panelHandle PANEL_STRIPCHART）;
				 
				 
				 
				 GetNumTableColumns （panelHandle PANEL_TABLE &rownum）;
				 
				 if（rownum!=0）
				 DeleteTableColumns （panelHandle PANEL_TABLE 1 rownum）;
				 
				 
				 //在表格和图表中显示数据
				 if（cellNumber>0）
		         {
			         for（m=1n=1k=1;Num			     	 {
			     	     if（k<=（cellNumber/2））  
					    {
						   InsertTableColumns （panelHandle PANEL_TABLE -1 1 VAL_CELL_NUMERIC）;
						   SetTable

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件      17819  2008-11-02 18:10  报表处理\baobiao.c

     文件       4045  2008-11-02 20:53  报表处理\baobiao.cws

     文件       3177  2008-10-30 14:43  报表处理\baobiao.h

     文件       4551  2008-10-31 21:42  报表处理\baobiao.prj

     文件       8864  2008-10-30 14:43  报表处理\baobiao.uir

     文件    8909907  2008-11-02 18:10  报表处理\baobiao_dbg.cdb

     文件    1767424  2008-11-02 18:10  报表处理\baobiao_dbg.exe

     文件    2446587  2008-11-02 18:10  报表处理\cvibuild.baobiao\baobiao.nidobj

     文件      14471  2008-11-02 18:31  报表处理\cvibuild.baobiao\baobiao.niobj

     文件       8334  2008-11-02 20:53  报表处理\cvibuild.baobiao\build.ini

     文件       3820  2008-11-02 18:10  报表处理\cvibuild.baobiao\dependencies.bri

     文件     100298  2008-11-02 18:31  报表处理\cvibuild.baobiao\excelreport.niobj

     文件       1920  2008-11-02 18:31  报表处理\cvibuild.baobiao\resources.res

     文件      61410  2008-11-02 18:31  报表处理\cvibuild.baobiao\wordreport.niobj

     文件     240449  2005-10-18 10:00  报表处理\fp文件\borland\excel2000.obj

     文件     855015  2005-10-18 10:00  报表处理\fp文件\excel2000.c

     文件    3197993  2005-10-18 10:00  报表处理\fp文件\excel2000.fp

     文件     584872  2005-10-18 10:00  报表处理\fp文件\excel2000.h

     文件     269236  2005-10-18 10:00  报表处理\fp文件\excel2000.obj

     文件     324016  2005-10-18 10:00  报表处理\fp文件\excel2000.sub

     文件      36277  2005-10-18 10:00  报表处理\fp文件\excel2000dem.c

     文件     793623  2005-10-18 10:00  报表处理\fp文件\excel97.c

     文件    2939351  2005-10-18 10:00  报表处理\fp文件\excel97.fp

     文件     526860  2005-10-18 10:00  报表处理\fp文件\excel97.h

     文件     253278  2005-10-18 10:00  报表处理\fp文件\excel97.obj

     文件     282777  2005-10-18 10:00  报表处理\fp文件\excel97.sub

     文件      36238  2005-10-18 10:00  报表处理\fp文件\excel97dem.c

     文件       2052  2005-10-18 10:00  报表处理\fp文件\excelevents.h

     文件       8760  2005-10-18 10:00  报表处理\fp文件\excelevents2000.c

     文件       3556  2005-10-18 10:00  报表处理\fp文件\excelevents2000.prj

............此处省略68个文件信息