13,825
社区成员
发帖
与我相关
我的任务
分享
try
{
ExcelApplication1->Connect();
}
catch(...)
{
ShowMessage("Excel Not Availabe!");
return;
}
ExcelApplication1->set_Caption((WideString)"TEST");
ExcelApplication1->set_Visible(0,true);
ExcelWorkbook1->ConnectTo(ExcelApplication1->Workbooks->Add(TNoParam(),0));
ExcelWorksheet1->ConnectTo(ExcelWorkbook1->Worksheets->get_Item(TVariant("Sheet1")));//貌似就是这里报错了
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <OleServer.hpp>
#include <ExtCtrls.hpp>
#include <ComCtrls.hpp>
#include "Excel_2K_SRVR.h"