动态读取Excel中的内容

mikewolf2k · 发表于 2017-8-18 09:00:31

从技术的角度来说，很不错。从实用的角度来说，华而不实。

小明同学 · 发表于 2017-8-18 11:42:34

学习了

springwillow · 发表于 2017-8-18 15:00:17

mikewolf2k 发表于 2017-8-18 09:00
从技术的角度来说，很不错。从实用的角度来说，华而不实。

说的是，只是练一下多线程，确实不怎么实用。后面可以用对话框外建线程处理，这样对话框本身就可以不死了

alexmai · 发表于 2017-8-18 16:52:11

那没有安装这个插件的电脑，还会自动更新数据吗？

springwillow · 发表于 2017-8-18 18:00:07

alexmai 发表于 2017-8-18 16:52
那没有安装这个插件的电脑，还会自动更新数据吗？

不会，这个只是练习多线程的作品，关掉EXCEL就失效拉

springwillow · 发表于 2017-8-18 18:12:01

把主要源码给大家，有想学的可以看看，写的比较烂，大家对付看吧

// (C) Copyright 2002-2007 by Autodesk, Inc.
//
// Permission to use, copy, modify, and distribute this software in
// object code form for any purpose and without fee is hereby granted,
// provided that the above copyright notice appears in all copies and
// that both that copyright notice and the limited warranty and
// restricted rights notice below appear in all supporting
// documentation.
//
// AUTODESK PROVIDES THIS PROGRAM "AS IS" AND WITH ALL FAULTS.
// AUTODESK SPECIFICALLY DISCLAIMS ANY IMPLIED WARRANTY OF
// MERCHANTABILITY OR FITNESS FOR A PARTICULAR USE. AUTODESK, INC.
// DOES NOT WARRANT THAT THE OPERATION OF THE PROGRAM WILL BE
// UNINTERRUPTED OR ERROR FREE.
//
// Use, duplication, or disclosure by the U.S. Government is subject to
// restrictions set forth in FAR 52.227-19 (Commercial Computer
// Software - Restricted Rights) and DFAR 252.227-7013(c)(1)(ii)
// (Rights in Technical Data and Computer Software), as applicable.
//
//-----------------------------------------------------------------------------
//----- acrxEntryPoint.cpp
//-----------------------------------------------------------------------------
#include "StdAfx.h"
#include "resource.h"
#include "CApplication.h"
#include "CWorkbook.h"
#include "CWorkbooks.h"
#include "CWorksheet.h"
#include "CWorksheets.h"
#include "CRange.h"
#include "CBorder.h"
#include "CBorders.h"
#include "CFont0.h"
#include <comdef.h>
#include <list>
#include <vector>
#include "Calculation.h"
//-----------------------------------------------------------------------------
#define szRDS _RXST("YCL")
using namespace std;
bool IsExitThreade = false;
// 边框的类型 Borders[N]
// xlEdgeLeft 左=1
// xlEdgeRight 右=2
// xlEdgeTop 顶=3
// xlEdgeBottom 底=4
// xlDiagonalUp 左上右下=5
// xlDiagonalDown 左下右上=6
// xlEdgeLeft 外部左边框=7
// xlEdgeTop 外部上边框=8
// xlEdgeBottom 外部下边框=9
// xlEdgeRight 外部右边框=10
// xlInsideVertical 内部竖线=11
// xlInsideHorizontal 内部横线=12
// (其中1：为左 2：右 3：顶 4：底 5：斜\ 6：斜/)
// #define xlEdgeLeft 1
// #define xlEdgeTop 2
// #define xlEdgeBottom 3
// #define xlEdgeRight 4
// #define xlDiagonalUp 5
// #define xlDiagonalDown 6
// #define xlEdgeLeft 7
// #define xlEdgeTop 8
// #define xlEdgeBottom 9
// #define xlEdgeRight 10
// #define xlInsideVertical 11
// #define xlInsideHorizontal 12
#define Aligndefault 0
#define Alignleft 1
#define AlignCenter 2
#define AlignRight 3
//定义几个传递表信息所需要的结构体
struct TableLine
{
//线的起始点
bool IsRowcontinue;
bool IsColcontinue;
AcGePoint3d TopStartPoint;
AcGePoint3d TopEndPoint;
AcGePoint3d BottomStartPoint;
AcGePoint3d BottomEndPoint;
AcGePoint3d TopCurentPoint;
AcGePoint3d BottomCurentPoint;
};
//单元格信息
struct TextInfo
{
//行号
int RowNum;
//列号
int ColNum;
//行高
float rowheiht;
//列宽
float colwidth;
//单元格内容
TCHAR text[512];
//单元格字高
float texthight;
//是否是合并单元格
bool IsMergeCells;
//合并单无格的行数
int UnionRowNums;
//合并单元格的列数
int UnionColNums;
//合并单元格的起始行
int UnionStartRowNum;
//合并单元格的起始列
int UnionStartColNum;
AcGePoint3d LUPoint;
AcGePoint3d RUPoint;
AcGePoint3d LBPoint;
AcGePoint3d RBPoint;
bool IsTop;
bool IsBottom;
bool IsLeft;
bool IsRight;
int HorizontalAlignment;
AcDbObjectId Objectid;
};
AcGePoint3d ptInsert;
ads_real Scale =1;
// 将实体添加到图形数据库的模型空间
AcDbObjectId PostToModelSpace(AcDbEntity* pEnt)
{
AcDbBlockTable *pBlockTable;
acdbHostApplicationServices()->workingDatabase()->getBlockTable(pBlockTable, AcDb::kForRead);
AcDbBlockTableRecord *pBlockTableRecord;
acDocManager->lockDocument(curDoc());
if(pBlockTable->getAt(ACDB_MODEL_SPACE, pBlockTableRecord, AcDb::kForWrite) == Acad::eOk)
{
AcDbObjectId entId;
pBlockTableRecord->appendAcDbEntity(entId, pEnt);
pBlockTable->close();
pBlockTableRecord->close();
pEnt->close();
// 解锁文档
acDocManager->unlockDocument(curDoc());
return entId;
}
// 解锁文档
acDocManager->unlockDocument(curDoc());
return NULL;
}
//其中CurrTextStyle(styleName)是得到当前字体样式，函数如下：
bool FindTextStyle(TCHAR* textStyle)
{
bool ret = false;
AcDbTextStyleTable *pTextStyleTbl = NULL;
acdbHostApplicationServices()->workingDatabase()->getSymbolTable(pTextStyleTbl, AcDb::kForRead);
AcDbTextStyleTableIterator *pIt = NULL;
pTextStyleTbl->newIterator(pIt);
for (;!pIt->done();pIt->step())
{
AcDbTextStyleTableRecord *pRcd = NULL;
if (pIt->getRecord(pRcd, AcDb::kForRead) == Acad::eOk)
{
TCHAR *szName = NULL;
pRcd->getName(szName);
if (_tcscmp(szName,textStyle) == 0)
{
pRcd->close();
ret = true;
break;
}
acutDelString(szName);
pRcd->close();
}
}
delete pIt;
pTextStyleTbl->close();
return ret;
}
bool CurrTextStyle(TCHAR *&styleName,TCHAR *&fontName,TCHAR *&bigFontName,AcDbObjectId &Id)
{
Id = acdbHostApplicationServices()->workingDatabase()->textstyle();
AcDbTextStyleTableRecord* pStyleRecord;
if(acdbOpenObject((AcDbObject *&)pStyleRecord, Id, AcDb::kForRead) == Acad::eOk) {
const TCHAR *name;
pStyleRecord->getName(name);
_tcscpy(styleName, name);
pStyleRecord->fileName(name);
_tcscpy(fontName, name);
pStyleRecord->bigFontFileName(name);
_tcscpy(bigFontName, name);
pStyleRecord->close();
return true;
}
return false;
// else _tcscpy(styleName, _T("STANDARD"));
}
//===========================创建文字样式===========================================
AcDbObjectId createTextStyle(TCHAR* fontName,TCHAR* bigFontName,TCHAR* textStyleName)
{
AcGiTextStyle *TextStyle=new AcGiTextStyle
(fontName,
bigFontName,
0,
1,
0,
0,
Adesk::kFalse,
Adesk::kFalse,
Adesk::kFalse,
Adesk::kFalse,
Adesk::kFalse,
Adesk::kFalse,
textStyleName); //字体名
AcDbObjectId textStyleId;
toAcDbTextStyle(*TextStyle,textStyleId);
return textStyleId;
}
//函数 CreateText，用于创建文字对象
AcDbObjectId CreateText(const AcGePoint3d& LUInsert,const AcGePoint3d& RBInsert, const TCHAR *text, AcDbObjectId style, double height, double rotation,int HorizontalAlignment)
{
AcGePoint3d InsertPoint;
switch (HorizontalAlignment)
{
case Aligndefault:
{
InsertPoint =CCalculation::MiddlePoint(LUInsert,RBInsert);
AcDbText *pText = new AcDbText(InsertPoint,text, style, height,rotation);
pText->setJustification(pText->kTextAlignmentMiddle);
pText->setAlignmentPoint(InsertPoint);
return PostToModelSpace(pText);
}
case Alignleft:
{
InsertPoint =CCalculation::MiddlePoint(LUInsert,RBInsert);
InsertPoint.x = LUInsert.x;
// InsertPoint.y -= height * 0.5;
AcDbText *pText = new AcDbText(InsertPoint,text, style, height,rotation);
pText->setJustification(pText->kTextAlignmentMiddleLeft);
pText->setAlignmentPoint(InsertPoint);
return PostToModelSpace(pText);
}
case AlignCenter:
{
InsertPoint =CCalculation::MiddlePoint(LUInsert,RBInsert);
// InsertPoint.y -= height * 0.5;
AcDbText *pText = new AcDbText(InsertPoint,text, style, height,rotation);
pText->setJustification(pText->kTextAlignmentMiddleCenter);
pText->setAlignmentPoint(InsertPoint);
return PostToModelSpace(pText);
}
case AlignRight:
{
InsertPoint =CCalculation::MiddlePoint(LUInsert,RBInsert);
InsertPoint.x = RBInsert.x;
// InsertPoint.y -= height * 0.5;
AcDbText *pText = new AcDbText(InsertPoint,text, style, height,rotation);
pText->setJustification(pText->kTextAlignmentMiddleRight);
pText->setAlignmentPoint(InsertPoint);
return PostToModelSpace(pText);
}
};
return NULL;
}
//CreateMText 函数，用于添加多行文字
AcDbObjectId CreateMText(const AcGePoint3d& LUInsert,const AcGePoint3d& RBInsert, const TCHAR *text, AcDbObjectId style, double height, int HorizontalAlignment,const AcGePoint3d& PointInsert,CString Caption,CString BookName,CString SheetName,int start_row,int start_col,int row_num,int col_num)
{
AcDbMText *pMText = new AcDbMText();
AcGePoint3d InsertPoint;
double width = RBInsert.x - LUInsert.x - height * 0.4;
/*
//向对象写入扩展数据
TCHAR AppName[] ={ _T("ReadeEXCEL")};
ads_point pt;
pt[0] = PointInsert.x;
pt[1] = PointInsert.y;
pt[2] = PointInsert.z;
struct resbuf* pRb = acutBuildList(AcDb::kDxfRegAppName, AppName, // 应用程序名称
AcDb::kDxfXdAsciiString, Caption, // Excel标题
AcDb::kDxfXdAsciiString, BookName, // 字符串
AcDb::kDxfXdAsciiString, SheetName, // 字符串
AcDb::kDxfXdInteger32,start_row,
AcDb::kDxfXdInteger32,start_col,
AcDb::kDxfXdInteger32,row_num,
AcDb::kDxfXdInteger32,col_num,
AcDb::kDxfXdWorldXCoord,pt,
RTNONE);
pMText->setXData(pRb);
*/
switch (HorizontalAlignment)
{
case Aligndefault:
{
InsertPoint =CCalculation::MiddlePoint(LUInsert,RBInsert);
// 设置多行文字的特性
pMText->setTextStyle(style);
pMText->setContents(text);
pMText->setLocation(InsertPoint);
pMText->setTextHeight(height);
pMText->setWidth(width);
pMText->setAttachment(AcDbMText::kMiddleCenter);
return PostToModelSpace(pMText);
}
case Alignleft:
{
InsertPoint =CCalculation::MiddlePoint(LUInsert,RBInsert);
InsertPoint.x = LUInsert.x + height * 0.2;
pMText->setTextStyle(style);
pMText->setContents(text);
pMText->setLocation(InsertPoint);
pMText->setTextHeight(height);
pMText->setWidth(width);
pMText->setAttachment(AcDbMText::kMiddleLeft);
return PostToModelSpace(pMText);
}
case AlignCenter:
{
InsertPoint =CCalculation::MiddlePoint(LUInsert,RBInsert);
pMText->setTextStyle(style);
pMText->setContents(text);
pMText->setLocation(InsertPoint);
pMText->setTextHeight(height);
pMText->setWidth(width);
pMText->setAttachment(AcDbMText::kMiddleCenter);
return PostToModelSpace(pMText);
}
case AlignRight:
{
InsertPoint =CCalculation::MiddlePoint(LUInsert,RBInsert);
InsertPoint.x = RBInsert.x - height * 0.2;
pMText->setTextStyle(style);
pMText->setContents(text);
pMText->setLocation(InsertPoint);
pMText->setTextHeight(height);
pMText->setWidth(width);
pMText->setAttachment(AcDbMText::kMiddleRight);
return PostToModelSpace(pMText);
}
};
return NULL;
}
// 创建直线
AcDbObjectId CreateLine(AcGePoint3d ptStart, AcGePoint3d ptEnd)
{
AcDbLine *pLine = new AcDbLine(ptStart, ptEnd);
// 将实体添加到图形数据库
AcDbObjectId lineId;
lineId = PostToModelSpace(pLine);
return lineId;
}
//该函数根据两个角点和线宽来创建矩形
AcDbObjectId CreateRectangle(AcGePoint2d pt1, AcGePoint2d pt2, double width)
{
// 提取两个角点的坐标值
double x1 = pt1.x, x2 = pt2.x;
double y1 = pt1.y, y2 = pt2.y;
// 计算矩形的角点
AcGePoint2d ptLeftBottom(CCalculation::Min(x1, x2), CCalculation::Min(y1, y2));
AcGePoint2d ptRightBottom(CCalculation::Max(x1, x2), CCalculation::Min(y1, y2));
AcGePoint2d ptRightTop(CCalculation::Max(x1, x2), CCalculation::Max(y1, y2));
AcGePoint2d ptLeftTop(CCalculation::Min(x1, x2), CCalculation::Max(y1, y2));
// 创建对应的多段线
AcDbPolyline *pPoly = new AcDbPolyline(4);
pPoly->addVertexAt(0, ptLeftBottom, 0, width, width);
pPoly->addVertexAt(1, ptRightBottom, 0, width, width);
pPoly->addVertexAt(2, ptRightTop, 0, width, width);
pPoly->addVertexAt(3, ptLeftTop, 0, width, width);
pPoly->setClosed(Adesk::kTrue);
// 将多段线添加到模型空间
AcDbObjectId polyId;
polyId = PostToModelSpace(pPoly);
return polyId;
}
//表格到处到Excel
int DynamicWriteToExcel()
{
ads_name ssname;
struct resbuf *rb;
rb = acutBuildList(RTDXF0,_T("TEXT,LWPOLYLINE,LINE"),RTNONE);
if(acedSSGet(NULL,NULL,NULL,rb,ssname) != RTNORM)
{
acutRelRb(rb);
}
else
{
acutRelRb(rb);
Adesk::Int32 sslength;
acedSSLength(ssname, &sslength);
// acutPrintf(_T("%d\n"),sslength);
AcDbObjectId objId;
AcDbObjectIdArray LWpolyLineObjectIdArray ,LineObjectIdArray,TextObjectIdArray;
for(int i = 0;i < sslength;i++)
{
ads_name ent;
acedSSName(ssname, i, ent);
acdbGetObjectId(objId, ent);
AcDbEntity *pEnt;
//将对象按类型分类
if(acdbOpenAcDbEntity((AcDbEntity *&)pEnt, objId, AcDb::kForRead) == Acad::eOk)
{
if (pEnt->isKindOf(AcDb2dPolyline::desc()))
{
LWpolyLineObjectIdArray.append(objId);
}
else if(pEnt->isKindOf(AcDbLine::desc()))
{
LineObjectIdArray.append(objId);
}
else if(pEnt->isKindOf(AcDbLine::desc()))
{
TextObjectIdArray.append(objId);
}
pEnt->close();
}
}
}
return 0;
}
BOOL CALLBACK EnumChildProc(
HWND hwnd, // handle to child window
LPARAM lParam // application-defined value
)
{
TCHAR szText[50];
CString strBuffer;
::GetWindowText(hwnd,szText,50);
strBuffer.Format(szText);
if (strBuffer.Find(_T("Book")) != -1)
{
::PostMessage(hwnd,WM_KEYDOWN,VK_TAB,0);
::PostMessage(hwnd,WM_KEYUP,VK_TAB,0);
Sleep(500);
::PostMessage(hwnd,WM_KEYDOWN,VK_LEFT,0);
::PostMessage(hwnd,WM_KEYUP,VK_LEFT,0);
}
// PWINDOWINFO pwindowinfo = NULL;
// ::GetWindowInfo(hwnd,pwindowinfo);
// if (pwindowinfo != NULL)
// {
// if( pwindowinfo->dwWindowStatus == 0)
// IsContinue = true;
// else
// IsContinue = false;
// }
return TRUE;
// //需要枚举子窗口，因为状态栏为子窗口，获取状态栏的句柄
// TCHAR temp1[50];
// if(hwnd)
// {
// ::GetClassName(hwnd,temp1,255);
// if(_tcscmp(temp1,_T("NetUIHWND")))//这个字符串使用spy++或者spyxx获得的状态栏类名
// {
// int nItemCount;
// int i;
// TCHAR chBuffer[50];
// DWORD dwProcessID;
// HANDLE hProcess;
// void * Pointer;
// SIZE_T nNumberOfBytesRead;
// nItemCount = ::SendMessage(hwnd, SB_GETPARTS, 0, 0);
// ::GetWindowThreadProcessId(hwnd, &dwProcessID);//和dwProcessID=pID效果一样
// hProcess = OpenProcess(PROCESS_VM_OPERATION|PROCESS_VM_READ|PROCESS_VM_WRITE,false,dwProcessID);
// Pointer = VirtualAllocEx(hProcess,NULL,4096,MEM_RESERVE | MEM_COMMIT,PAGE_READWRITE);
// for(i= 0 ; i < 4 ; ++i)
// {
// ::SendMessage(hwnd, SB_GETTEXT, i, (LPARAM)Pointer);
// ::ReadProcessMemory(hProcess, Pointer,chBuffer, sizeof(chBuffer), &nNumberOfBytesRead);
// AfxMessageBox(chBuffer);
// }
// VirtualFreeEx(hProcess,Pointer,0, MEM_RELEASE);
// CloseHandle(hProcess);
// return true;
// }
// }
// return true;
}
//关联线程函数
DWORD WINAPI ThreadProc(
LPVOID lpParameter // thread data
)
{
// //检查当前字体样式
// TCHAR StrStyleName[50];
// TCHAR* CurStyleName = new TCHAR[40];
// TCHAR* StrFileName = new TCHAR[40];
// TCHAR* StrBigFontFileName =new TCHAR[40];
// AcDbObjectId CurSthyleID=NULL,StyleID=NULL;
// if (CurrTextStyle(CurStyleName,StrFileName,StrBigFontFileName,CurSthyleID))
// {
// _tcscpy_s(StrStyleName,CurStyleName);
// _tcscat(StrStyleName,_T("_xls"));
//
// if (!FindTextStyle(StrStyleName))
// {
// if (_tcscmp(StrFileName,_T("")) == 0)
// {
// StyleID = createTextStyle(_T("arial.ttf"),_T("gbcbig.shx"),StrStyleName);
// }
// else
// {
// StyleID = createTextStyle(StrFileName,StrBigFontFileName,StrStyleName);
// }
// }
// }
// else
// {
// _tcscpy_s(StrStyleName,_T("Standard_xls"));
// createTextStyle(_T("gbenor.shx"),_T("gbcbig.shx"),StrStyleName);
// }
// delete [] StrFileName;
// delete [] StrBigFontFileName;
//常用变量定义
CApplication app;
CWorkbooks Workbooks;
CWorkbook Workbook;
CWorksheets Worksheets;
CWorksheet Worksheet;
CRange ranges;
CRange iCell;
LPDISPATCH lpDisp;
COleVariant
covTrue((short)TRUE),
covFalse((short)FALSE),
covOptional((long)DISP_E_PARAMNOTFOUND, VT_ERROR);
COleVariant vResult;
TextInfo* TextInfoArr =(TextInfo*)lpParameter;
//采用MFC方式初始化COM库，程序结束时COM库会自动释放
// if(!AfxOleInit())
// {
//
// MessageBox(NULL,_T("初始化COM支持库失败!\n无法控制Excel!更新线程退出！"),_T("警告"),MB_ICONERROR | MB_OK);
// delete[] TextInfoArr;
// ::ExitThread(1);
// return 0;
// }
//关联已经运行的Excel实例
CString str = TextInfoArr[0].text;
int booknamelen = str.Find(_T(","));
CString BookName = str.Left(booknamelen);
CString Caption = str.TrimLeft(BookName);
Caption = Caption.TrimLeft(_T(","));
booknamelen = Caption.Find(_T(","));
CString SheetName=Caption.Left(booknamelen);
Caption = Caption.TrimLeft(SheetName);
Caption = Caption.TrimLeft(_T(","));
int start_row = TextInfoArr[0].UnionStartRowNum;
int start_col = TextInfoArr[0].UnionStartColNum;
int row_nums = TextInfoArr[0].RowNum;
int col_nums = TextInfoArr[0].ColNum;
bool IsContinue = false;
HWND hExcel = NULL;
while (TRUE)
{
if (IsExitThreade)
{
app.ReleaseDispatch ();
delete[] TextInfoArr;
AfxOleTerm();
return 2;;
}
//如果当前窗口是Excel窗口，则不读取
HWND hwnd = FindWindow(TEXT("XLMAIN"),Caption);
HWND Forehwnd =GetForegroundWindow();
if (hwnd == NULL)
{
app.ReleaseDispatch ();
delete[] TextInfoArr;
AfxOleTerm();
::MessageBox(NULL, _T("关联的Excel关闭或有其它Excel打开，关联线程退出！"), _T("警告"), MB_ICONHAND);
return 2;
}
else if(Forehwnd == hwnd)
{
Sleep(2000);
IsContinue = true;
continue;
}
else if(FindWindow(NULL,TEXT("Microsoft Office Excel")) != Forehwnd)
{
if(IsContinue)
{
EnumChildWindows(hwnd,EnumChildProc,NULL);
IsContinue = false;
}
else
{
Sleep(2000);
continue;
}
}
else
{
Sleep(2000);
continue;
}
CLSID clsid;
CLSIDFromProgID(L"Excel.Application", &clsid);
IUnknown *pUnk = NULL;
IDispatch *pRunDisp = NULL;
for(long i=1;i<=5;i++) //做5次尝试
{
HRESULT hr = GetActiveObject(clsid, NULL, (IUnknown**)&pUnk);
if(SUCCEEDED(hr))
{
hr = pUnk->QueryInterface(IID_IDispatch, (void **)&pRunDisp);
break;
}
::Sleep(10);
}
if (!pRunDisp)
{
::MessageBox(NULL, _T("没有发现Excel!更新线程退出！"), _T("警告"), MB_ICONHAND);
//如果VectorTableinfo不为空则将其清空
delete[] TextInfoArr;
/* delete[] CurStyleName;*/
AfxOleTerm();
return 2;
}
if (pUnk) pUnk->Release();
//关联Excel
app.AttachDispatch (pRunDisp);
//获取当前激活的workbooks
lpDisp=app.get_Workbooks();
if(lpDisp==NULL)
{
MessageBox(NULL,_T( "没有发现有效的Book!"), _T("TrueTable"),MB_ICONERROR | MB_OK);
app.ReleaseDispatch ();
//如果VectorTableinfo不为空则将其清空
delete[] TextInfoArr;
AfxOleTerm();
return 2;
}
Workbooks.AttachDispatch(lpDisp);
for (int i=0;i<Workbooks.get_Count();i++)
{
bool IsBreak=false;
lpDisp=Workbooks.get_Item(COleVariant((long)i+1));
if(lpDisp==NULL)
continue;
Workbook.AttachDispatch(lpDisp);
CString WorkBookName = Workbook.get_Name();
if(_tcscmp(WorkBookName,BookName) != 0)
continue;
lpDisp = Workbook.get_Worksheets();
if(lpDisp == NULL)
{
app.ReleaseDispatch ();
Workbooks.ReleaseDispatch();
//如果VectorTableinfo不为空则将其清空
delete[] TextInfoArr;
AfxOleTerm();
return 2;
}
Worksheets.AttachDispatch(lpDisp);
for (int j=0;j<Worksheets.get_Count();j++)
{
lpDisp = Worksheets.get_Item(COleVariant((long)j+1));
if(lpDisp == NULL)
{
app.ReleaseDispatch ();
Workbooks.ReleaseDispatch();
Workbook.ReleaseDispatch();
//如果VectorTableinfo不为空则将其清空
delete[] TextInfoArr;
/* delete[] CurStyleName;*/
AfxOleTerm();
return 2;
}
Worksheet.AttachDispatch(lpDisp);
if (_tcscmp(Worksheet.get_Name(),SheetName) != 0)
continue;
ranges.AttachDispatch(Worksheet.get_Cells());
//已经获取了想要的sheet，下一步就需要对表格的内容进行检测和修改了
for (int m=1;m<=TextInfoArr[0].RowNum * TextInfoArr[0].ColNum;m++)
{
TextInfo textinfo= TextInfoArr[m];
iCell.AttachDispatch(ranges.get_Item (COleVariant((long)textinfo.RowNum),COleVariant((long)textinfo.ColNum)).pdispVal );
CString text = iCell.get_Text();
iCell.ReleaseDispatch ();
if (_tcscmp(text,textinfo.text) == 0)
{
continue;
}
if (_tcscmp(_T(""),text) == 0)
{
AcDbObjectId ObjectId = textinfo.Objectid;
AcDbText* pEnt=NULL;
// 锁定文档
acDocManager->lockDocument(curDoc());
Acad::ErrorStatus es = acdbOpenObject((AcDbEntity *&)pEnt,ObjectId,AcDb::kForWrite);
if (es == Acad::eOk)
{
pEnt->erase();
_tcscpy(TextInfoArr[m].text,text);
TextInfoArr[m].Objectid = NULL;
pEnt->close();
//更新屏幕显示
// acedUpdateDisplay();
}
else if(es == Acad::eWasErased)
{
// 解锁文档
acDocManager->unlockDocument(curDoc());
ranges.ReleaseDispatch();
Worksheet.ReleaseDispatch ();
Worksheets.ReleaseDispatch ();
Workbook.ReleaseDispatch ();
Workbooks.ReleaseDispatch ();
delete[] TextInfoArr;
::MessageBox(NULL, _T("有手动删除对象，线程退出！"), _T("警告"), MB_ICONHAND);
/* delete[] CurStyleName;*/
AfxOleTerm();
return 2;
}
// 解锁文档
acDocManager->unlockDocument(curDoc());
}
else
{
if (_tcscmp(_T(""),textinfo.text) == 0)
{
_tcscpy(TextInfoArr[m].text,text);
_tcscpy(textinfo.text,text);
// AcGePoint3d InsertPoint =CCalculation::MiddlePoint(textinfo.LUPoint,textinfo.RBPoint);
AcDbObjectId Obj = CreateMText(textinfo.LUPoint,textinfo.RBPoint,textinfo.text,AcDbObjectId::kNull,textinfo.texthight,textinfo.HorizontalAlignment,ptInsert,Caption,BookName,SheetName,start_row,start_col,row_nums,col_nums);
if (Obj != NULL)
{
TextInfoArr[m].Objectid = Obj;
// acedUpdateDisplay();
}
}
else
{
AcDbObjectId ObjectId = textinfo.Objectid;
AcDbMText* pEnt=NULL;
// 锁定文档
acDocManager->lockDocument(curDoc());
Acad::ErrorStatus es = acdbOpenObject((AcDbEntity *&)pEnt,ObjectId,AcDb::kForWrite);
AcDbObjectId StyleObjectId;
if (es == Acad::eOk)
{
pEnt->setContents(text);
// pEnt->adjustAlignment(acdbHostApplicationServices()->workingDatabase());
// pEnt->recordGraphicsModified(true);
// acedUpdateDisplay();
// StyleObjectId = pEnt->textStyle();
// if (StyleID != NULL && StyleObjectId != StyleID)
// {
// pEnt->setTextStyle(StyleID);
// }
// else if (CurSthyleID != NULL && CurSthyleID != StyleObjectId)
// {
// pEnt->setTextStyle(StyleObjectId);
// }
_tcscpy(TextInfoArr[m].text,text);
pEnt->close();
}
else if(es == Acad::eWasErased)
{
// 解锁文档
acDocManager->unlockDocument(curDoc());
ranges.ReleaseDispatch();
Worksheet.ReleaseDispatch ();
Worksheets.ReleaseDispatch ();
Workbook.ReleaseDispatch ();
Workbooks.ReleaseDispatch ();
delete[] TextInfoArr;
::MessageBox(NULL, _T("有手动删除对象，线程退出！"), _T("警告"), MB_ICONHAND);
/* delete[] CurStyleName;*/
AfxOleTerm();
return 2;
}
// 解锁文档
acDocManager->unlockDocument(curDoc());
}
}
}
ranges.ReleaseDispatch();
Worksheet.ReleaseDispatch ();
Worksheets.ReleaseDispatch ();
Workbook.ReleaseDispatch ();
Workbooks.ReleaseDispatch ();
IsBreak=true;
break;
}
if(IsBreak)
break;
}
}
//释放Dispatch
//如果VectorTableinfo不为空则将其清空
delete[] TextInfoArr;
app.ReleaseDispatch ();
return 1;
}
//动态从Excel读取数据
int DynamicReadFromExcel()
{
//常用变量定义
CApplication app;
CWorkbooks books;
CWorkbook book;
CWorksheets sheets;
CWorksheet sheet;
CRange ranges,range;
CRange iCell,UnionRange,UnionRanges;
CRange RangeRow,RangeCol;
CFont0 Font0;
LPDISPATCH lpDisp;
LPDISPATCH Workbooks;
COleVariant
covTrue((short)TRUE),
covFalse((short)FALSE),
covOptional((long)DISP_E_PARAMNOTFOUND, VT_ERROR);
COleVariant vResult;
acdbRegApp(_T("ReadeEXCEL"));
//采用MFC方式初始化COM库，程序结束时COM库会自动释放
if(!AfxOleInit())
{
MessageBox(NULL,_T("初始化COM支持库失败!\n无法控制Excel!"),_T("TrueTable"),MB_ICONERROR | MB_OK);
return RTERROR;
}
//关联已经运行的Excel实例
CLSID clsid;
CLSIDFromProgID(L"Excel.Application", &clsid);
IUnknown *pUnk = NULL;
IDispatch *pRunDisp = NULL;
for(long i=1;i<=5;i++) //做5次尝试
{
HRESULT hr = GetActiveObject(clsid, NULL, (IUnknown**)&pUnk);
if(SUCCEEDED(hr))
{
hr = pUnk->QueryInterface(IID_IDispatch, (void **)&pRunDisp);
break;
}
::Sleep(10);
}
if (!pRunDisp)
{
::MessageBox(NULL, _T("没有发现Excel!"), _T("TrueTable"), MB_ICONHAND);
return RTERROR;
}
if (pUnk) pUnk->Release();
//关联Excel
app.AttachDispatch (pRunDisp);
CString Caption = app.get_Caption();
//获取当前激活的sheet
lpDisp=app.get_ActiveSheet();
if(lpDisp==NULL)
{
MessageBox(NULL,_T( "没有发现有效的表格!"), _T("TrueTable"),MB_ICONERROR | MB_OK);
app.ReleaseDispatch ();
return RTERROR;
}
sheet.AttachDispatch(lpDisp);
//读取sheet名
lpDisp=sheet.get_Parent();
if(lpDisp==NULL)
{
MessageBox(NULL,_T( "没有发现有效的Book!"), _T("TrueTable"),MB_ICONERROR | MB_OK);
app.ReleaseDispatch ();
sheet.ReleaseDispatch();
return RTERROR;
}
book.AttachDispatch(lpDisp);
CString BookName = book.get_Name();
CString SheetName=sheet.get_Name();
//获取选择区
LPDISPATCH Selectioned = app.get_Selection();
if (Selectioned == NULL)
{
MessageBox(NULL,_T( "没有发现有效的表格!"), _T("TrueTable"),MB_ICONERROR | MB_OK);
app.ReleaseDispatch ();
sheet.ReleaseDispatch();
book.ReleaseDispatch();
return RTERROR;
}
vector<vector<TextInfo>>VectorTableinfo;
//选择的行数、列数:
long row_num,col_num,StartRow,StartCol;
ranges.AttachDispatch(Selectioned);
range.AttachDispatch(ranges.get_Rows());
row_num=range.get_Count();
range.AttachDispatch(ranges.get_Columns());
col_num=range.get_Count();
// ranges.AttachDispatch(Selectioned);
StartRow=range.get_Row(); //起始行
StartCol=range.get_Column(); //起始列
if(col_num<2 && row_num<2) //未选中区域
{
MessageBox(NULL,_T("\n当前表格未选中区域数据!"),_T("TrueTable"),MB_ICONERROR | MB_OK);
app.ReleaseDispatch ();
return RTERROR;
}
else
{
ads_printf(_T("\n表格%s共选中%d行,%d列"),SheetName,row_num,col_num);
}
acutPrintf(_T("\nSheet名称:%s\n"),SheetName);
//得到全部Cells，此时,range是cells的集合
range.AttachDispatch(sheet.get_Cells());
int rowhight,colwide;
CString cstr;
TableLine tableline;
//表格信息二维数组
AcGePoint3d RowStartPoint = ptInsert;
AcGePoint3d ColStartPoint;
for(long i=StartRow;i<StartRow+row_num;i++)
{
vector<TextInfo>Vectortextinfo;
AcGePoint3d ptRowCurren = RowStartPoint;
for(long j=StartCol;j<StartCol+col_num;j++)
{
TextInfo textinfo;
// _tcscpy_s(textinfo.SheetName,SheetName);
// _tcscpy_s(textinfo.BookName,BookName);
AcGePoint3d ptColCurren = ColStartPoint;
//读取单元格文本
iCell.AttachDispatch(range.get_Item (COleVariant(i),COleVariant(j)).pdispVal );
RangeRow.AttachDispatch(iCell.get_EntireRow());
COleVariant hReasult = RangeRow.get_Hidden();
if (hReasult.boolVal == VARIANT_TRUE)
break;
RangeCol.AttachDispatch(iCell.get_EntireColumn());
hReasult = RangeCol.get_Hidden();
if (hReasult.boolVal == VARIANT_TRUE)
continue;
//获取单元格的对齐方式
hReasult.lVal=0;
hReasult=iCell.get_HorizontalAlignment();
if(hReasult.lVal!=0)
{
switch (hReasult.lVal)
{
case 1: //默认
{
textinfo.HorizontalAlignment =Aligndefault;
break;
}
case -4108: //居中
{
textinfo.HorizontalAlignment = AlignCenter;
break;
}
case -4131 : //靠左
{
textinfo.HorizontalAlignment = Alignleft;
break;
}
case -4152 : //靠右
{
textinfo.HorizontalAlignment = AlignRight;
break;
}
}
}
//获取单元格所处的行号列号和文字
textinfo.RowNum = i;
textinfo.ColNum = j;
vResult =iCell.get_Text();
cstr=vResult.bstrVal;
_tcscpy(textinfo.text,cstr);
//获取单元格字体
Font0 = iCell.get_Font();
COleVariant varFontInfo;
//字体高度
varFontInfo = Font0.get_Size();
textinfo.texthight = abs(varFontInfo.dblVal * Scale * 0.7);
//单元格行高列宽
COleVariant Var=iCell.get_RowHeight();
//行高
textinfo.rowheiht=Var.dblVal * Scale;
Var=iCell.get_ColumnWidth();
//列宽
textinfo.colwidth = Var.dblVal * 5 * Scale;
vResult = iCell.get_MergeCells();
if (vResult.boolVal == -1)
{ //是合并单元格
textinfo.IsMergeCells = true;
UnionRanges.AttachDispatch(iCell.get_MergeArea());
//合并单元格的行数
UnionRange.AttachDispatch(UnionRanges.get_Rows());
textinfo.UnionRowNums = UnionRange.get_Count();
//合并单元格的列数
UnionRange.AttachDispatch(UnionRanges.get_Columns());
textinfo.UnionColNums = UnionRange.get_Count();
//合并单元格的起始行列号
textinfo.UnionStartRowNum = UnionRanges.get_Row();
textinfo.UnionStartColNum = UnionRanges.get_Column();
//合并单元格的行判断
if (textinfo.UnionRowNums >1)
{
if (textinfo.RowNum == textinfo.UnionStartRowNum)
{ //如果当前单元格的行是合并单元格第一行
textinfo.IsTop = true;
textinfo.IsBottom = false;
textinfo.LUPoint = ptRowCurren;
textinfo.RUPoint = textinfo.LUPoint;
textinfo.RUPoint.x += textinfo.colwidth;
}
else if(textinfo.RowNum == textinfo.UnionStartRowNum + textinfo.UnionRowNums-1)
{ //如果当前单元格的行是合并单元格最后一行
textinfo.IsBottom = true;
textinfo.IsTop = false;
textinfo.LBPoint = ptRowCurren;
textinfo.LBPoint.y -= textinfo.rowheiht;
textinfo.RBPoint = textinfo.LBPoint;
textinfo.RBPoint.x += textinfo.colwidth;
}
else
{ //如果当前单元格的行不是合并单元格第一行也不是最后一行
textinfo.IsBottom = false;
textinfo.IsTop = false;
}
}
else
{
textinfo.IsBottom = true;
textinfo.IsTop = true;
textinfo.LUPoint = ptRowCurren;
textinfo.RUPoint = textinfo.LUPoint;
textinfo.RUPoint.x += textinfo.colwidth;
textinfo.LBPoint = textinfo.LUPoint;
textinfo.LBPoint.y -= textinfo.rowheiht;
textinfo.RBPoint = textinfo.LBPoint;
textinfo.RBPoint.x += textinfo.colwidth;
}
//合并单元格的列判断
if (textinfo.UnionColNums>1)
{
if (textinfo.ColNum == textinfo.UnionStartColNum)
{ //如果当前单元格的行是合并单元格第一列
textinfo.IsLeft = true;
textinfo.IsRight = false;
textinfo.LUPoint = ptRowCurren;
textinfo.LBPoint = textinfo.LUPoint;
textinfo.LBPoint.y -= textinfo.rowheiht;
}
else if(textinfo.ColNum == textinfo.UnionStartColNum + textinfo.UnionColNums-1)
{ //如果当前单元格的行是合并单元格最后一列
textinfo.IsRight = true;
textinfo.IsLeft = false;
textinfo.RUPoint = ptRowCurren;
textinfo.RUPoint.x += textinfo.colwidth;
textinfo.RBPoint = textinfo.RUPoint;
textinfo.RBPoint.y -= textinfo.rowheiht;
}
else
{ //如果当前单元格的行不是合并单元格第一行也不是最后一行
textinfo.IsRight = false;
textinfo.IsLeft = false;
}
}
else
{
textinfo.IsLeft = true;
textinfo.IsRight = true;
textinfo.LUPoint = ptRowCurren;
textinfo.LBPoint = textinfo.LUPoint;
textinfo.LBPoint.y -= textinfo.rowheiht;
textinfo.RUPoint = textinfo.LUPoint;
textinfo.RUPoint.x += textinfo.colwidth;
textinfo.RBPoint = textinfo.RUPoint;
textinfo.RBPoint.y -= textinfo.rowheiht;
}
}
else
{ //不是合并单元格
textinfo.IsMergeCells = false;
textinfo.IsBottom = true;
textinfo.IsTop= true;
textinfo.IsLeft = true;
textinfo.IsRight = true;
textinfo.LUPoint = ptRowCurren;
textinfo.RUPoint = textinfo.LUPoint;
textinfo.RUPoint.x += textinfo.colwidth;
textinfo.LBPoint = textinfo.LUPoint;
textinfo.LBPoint.y -= textinfo.rowheiht;
textinfo.RBPoint = textinfo.LBPoint;
textinfo.RBPoint.x += textinfo.colwidth;
}
Vectortextinfo.push_back(textinfo);
ptRowCurren.x += textinfo.colwidth;
}
if (!Vectortextinfo.empty())
{
VectorTableinfo.push_back(Vectortextinfo);
RowStartPoint.y -= Vectortextinfo.back().rowheiht;
}
}
//释放Dispatch
iCell.ReleaseDispatch ();
range.ReleaseDispatch ();
ranges.ReleaseDispatch();
RangeRow.ReleaseDispatch();
RangeCol.ReleaseDispatch();
UnionRanges.ReleaseDispatch();
UnionRange.ReleaseDispatch();
sheet.ReleaseDispatch ();
sheets.ReleaseDispatch ();
book.ReleaseDispatch ();
books.ReleaseDispatch ();
Font0.ReleaseDispatch();
app.ReleaseDispatch ();
//行表格线列表
//行表格线列表
vector<list<TableLine>>lRow;
vector<list<TableLine>>lCol;
AcGePoint3d StartPoint = ptInsert;
AcGePoint2d ptlu,ptrb;
ptlu.x = ptInsert.x;
ptlu.y=ptInsert.y;
TextInfo * TextInfoArry = new TextInfo[VectorTableinfo.size() * VectorTableinfo[0].size()+1];
int number =1;
TextInfoArry[0].RowNum = VectorTableinfo.size() * VectorTableinfo[0].size();
BookName.Append(_T(","));
BookName.Append(SheetName);
BookName.Append(_T(","));
BookName.Append(Caption);
_tcscpy(TextInfoArry[0].text,BookName);
TextInfoArry[0].RowNum=row_num;
TextInfoArry[0].ColNum=col_num;
TextInfoArry[0].UnionStartRowNum =StartRow;
TextInfoArry[0].UnionStartColNum=StartCol;
for (int i = 0;i < VectorTableinfo.size();i++)
{
vector<TextInfo>Vectortextinfo = VectorTableinfo[i];
list<TableLine> ListTableRowline;
bool iscontinue = false;
TableLine RowTableLine;
for (int j = 0;j<Vectortextinfo.size();j++)
{
TextInfo textinfo = Vectortextinfo[j];
list<TableLine> ListTableColline;
TableLine RowTableLine,ColTableLine;
if (i > 0)
{ //第一行顶线不用判断
if (textinfo.IsMergeCells)
{ //是合并单元格
if (textinfo.IsTop)
{
if (ListTableRowline.empty() || iscontinue)
{
RowTableLine.TopStartPoint=textinfo.LUPoint;
RowTableLine.TopEndPoint = textinfo.RUPoint;
ListTableRowline.push_back(RowTableLine);
iscontinue = false;
}
else
{
ListTableRowline.back().TopEndPoint=textinfo.RUPoint;
}
}
else
{
iscontinue =true;
}
}
else
{ //不是合并单元格
if (ListTableRowline.empty()|| iscontinue)
{
RowTableLine.TopStartPoint=textinfo.LUPoint;
RowTableLine.TopEndPoint = textinfo.RUPoint;
ListTableRowline.push_back(RowTableLine);
}
else
{
ListTableRowline.back().TopEndPoint=textinfo.RUPoint;
}
}
}
//列向竖线
if (j>0)
{
if (textinfo.IsMergeCells)
{
//是合并单元格
if (textinfo.IsLeft)
{ //单元格有左线
if (i == 0)
{
//当前单元格未创建左线链表
ColTableLine.TopStartPoint=textinfo.LUPoint;
ColTableLine.BottomEndPoint=textinfo.LBPoint;
ColTableLine.IsColcontinue = true;
ListTableColline.push_back(ColTableLine);
lCol.push_back(ListTableColline);
}
else
{ //当前单元格已创建左线链表
if (lCol[j-1].back().IsColcontinue)
{ //上段线连续
lCol[j-1].back().BottomEndPoint=textinfo.LBPoint;
}
else
{ //上段线不连续
ColTableLine.TopStartPoint=textinfo.LUPoint;
ColTableLine.BottomEndPoint=textinfo.LBPoint;
ColTableLine.IsColcontinue = true;
lCol[j-1].push_back(ColTableLine);
}
}
}
else
{
if (i == 0)
{
//当前单元格未创建左线链表
ColTableLine.TopStartPoint=AcGePoint3d(0,0,0);
ColTableLine.BottomEndPoint=AcGePoint3d(0,0,0);
ColTableLine.IsColcontinue = false;
ListTableColline.push_back(ColTableLine);
lCol.push_back(ListTableColline);
}
if (j<lCol.size())
{
// CreateLine(lCol[i].back().TopStartPoint,lCol[i].back().BottomEndPoint);
lCol[j-1].back().IsColcontinue = false;
}
}
}
else
{//不是合并单元格
if (i == 0)
{
//当前单元格未创建左线链表
ColTableLine.TopStartPoint=textinfo.LUPoint;
ColTableLine.BottomEndPoint=textinfo.LBPoint;
ColTableLine.IsColcontinue = true;
ListTableColline.push_back(ColTableLine);
lCol.push_back(ListTableColline);
}
else
{ //当前单元格已创建左线链表
if (lCol[j-1].back().IsColcontinue)
{ //上段线连续
lCol[j-1].back().BottomEndPoint=textinfo.LBPoint;
}
else
{ //上段线不连续
ColTableLine.TopStartPoint=textinfo.LUPoint;
ColTableLine.BottomEndPoint=textinfo.LBPoint;
ColTableLine.IsColcontinue = true;
lCol[j-1].push_back(ColTableLine);
}
}
}
}
//表的右下角点
if (i+1 == VectorTableinfo.size() && j+1 == Vectortextinfo.size())
{
ptrb.x = textinfo.RBPoint.x;
ptrb.y = textinfo.RBPoint.y;
}
//向CAD中写字
if (_tcscmp(textinfo.text,_T("")) != 0)
{
if (textinfo.IsMergeCells)
{
if (textinfo.ColNum == textinfo.UnionStartColNum && textinfo.RowNum == textinfo.UnionStartRowNum)
{
AcGePoint3d InsertPt1 =textinfo.LUPoint;
AcGePoint3d InsertPt2 = VectorTableinfo[i + textinfo.UnionRowNums-1][j + textinfo.UnionColNums-1].RBPoint;
textinfo.RBPoint = InsertPt2;
// AcGePoint3d InsertPoint =CCalculation::MiddlePoint(InsertPt1,InsertPt2);
AcDbObjectId Obj = CreateMText(InsertPt1,InsertPt2,textinfo.text,AcDbObjectId::kNull,textinfo.texthight,textinfo.HorizontalAlignment,ptInsert,Caption,BookName,SheetName,StartRow,StartCol,row_num,col_num);
if (Obj != NULL)
{
textinfo.Objectid = Obj;
// AcDbText* pEntity;
// if(acdbOpenObject(pEntity,Obj,AcDb::kForRead) == Acad::eOk)
// {
// AcGePoint3d position;
// position = pEntity->position();
// position = pEntity->alignmentPoint();
// pEntity->close();
// }
}
}
}
else
{
// AcGePoint3d InsertPoint =CCalculation::MiddlePoint(textinfo.LUPoint,textinfo.RBPoint);
AcDbObjectId Obj = CreateMText(textinfo.LUPoint,textinfo.RBPoint,textinfo.text,AcDbObjectId::kNull,textinfo.texthight,textinfo.HorizontalAlignment,ptInsert,Caption,BookName,SheetName,StartRow,StartCol,row_num,col_num);
if (Obj != NULL)
{
textinfo.Objectid = Obj;
}
}
}
else
{ //如果单元格为空
if (textinfo.IsMergeCells)
{ //单元格为合并单元格
if (textinfo.ColNum == textinfo.UnionStartColNum && textinfo.RowNum == textinfo.UnionStartRowNum)
{ //设置第一个合并单元格左上角和右下角的坐标
AcGePoint3d InsertPt1 =textinfo.LUPoint;
AcGePoint3d InsertPt2 = VectorTableinfo[i + textinfo.UnionRowNums-1][j + textinfo.UnionColNums-1].RBPoint;
textinfo.RBPoint = InsertPt2;
}
}
}
TextInfoArry[number]=textinfo;
number++;
}
lRow.push_back(ListTableRowline);
ListTableRowline.clear();
}
//画列线
for (int i =0;i<lCol.size();i++)
{
list<TableLine> ListTableColline = lCol[i];
list<TableLine>::const_iterator Iterator;
for (Iterator=ListTableColline.begin();Iterator != ListTableColline.end();Iterator++)
{
if (Iterator->TopStartPoint != Iterator->BottomEndPoint)
{
CreateLine(Iterator->TopStartPoint,Iterator->BottomEndPoint);
}
}
}
//画行线
for (int i =0;i<lRow.size();i++)
{
list<TableLine> ListTableRowline = lRow[i];
list<TableLine>::const_iterator Iterator;
for (Iterator=ListTableRowline.begin();Iterator != ListTableRowline.end();Iterator++)
{
if (Iterator->TopStartPoint != Iterator->BottomEndPoint)
{
CreateLine(Iterator->TopStartPoint,Iterator->TopEndPoint);
}
}
}
CreateRectangle(ptlu,ptrb,0);
LPVOID lpParameter =(LPVOID)TextInfoArry;
HANDLE hThreade = ::CreateThread(
NULL, // pointer to security attributes
NULL, // initial thread stack size
ThreadProc, // pointer to thread function
lpParameter, // argument for new thread
NULL, // creation flags
NULL // pointer to receive thread ID
);
::CloseHandle(hThreade);
if (!VectorTableinfo.empty())
{
for (int i=0;i<VectorTableinfo.size();i++)
{
VectorTableinfo[i].clear();
}
VectorTableinfo.clear();
}
return RTNORM;
}
//-----------------------------------------------------------------------------
//----- ObjectARX EntryPoint
class CExcelApp : public AcRxArxApp {
public:
CExcelApp () : AcRxArxApp () {}
virtual AcRx::AppRetCode On_kInitAppMsg (void *pkt) {
// TODO: Load dependencies here
// You *must* call On_kInitAppMsg here
AcRx::AppRetCode retCode =AcRxArxApp::On_kInitAppMsg (pkt) ;
// TODO: Add your initialization code here
return (retCode) ;
}
virtual AcRx::AppRetCode On_kUnloadAppMsg (void *pkt) {
// TODO: Add your code here
// You *must* call On_kUnloadAppMsg here
AcRx::AppRetCode retCode =AcRxArxApp::On_kUnloadAppMsg (pkt) ;
// TODO: Unload dependencies here
return (retCode) ;
}
virtual void RegisterServerComponents () {
}
// - YCLExcel.ReadExcel command (do not rename)
static void YCLExcelReadExcel(void)
{
// Add your code for command YCLExcel.ReadExcel here
IsExitThreade = true;
acutPrintf(_T("本插件由孤帆制作，仅供试用！用前请保存工作，CAD随时可能崩溃！\n"));
ads_real ScaleBak=1.0;
TCHAR str[30]={0};
TCHAR str1[10] = {0};
_tcscpy(str, _T("请输入生成表格的比例：<"));
_stprintf(str1,_T("%f"),Scale);
_tcscat(str,str1);
_tcscat(str,_T(">:"));
if (acedGetReal(str,&ScaleBak) == RTNORM)
{
Scale = ScaleBak;
}
ads_point pt;
if(acedGetPoint(NULL,_T("请拾取插入点:\n"),pt)!= RTNORM)
return;
ptInsert.x=pt[0];
ptInsert.y=pt[1];
ptInsert.z=pt[2];
IsExitThreade = false;
DynamicReadFromExcel() ;
}
// - YCLExcel.WriteExcel command (do not rename)
static void YCLExcelWriteExcel(void)
{
// Add your code for command YCLExcel.WriteExcel here
DynamicWriteToExcel();
}
// // - YCLExcel.ReAccess command (do not rename)
// static void YCLExcelReAccess(void)
// {
// // Add your code for command YCLExcel.ReAccess here
// IsExitThreade = true;
// CString Caption,BookName,SheetName;
// int Start_Row,Start_Col,Row_Nums,Col_Nums;
// AcGePoint3d pt;
// struct resbuf *rb; // 结果缓冲区链表
// ads_name ssname;
// rb = acutBuildList(RTDXF0, _T("MTEXT"), // 实体类型
// RTNONE);
// // 选择复合要求的文字
// if(acedSSGet(NULL,NULL,NULL,rb,ssname) != RTNORM)
// {
// acutRelRb(rb);
// AfxMessageBox(_T("选择对象失败！"));
// return;
// }
// long sslength;
// acedSSLength(ssname, &sslength);
// acutRelRb(rb);
// bool IsXData = false;
// for(int i = 0;i < sslength;i++)
// {
// ads_name ent;
// AcDbObjectId objId;
// acedSSName(ssname, i, ent);
// acdbGetObjectId(objId, ent);
// AcDbEntity *pEnt;
// if(acdbOpenAcDbEntity(pEnt, objId, AcDb::kForRead) == Acad::eOk)
// {
// struct resbuf *pXData,*pTemp;
// pXData = pEnt->xData(_T("ReadeEXCEL"));
// pEnt->close();
// if (pXData != NULL) // 如果已经包含扩展数据，就不再添加新的扩展数据
// {
// pTemp = pXData->rbnext;
// Caption = pTemp->resval.rstring;
// pTemp = pTemp->rbnext;
// BookName = pTemp->resval.rstring;
// pTemp = pTemp->rbnext;
// SheetName = pTemp->resval.rstring;
// pTemp = pTemp->rbnext;
// Start_Row = pTemp->resval.rint;
// pTemp = pTemp->rbnext;
// Start_Col = pTemp->resval.rint;
// pTemp = pTemp->rbnext;
// Row_Nums = pTemp->resval.rint;
// pTemp = pTemp->rbnext;
// Col_Nums = pTemp->resval.rint;
// pTemp = pTemp->rbnext;
// pt.x = pTemp->resval.rpoint[X];
// pt.y = pTemp->resval.rpoint[Y];
// pt.z = pTemp->resval.rpoint[Z];
// acutRelRb(pXData);
// IsXData = true;
// break;
// }
// }
// }
// acedSSFree(ssname);
// if (IsXData)
// {
// ReReadeExcel(Caption,BookName,SheetName,Start_Row,Start_Col,Row_Nums,Col_Nums,pt);
// }
// else
// {
// AfxMessageBox(_T("未找到有效的扩展数据！"));
// }
// }
} ;
//-----------------------------------------------------------------------------
IMPLEMENT_ARX_ENTRYPOINT(CExcelApp)
ACED_ARXCOMMAND_ENTRY_AUTO(CExcelApp, YCLExcel, ReadExcel, ReadExcel, ACRX_CMD_TRANSPARENT, NULL)
ACED_ARXCOMMAND_ENTRY_AUTO(CExcelApp, YCLExcel, WriteExcel, WriteExcel, ACRX_CMD_TRANSPARENT, NULL)
//ACED_ARXCOMMAND_ENTRY_AUTO(CExcelApp, YCLExcel, ReAccess, ReAccess, ACRX_CMD_TRANSPARENT, NULL)

// (C) Copyright 2002-2007 by Autodesk, Inc. 
// 
// Permission to use, copy, modify, and distribute this software in 
// object code form for any purpose and without fee is hereby granted, 
// provided that the above copyright notice appears in all copies and 
// that both that copyright notice and the limited warranty and 
// restricted rights notice below appear in all supporting 
// documentation. 
// 
// AUTODESK PROVIDES THIS PROGRAM "AS IS" AND WITH ALL FAULTS. 
// AUTODESK SPECIFICALLY DISCLAIMS ANY IMPLIED WARRANTY OF 
// MERCHANTABILITY OR FITNESS FOR A PARTICULAR USE.  AUTODESK, INC. 
// DOES NOT WARRANT THAT THE OPERATION OF THE PROGRAM WILL BE 
// UNINTERRUPTED OR ERROR FREE. 
// 
// Use, duplication, or disclosure by the U.S. Government is subject to 
// restrictions set forth in FAR 52.227-19 (Commercial Computer 
// Software - Restricted Rights) and DFAR 252.227-7013(c)(1)(ii) 
// (Rights in Technical Data and Computer Software), as applicable. 
// 
 
//----------------------------------------------------------------------------- 
//----- acrxEntryPoint.cpp 
//----------------------------------------------------------------------------- 
#include "StdAfx.h" 
#include "resource.h" 
#include "CApplication.h" 
#include "CWorkbook.h" 
#include "CWorkbooks.h" 
#include "CWorksheet.h" 
#include "CWorksheets.h" 
#include "CRange.h" 
#include "CBorder.h" 
#include "CBorders.h" 
#include "CFont0.h" 
#include <comdef.h> 
#include <list> 
#include <vector> 
#include "Calculation.h" 
//----------------------------------------------------------------------------- 
#define szRDS _RXST("YCL") 
using namespace std; 
bool IsExitThreade = false; 
// 边框的类型 Borders[N] 
// xlEdgeLeft 左=1 
//         xlEdgeRight 右=2 
//         xlEdgeTop 顶=3 
//         xlEdgeBottom 底=4 
//         xlDiagonalUp 左上右下=5 
//         xlDiagonalDown 左下右上=6 
//         xlEdgeLeft 外部左边框=7 
//         xlEdgeTop 外部上边框=8 
//         xlEdgeBottom 外部下边框=9 
//         xlEdgeRight 外部右边框=10 
//         xlInsideVertical 内部竖线=11 
//         xlInsideHorizontal 内部横线=12 
//         (其中1：为左 2：右 3：顶  4：底  5：斜\ 6：斜/) 
// #define xlEdgeLeft 1 
// #define xlEdgeTop 2 
// #define xlEdgeBottom 3 
// #define xlEdgeRight 4 
// #define xlDiagonalUp 5 
// #define xlDiagonalDown 6 
// #define xlEdgeLeft 7 
// #define xlEdgeTop 8 
// #define xlEdgeBottom 9 
// #define xlEdgeRight 10 
// #define xlInsideVertical 11 
// #define xlInsideHorizontal 12 
#define Aligndefault 0 
#define Alignleft 1 
#define AlignCenter 2 
#define AlignRight 3 
//定义几个传递表信息所需要的结构体 
struct TableLine 
{ 
        //线的起始点 
        bool IsRowcontinue; 
        bool IsColcontinue; 
        AcGePoint3d TopStartPoint; 
        AcGePoint3d TopEndPoint; 
        AcGePoint3d BottomStartPoint; 
        AcGePoint3d BottomEndPoint; 
        AcGePoint3d TopCurentPoint; 
        AcGePoint3d BottomCurentPoint; 
}; 
//单元格信息 
struct TextInfo 
{ 
        //行号 
        int RowNum; 
        //列号 
        int ColNum; 
        //行高 
        float rowheiht; 
        //列宽 
        float colwidth; 
        //单元格内容 
        TCHAR text[512]; 
        //单元格字高 
        float texthight; 
        //是否是合并单元格 
        bool IsMergeCells; 
        //合并单无格的行数 
        int UnionRowNums; 
        //合并单元格的列数 
        int UnionColNums; 
        //合并单元格的起始行 
        int UnionStartRowNum; 
        //合并单元格的起始列 
        int UnionStartColNum; 
        AcGePoint3d LUPoint; 
        AcGePoint3d RUPoint; 
        AcGePoint3d LBPoint; 
        AcGePoint3d RBPoint; 
        bool IsTop; 
        bool IsBottom; 
        bool IsLeft; 
        bool IsRight; 
        int HorizontalAlignment; 
        AcDbObjectId Objectid; 
}; 
 
 
 
AcGePoint3d ptInsert; 
ads_real Scale =1; 
// 将实体添加到图形数据库的模型空间 
AcDbObjectId PostToModelSpace(AcDbEntity* pEnt) 
{ 
        AcDbBlockTable *pBlockTable; 
        acdbHostApplicationServices()->workingDatabase()->getBlockTable(pBlockTable, AcDb::kForRead); 
        AcDbBlockTableRecord *pBlockTableRecord; 
        acDocManager->lockDocument(curDoc()); 
        if(pBlockTable->getAt(ACDB_MODEL_SPACE, pBlockTableRecord, AcDb::kForWrite) == Acad::eOk) 
        { 
                AcDbObjectId entId; 
                pBlockTableRecord->appendAcDbEntity(entId, pEnt); 
                pBlockTable->close(); 
                pBlockTableRecord->close(); 
                pEnt->close(); 
                // 解锁文档 
                acDocManager->unlockDocument(curDoc()); 
                return entId; 
        } 
        // 解锁文档 
        acDocManager->unlockDocument(curDoc()); 
        return NULL; 
} 
//其中CurrTextStyle(styleName)是得到当前字体样式，函数如下： 
bool FindTextStyle(TCHAR* textStyle) 
{ 
        bool ret = false; 
        AcDbTextStyleTable *pTextStyleTbl = NULL; 
        acdbHostApplicationServices()->workingDatabase()->getSymbolTable(pTextStyleTbl, AcDb::kForRead); 
        AcDbTextStyleTableIterator *pIt = NULL; 
        pTextStyleTbl->newIterator(pIt); 
        for (;!pIt->done();pIt->step()) 
        { 
                AcDbTextStyleTableRecord *pRcd = NULL; 
                if (pIt->getRecord(pRcd, AcDb::kForRead) == Acad::eOk) 
                { 
                        TCHAR *szName = NULL; 
                        pRcd->getName(szName); 
                        if (_tcscmp(szName,textStyle) == 0) 
                        { 
                                pRcd->close(); 
                                ret = true; 
                                break; 
                        } 
                        acutDelString(szName); 
                        pRcd->close(); 
                } 
        } 
        delete pIt; 
        pTextStyleTbl->close(); 
        return ret; 
} 
bool CurrTextStyle(TCHAR *&styleName,TCHAR *&fontName,TCHAR *&bigFontName,AcDbObjectId &Id)   
{   
        Id = acdbHostApplicationServices()->workingDatabase()->textstyle();   
        AcDbTextStyleTableRecord* pStyleRecord;   
        if(acdbOpenObject((AcDbObject *&)pStyleRecord, Id, AcDb::kForRead) == Acad::eOk) {   
                const TCHAR *name;   
                pStyleRecord->getName(name); 
                _tcscpy(styleName, name); 
                pStyleRecord->fileName(name); 
                _tcscpy(fontName, name); 
                pStyleRecord->bigFontFileName(name); 
                _tcscpy(bigFontName, name); 
                pStyleRecord->close(); 
                return true; 
        }   
        return false; 
//        else _tcscpy(styleName, _T("STANDARD"));   
} 
//===========================创建文字样式=========================================== 
AcDbObjectId createTextStyle(TCHAR* fontName,TCHAR* bigFontName,TCHAR* textStyleName) 
{ 
        AcGiTextStyle *TextStyle=new AcGiTextStyle 
                (fontName, 
                bigFontName, 
                0, 
                1, 
                0, 
                0, 
                Adesk::kFalse, 
                Adesk::kFalse, 
                Adesk::kFalse, 
                Adesk::kFalse, 
                Adesk::kFalse, 
                Adesk::kFalse, 
                textStyleName);      //字体名 
        AcDbObjectId textStyleId; 
        toAcDbTextStyle(*TextStyle,textStyleId); 
        return textStyleId; 
} 
//函数 CreateText，用于创建文字对象 
AcDbObjectId CreateText(const AcGePoint3d& LUInsert,const AcGePoint3d& RBInsert, const TCHAR *text, AcDbObjectId style, double height, double rotation,int HorizontalAlignment) 
{ 
        AcGePoint3d InsertPoint; 
        switch (HorizontalAlignment) 
        { 
        case Aligndefault: 
                { 
                        InsertPoint =CCalculation::MiddlePoint(LUInsert,RBInsert); 
                        AcDbText *pText = new AcDbText(InsertPoint,text, style, height,rotation); 
                        pText->setJustification(pText->kTextAlignmentMiddle); 
                        pText->setAlignmentPoint(InsertPoint); 
                        return PostToModelSpace(pText); 
                } 
        case Alignleft: 
                { 
                        InsertPoint =CCalculation::MiddlePoint(LUInsert,RBInsert); 
                        InsertPoint.x = LUInsert.x; 
//                        InsertPoint.y -= height * 0.5; 
                        AcDbText *pText = new AcDbText(InsertPoint,text, style, height,rotation); 
                        pText->setJustification(pText->kTextAlignmentMiddleLeft); 
                        pText->setAlignmentPoint(InsertPoint); 
                        return PostToModelSpace(pText); 
                } 
        case AlignCenter: 
                { 
                        InsertPoint =CCalculation::MiddlePoint(LUInsert,RBInsert); 
//                        InsertPoint.y -= height * 0.5; 
                        AcDbText *pText = new AcDbText(InsertPoint,text, style, height,rotation); 
                        pText->setJustification(pText->kTextAlignmentMiddleCenter); 
                        pText->setAlignmentPoint(InsertPoint); 
                        return PostToModelSpace(pText); 
                } 
        case AlignRight: 
                { 
                        InsertPoint =CCalculation::MiddlePoint(LUInsert,RBInsert); 
                        InsertPoint.x = RBInsert.x; 
//                        InsertPoint.y -= height * 0.5; 
                        AcDbText *pText = new AcDbText(InsertPoint,text, style, height,rotation); 
                        pText->setJustification(pText->kTextAlignmentMiddleRight); 
                        pText->setAlignmentPoint(InsertPoint); 
                        return PostToModelSpace(pText); 
                } 
 
        }; 
        
        return NULL; 
        
} 
//CreateMText 函数，用于添加多行文字 
AcDbObjectId CreateMText(const AcGePoint3d& LUInsert,const AcGePoint3d& RBInsert, const TCHAR *text, AcDbObjectId style, double height, int HorizontalAlignment,const AcGePoint3d& PointInsert,CString Caption,CString BookName,CString SheetName,int start_row,int start_col,int row_num,int col_num) 
{ 
        AcDbMText *pMText = new AcDbMText(); 
        AcGePoint3d InsertPoint; 
        double width = RBInsert.x - LUInsert.x - height * 0.4; 
        /* 
        //向对象写入扩展数据 
        TCHAR AppName[] ={ _T("ReadeEXCEL")}; 
        ads_point pt; 
        pt[0] = PointInsert.x; 
        pt[1] = PointInsert.y; 
        pt[2] = PointInsert.z; 
        struct resbuf* pRb = acutBuildList(AcDb::kDxfRegAppName, AppName,     // 应用程序名称 
                AcDb::kDxfXdAsciiString, Caption, // Excel标题 
                AcDb::kDxfXdAsciiString, BookName, // 字符串 
                AcDb::kDxfXdAsciiString, SheetName, // 字符串 
        AcDb::kDxfXdInteger32,start_row, 
        AcDb::kDxfXdInteger32,start_col, 
        AcDb::kDxfXdInteger32,row_num, 
        AcDb::kDxfXdInteger32,col_num, 
        AcDb::kDxfXdWorldXCoord,pt, 
        RTNONE); 
        pMText->setXData(pRb); 
        */ 
        switch (HorizontalAlignment) 
        { 
        case Aligndefault: 
                { 
                        InsertPoint =CCalculation::MiddlePoint(LUInsert,RBInsert); 
                        // 设置多行文字的特性 
                        pMText->setTextStyle(style); 
                        pMText->setContents(text); 
                        pMText->setLocation(InsertPoint); 
                        pMText->setTextHeight(height); 
                        pMText->setWidth(width); 
                        pMText->setAttachment(AcDbMText::kMiddleCenter); 
                        return PostToModelSpace(pMText); 
                } 
        case Alignleft: 
                { 
                        InsertPoint =CCalculation::MiddlePoint(LUInsert,RBInsert); 
                        InsertPoint.x = LUInsert.x + height * 0.2; 
                        pMText->setTextStyle(style); 
                        pMText->setContents(text); 
                        pMText->setLocation(InsertPoint); 
                        pMText->setTextHeight(height); 
                        pMText->setWidth(width); 
                        pMText->setAttachment(AcDbMText::kMiddleLeft); 
                        return PostToModelSpace(pMText); 
                } 
        case AlignCenter: 
                { 
                        InsertPoint =CCalculation::MiddlePoint(LUInsert,RBInsert); 
                        pMText->setTextStyle(style); 
                        pMText->setContents(text); 
                        pMText->setLocation(InsertPoint); 
                        pMText->setTextHeight(height); 
                        pMText->setWidth(width); 
                        pMText->setAttachment(AcDbMText::kMiddleCenter); 
                        return PostToModelSpace(pMText); 
                } 
        case AlignRight: 
                { 
                        InsertPoint =CCalculation::MiddlePoint(LUInsert,RBInsert); 
                        InsertPoint.x = RBInsert.x - height * 0.2; 
                        pMText->setTextStyle(style); 
                        pMText->setContents(text); 
                        pMText->setLocation(InsertPoint); 
                        pMText->setTextHeight(height); 
                        pMText->setWidth(width); 
                        pMText->setAttachment(AcDbMText::kMiddleRight); 
                        return PostToModelSpace(pMText); 
                } 
        }; 
 
        return NULL; 
        
} 
// 创建直线 
AcDbObjectId CreateLine(AcGePoint3d ptStart, AcGePoint3d ptEnd) 
{ 
        AcDbLine *pLine = new AcDbLine(ptStart, ptEnd); 
        // 将实体添加到图形数据库 
        AcDbObjectId lineId; 
        lineId = PostToModelSpace(pLine); 
        return lineId; 
} 
//该函数根据两个角点和线宽来创建矩形 
AcDbObjectId CreateRectangle(AcGePoint2d pt1, AcGePoint2d pt2, double width) 
{ 
        // 提取两个角点的坐标值 
        double x1 = pt1.x, x2 = pt2.x; 
        double y1 = pt1.y, y2 = pt2.y; 
        // 计算矩形的角点 
        AcGePoint2d ptLeftBottom(CCalculation::Min(x1, x2), CCalculation::Min(y1, y2)); 
        AcGePoint2d ptRightBottom(CCalculation::Max(x1, x2), CCalculation::Min(y1, y2)); 
        AcGePoint2d ptRightTop(CCalculation::Max(x1, x2), CCalculation::Max(y1, y2)); 
        AcGePoint2d ptLeftTop(CCalculation::Min(x1, x2), CCalculation::Max(y1, y2)); 
        // 创建对应的多段线 
        AcDbPolyline *pPoly = new AcDbPolyline(4); 
        pPoly->addVertexAt(0, ptLeftBottom, 0, width, width); 
        pPoly->addVertexAt(1, ptRightBottom, 0, width, width); 
        pPoly->addVertexAt(2, ptRightTop, 0, width, width); 
        pPoly->addVertexAt(3, ptLeftTop, 0, width, width); 
        pPoly->setClosed(Adesk::kTrue); 
        // 将多段线添加到模型空间 
        AcDbObjectId polyId; 
        polyId = PostToModelSpace(pPoly); 
        return polyId; 
} 
 
//表格到处到Excel 
int DynamicWriteToExcel() 
{ 
        ads_name ssname; 
        struct resbuf *rb; 
        rb = acutBuildList(RTDXF0,_T("TEXT,LWPOLYLINE,LINE"),RTNONE); 
        if(acedSSGet(NULL,NULL,NULL,rb,ssname) != RTNORM) 
        { 
                acutRelRb(rb); 
 
        } 
        else 
        { 
                acutRelRb(rb); 
                Adesk::Int32 sslength; 
                acedSSLength(ssname, &sslength); 
//                acutPrintf(_T("%d\n"),sslength); 
                AcDbObjectId objId; 
                AcDbObjectIdArray  LWpolyLineObjectIdArray ,LineObjectIdArray,TextObjectIdArray; 
                for(int i = 0;i < sslength;i++) 
                { 
                        ads_name ent; 
                        acedSSName(ssname, i, ent); 
                        acdbGetObjectId(objId, ent); 
                        AcDbEntity *pEnt; 
                        //将对象按类型分类 
                        if(acdbOpenAcDbEntity((AcDbEntity *&)pEnt, objId, AcDb::kForRead) == Acad::eOk) 
                        { 
                                if (pEnt->isKindOf(AcDb2dPolyline::desc())) 
                                { 
                                        LWpolyLineObjectIdArray.append(objId); 
                                } 
                                else if(pEnt->isKindOf(AcDbLine::desc())) 
                                { 
                                        LineObjectIdArray.append(objId); 
                                } 
                                else if(pEnt->isKindOf(AcDbLine::desc())) 
                                { 
                                        TextObjectIdArray.append(objId); 
                                } 
 
                                pEnt->close(); 
                        } 
                } 
 
        } 
        return 0; 
} 
 
 
BOOL CALLBACK EnumChildProc( 
        HWND hwnd,      // handle to child window 
        LPARAM lParam   // application-defined value 
        ) 
{ 
        TCHAR szText[50]; 
        CString strBuffer; 
        ::GetWindowText(hwnd,szText,50); 
        strBuffer.Format(szText); 
        if (strBuffer.Find(_T("Book")) != -1) 
        { 
                ::PostMessage(hwnd,WM_KEYDOWN,VK_TAB,0); 
                ::PostMessage(hwnd,WM_KEYUP,VK_TAB,0); 
                Sleep(500); 
                ::PostMessage(hwnd,WM_KEYDOWN,VK_LEFT,0); 
                ::PostMessage(hwnd,WM_KEYUP,VK_LEFT,0); 
        } 
        
 
//         PWINDOWINFO pwindowinfo = NULL; 
//         ::GetWindowInfo(hwnd,pwindowinfo); 
//         if (pwindowinfo != NULL) 
//         { 
//                 if( pwindowinfo->dwWindowStatus == 0) 
//                         IsContinue = true; 
//                 else 
//                         IsContinue = false; 
//         } 
        return TRUE; 
 
 
 
//         //需要枚举子窗口，因为状态栏为子窗口，获取状态栏的句柄 
//         TCHAR temp1[50]; 
//         if(hwnd) 
//         { 
//                 ::GetClassName(hwnd,temp1,255); 
//                 if(_tcscmp(temp1,_T("NetUIHWND")))//这个字符串使用spy++或者spyxx获得的状态栏类名 
//                 {            
//                         int nItemCount; 
//                         int i; 
//                         TCHAR chBuffer[50]; 
//                         DWORD dwProcessID; 
//                         HANDLE hProcess; 
//                         void * Pointer; 
//                         SIZE_T nNumberOfBytesRead; 
//                         nItemCount = ::SendMessage(hwnd, SB_GETPARTS, 0, 0); 
//                         ::GetWindowThreadProcessId(hwnd, &dwProcessID);//和dwProcessID=pID效果一样 
//                         hProcess = OpenProcess(PROCESS_VM_OPERATION|PROCESS_VM_READ|PROCESS_VM_WRITE,false,dwProcessID); 
//                         Pointer = VirtualAllocEx(hProcess,NULL,4096,MEM_RESERVE | MEM_COMMIT,PAGE_READWRITE); 
//                         for(i= 0 ; i < 4 ; ++i) 
//                         { 
//                                 ::SendMessage(hwnd, SB_GETTEXT, i, (LPARAM)Pointer); 
//                                 ::ReadProcessMemory(hProcess, Pointer,chBuffer, sizeof(chBuffer), &nNumberOfBytesRead); 
//                                 AfxMessageBox(chBuffer); 
//                         } 
//                         VirtualFreeEx(hProcess,Pointer,0, MEM_RELEASE); 
//                         CloseHandle(hProcess); 
//                         return true; 
//                 } 
//         } 
//         return true; 
} 
 
//关联线程函数 
DWORD WINAPI ThreadProc( 
        LPVOID lpParameter   // thread data 
        ) 
{ 
//         //检查当前字体样式 
//         TCHAR  StrStyleName[50]; 
//         TCHAR*  CurStyleName = new TCHAR[40]; 
//         TCHAR* StrFileName = new TCHAR[40]; 
//         TCHAR* StrBigFontFileName =new TCHAR[40]; 
//         AcDbObjectId CurSthyleID=NULL,StyleID=NULL; 
//         if (CurrTextStyle(CurStyleName,StrFileName,StrBigFontFileName,CurSthyleID)) 
//         { 
//                 _tcscpy_s(StrStyleName,CurStyleName); 
//                 _tcscat(StrStyleName,_T("_xls")); 
//                 
//                 if (!FindTextStyle(StrStyleName)) 
//                 { 
//                         if (_tcscmp(StrFileName,_T("")) == 0) 
//                         { 
//                                 StyleID = createTextStyle(_T("arial.ttf"),_T("gbcbig.shx"),StrStyleName); 
//                         } 
//                         else 
//                         { 
//                                 StyleID = createTextStyle(StrFileName,StrBigFontFileName,StrStyleName); 
//                         } 
//                 } 
//         } 
//         else 
//         { 
//                 _tcscpy_s(StrStyleName,_T("Standard_xls")); 
//                 createTextStyle(_T("gbenor.shx"),_T("gbcbig.shx"),StrStyleName); 
//         } 
//         delete [] StrFileName; 
//         delete [] StrBigFontFileName; 
        //常用变量定义 
        CApplication app;    
        CWorkbooks Workbooks; 
        CWorkbook Workbook; 
        CWorksheets Worksheets; 
        CWorksheet Worksheet; 
        CRange ranges; 
        CRange iCell; 
        LPDISPATCH lpDisp;   
        COleVariant 
                covTrue((short)TRUE), 
                covFalse((short)FALSE), 
                covOptional((long)DISP_E_PARAMNOTFOUND, VT_ERROR);       
        COleVariant vResult; 
        TextInfo* TextInfoArr =(TextInfo*)lpParameter; 
        //采用MFC方式初始化COM库，程序结束时COM库会自动释放 
//         if(!AfxOleInit()) 
//         { 
// 
//                 MessageBox(NULL,_T("初始化COM支持库失败!\n无法控制Excel!更新线程退出！"),_T("警告"),MB_ICONERROR | MB_OK);   
//                 delete[] TextInfoArr; 
//                 ::ExitThread(1); 
//                 return 0; 
//         } 
        //关联已经运行的Excel实例 
        CString str = TextInfoArr[0].text; 
        int booknamelen = str.Find(_T(",")); 
        CString BookName = str.Left(booknamelen); 
        CString Caption = str.TrimLeft(BookName); 
        Caption = Caption.TrimLeft(_T(",")); 
        booknamelen = Caption.Find(_T(",")); 
        CString SheetName=Caption.Left(booknamelen); 
        Caption = Caption.TrimLeft(SheetName); 
        Caption = Caption.TrimLeft(_T(",")); 
        int start_row = TextInfoArr[0].UnionStartRowNum; 
        int start_col = TextInfoArr[0].UnionStartColNum; 
        int row_nums = TextInfoArr[0].RowNum; 
        int col_nums = TextInfoArr[0].ColNum; 
        bool IsContinue = false; 
        HWND hExcel = NULL; 
        while (TRUE) 
        { 
                
                if (IsExitThreade) 
                { 
                        app.ReleaseDispatch (); 
                        delete[] TextInfoArr; 
                        AfxOleTerm(); 
                        return 2;; 
                } 
                //如果当前窗口是Excel窗口，则不读取 
 
                HWND hwnd = FindWindow(TEXT("XLMAIN"),Caption); 
                HWND Forehwnd =GetForegroundWindow(); 
                if (hwnd == NULL) 
                { 
                        app.ReleaseDispatch (); 
                        delete[] TextInfoArr; 
                        AfxOleTerm(); 
                        ::MessageBox(NULL, _T("关联的Excel关闭或有其它Excel打开，关联线程退出！"), _T("警告"), MB_ICONHAND); 
                        return 2; 
                } 
                else if(Forehwnd == hwnd) 
                { 
                        Sleep(2000); 
                        IsContinue = true; 
                        continue; 
                } 
                else if(FindWindow(NULL,TEXT("Microsoft Office Excel")) != Forehwnd) 
                { 
                        if(IsContinue) 
                        { 
                                EnumChildWindows(hwnd,EnumChildProc,NULL); 
                                IsContinue = false; 
                        } 
                        else 
                        { 
                                Sleep(2000); 
                                continue; 
                        } 
                } 
                else 
                { 
                        Sleep(2000); 
                        continue; 
                } 
 
 
                CLSID clsid; 
                CLSIDFromProgID(L"Excel.Application", &clsid);   
                IUnknown *pUnk = NULL; 
                IDispatch *pRunDisp = NULL; 
 
                for(long i=1;i<=5;i++) //做5次尝试 
                { 
                        HRESULT hr = GetActiveObject(clsid, NULL, (IUnknown**)&pUnk); 
                        if(SUCCEEDED(hr)) 
                        { 
                                hr = pUnk->QueryInterface(IID_IDispatch, (void **)&pRunDisp); 
                                break; 
                        } 
                        ::Sleep(10); 
                } 
 
 
                if (!pRunDisp) 
                { 
                        ::MessageBox(NULL, _T("没有发现Excel!更新线程退出！"), _T("警告"), MB_ICONHAND); 
                        //如果VectorTableinfo不为空则将其清空 
                        delete[] TextInfoArr; 
/*                        delete[] CurStyleName;*/ 
                        AfxOleTerm(); 
                        return 2; 
                } 
                if (pUnk)  pUnk->Release(); 
                
                //关联Excel 
                app.AttachDispatch (pRunDisp); 
                //获取当前激活的workbooks 
                lpDisp=app.get_Workbooks(); 
                if(lpDisp==NULL) 
                { 
                        MessageBox(NULL,_T( "没有发现有效的Book!"), _T("TrueTable"),MB_ICONERROR | MB_OK); 
                        app.ReleaseDispatch (); 
                        //如果VectorTableinfo不为空则将其清空 
                        delete[] TextInfoArr; 
                        AfxOleTerm(); 
                        return 2; 
                } 
                Workbooks.AttachDispatch(lpDisp); 
                for (int i=0;i<Workbooks.get_Count();i++) 
                { 
                        bool IsBreak=false; 
                        lpDisp=Workbooks.get_Item(COleVariant((long)i+1)); 
                        if(lpDisp==NULL) 
                                continue; 
                        Workbook.AttachDispatch(lpDisp); 
                        CString WorkBookName = Workbook.get_Name(); 
                        if(_tcscmp(WorkBookName,BookName) != 0) 
                                continue; 
                        lpDisp = Workbook.get_Worksheets(); 
                        if(lpDisp == NULL) 
                        { 
                                app.ReleaseDispatch (); 
                                Workbooks.ReleaseDispatch(); 
                                //如果VectorTableinfo不为空则将其清空 
                                delete[] TextInfoArr; 
                                AfxOleTerm(); 
                                return 2; 
 
                        } 
                        Worksheets.AttachDispatch(lpDisp); 
                        for (int j=0;j<Worksheets.get_Count();j++) 
                        { 
                                lpDisp = Worksheets.get_Item(COleVariant((long)j+1)); 
                                if(lpDisp == NULL) 
                                { 
                                        app.ReleaseDispatch (); 
                                        Workbooks.ReleaseDispatch(); 
                                        Workbook.ReleaseDispatch(); 
                                        //如果VectorTableinfo不为空则将其清空 
                                        delete[] TextInfoArr; 
/*                                        delete[] CurStyleName;*/ 
                                        AfxOleTerm(); 
                                        return 2; 
                                } 
                                Worksheet.AttachDispatch(lpDisp); 
                                if (_tcscmp(Worksheet.get_Name(),SheetName) != 0) 
                                        continue; 
                                ranges.AttachDispatch(Worksheet.get_Cells()); 
                                //已经获取了想要的sheet，下一步就需要对表格的内容进行检测和修改了 
                                for (int m=1;m<=TextInfoArr[0].RowNum * TextInfoArr[0].ColNum;m++) 
                                { 
                                        TextInfo textinfo= TextInfoArr[m]; 
                                        iCell.AttachDispatch(ranges.get_Item (COleVariant((long)textinfo.RowNum),COleVariant((long)textinfo.ColNum)).pdispVal ); 
                                        CString text = iCell.get_Text(); 
                                        iCell.ReleaseDispatch (); 
                                        if (_tcscmp(text,textinfo.text) == 0) 
                                        { 
                                                        continue; 
                                        } 
                                        if (_tcscmp(_T(""),text) == 0) 
                                        { 
                                                AcDbObjectId ObjectId = textinfo.Objectid; 
                                                AcDbText* pEnt=NULL; 
                                                // 锁定文档 
                                                acDocManager->lockDocument(curDoc()); 
                                                Acad::ErrorStatus es = acdbOpenObject((AcDbEntity *&)pEnt,ObjectId,AcDb::kForWrite); 
                                                if (es == Acad::eOk) 
                                                { 
                                                        pEnt->erase(); 
                                                        _tcscpy(TextInfoArr[m].text,text); 
                                                        TextInfoArr[m].Objectid = NULL; 
                                                        pEnt->close(); 
                                                        //更新屏幕显示 
//                                                        acedUpdateDisplay(); 
                                                        
                                                } 
                                                else if(es == Acad::eWasErased) 
                                                { 
                                                        // 解锁文档 
                                                        acDocManager->unlockDocument(curDoc()); 
                                                        ranges.ReleaseDispatch(); 
                                                        Worksheet.ReleaseDispatch (); 
                                                        Worksheets.ReleaseDispatch (); 
                                                        Workbook.ReleaseDispatch (); 
                                                        Workbooks.ReleaseDispatch (); 
                                                        delete[] TextInfoArr; 
                                                        ::MessageBox(NULL, _T("有手动删除对象，线程退出！"), _T("警告"), MB_ICONHAND); 
/*                                                        delete[] CurStyleName;*/ 
                                                        AfxOleTerm(); 
                                                        return 2; 
                                                } 
                                                // 解锁文档 
                                                acDocManager->unlockDocument(curDoc()); 
                                        } 
                                        else 
                                        { 
                                                if (_tcscmp(_T(""),textinfo.text) == 0) 
                                                { 
                                                        _tcscpy(TextInfoArr[m].text,text); 
                                                        _tcscpy(textinfo.text,text); 
//                                                        AcGePoint3d InsertPoint =CCalculation::MiddlePoint(textinfo.LUPoint,textinfo.RBPoint); 
                                                        AcDbObjectId Obj = CreateMText(textinfo.LUPoint,textinfo.RBPoint,textinfo.text,AcDbObjectId::kNull,textinfo.texthight,textinfo.HorizontalAlignment,ptInsert,Caption,BookName,SheetName,start_row,start_col,row_nums,col_nums); 
                                                        if (Obj != NULL) 
                                                        { 
                                                                TextInfoArr[m].Objectid = Obj; 
//                                                                acedUpdateDisplay(); 
                                                        } 
                                                          
                                                } 
                                                else 
                                                { 
                                                        AcDbObjectId ObjectId = textinfo.Objectid; 
                                                        AcDbMText* pEnt=NULL; 
                                                        // 锁定文档 
                                                        acDocManager->lockDocument(curDoc()); 
                                                        Acad::ErrorStatus es = acdbOpenObject((AcDbEntity *&)pEnt,ObjectId,AcDb::kForWrite); 
                                                        AcDbObjectId  StyleObjectId; 
                                                        if (es == Acad::eOk) 
                                                        { 
                                                                pEnt->setContents(text); 
//                                                                 pEnt->adjustAlignment(acdbHostApplicationServices()->workingDatabase()); 
//                                                                 pEnt->recordGraphicsModified(true); 
//                                                                acedUpdateDisplay(); 
//                                                                 StyleObjectId = pEnt->textStyle(); 
//                                                                 if (StyleID != NULL && StyleObjectId != StyleID) 
//                                                                 { 
//                                                                         pEnt->setTextStyle(StyleID); 
//                                                                 } 
//                                                                 else if (CurSthyleID != NULL && CurSthyleID != StyleObjectId) 
//                                                                 { 
//                                                                         pEnt->setTextStyle(StyleObjectId); 
//                                                                 } 
                                                                _tcscpy(TextInfoArr[m].text,text); 
                                                                pEnt->close(); 
                                                                
                                                        } 
                                                        else if(es == Acad::eWasErased) 
                                                        { 
                                                                // 解锁文档 
                                                                acDocManager->unlockDocument(curDoc()); 
                                                                ranges.ReleaseDispatch(); 
                                                                Worksheet.ReleaseDispatch (); 
                                                                Worksheets.ReleaseDispatch (); 
                                                                Workbook.ReleaseDispatch (); 
                                                                Workbooks.ReleaseDispatch (); 
                                                                delete[] TextInfoArr; 
                                                                ::MessageBox(NULL, _T("有手动删除对象，线程退出！"), _T("警告"), MB_ICONHAND); 
/*                                                                delete[] CurStyleName;*/ 
                                                                AfxOleTerm(); 
                                                                return 2; 
                                                        } 
                                                        // 解锁文档 
                                                        acDocManager->unlockDocument(curDoc()); 
                                                        
                                                } 
                                        } 
                                        
                                } 
                                ranges.ReleaseDispatch(); 
                                Worksheet.ReleaseDispatch (); 
                                Worksheets.ReleaseDispatch (); 
                                Workbook.ReleaseDispatch (); 
                                Workbooks.ReleaseDispatch (); 
                                IsBreak=true; 
                                break; 
                        } 
                        if(IsBreak) 
                                break; 
                } 
                
        } 
        //释放Dispatch 
        
        //如果VectorTableinfo不为空则将其清空 
        delete[] TextInfoArr; 
        app.ReleaseDispatch (); 
 
        return 1; 
} 
//动态从Excel读取数据 
int DynamicReadFromExcel() 
{ 
        
        //常用变量定义 
        CApplication app;    
        CWorkbooks books; 
        CWorkbook book; 
        CWorksheets sheets; 
        CWorksheet sheet; 
        CRange ranges,range; 
        CRange iCell,UnionRange,UnionRanges; 
        CRange RangeRow,RangeCol; 
        CFont0 Font0; 
        LPDISPATCH lpDisp;   
        LPDISPATCH Workbooks; 
        COleVariant 
                covTrue((short)TRUE), 
                covFalse((short)FALSE), 
                covOptional((long)DISP_E_PARAMNOTFOUND, VT_ERROR);       
        COleVariant vResult; 
 
        acdbRegApp(_T("ReadeEXCEL")); 
 
        //采用MFC方式初始化COM库，程序结束时COM库会自动释放 
        if(!AfxOleInit()) 
        { 
                MessageBox(NULL,_T("初始化COM支持库失败!\n无法控制Excel!"),_T("TrueTable"),MB_ICONERROR | MB_OK);   
                return RTERROR; 
        } 
 
        //关联已经运行的Excel实例 
        CLSID clsid; 
        CLSIDFromProgID(L"Excel.Application", &clsid);   
        IUnknown *pUnk = NULL; 
        IDispatch *pRunDisp = NULL; 
 
        for(long i=1;i<=5;i++) //做5次尝试 
        { 
                HRESULT hr = GetActiveObject(clsid, NULL, (IUnknown**)&pUnk); 
                if(SUCCEEDED(hr)) 
                { 
                        hr = pUnk->QueryInterface(IID_IDispatch, (void **)&pRunDisp); 
                        break; 
                } 
                ::Sleep(10); 
        } 
 
 
        if (!pRunDisp) 
        { 
                ::MessageBox(NULL, _T("没有发现Excel!"), _T("TrueTable"), MB_ICONHAND); 
                return RTERROR; 
        } 
        if (pUnk)  pUnk->Release(); 
 
        //关联Excel 
        app.AttachDispatch (pRunDisp); 
 
        CString Caption = app.get_Caption(); 
        //获取当前激活的sheet 
        lpDisp=app.get_ActiveSheet(); 
        if(lpDisp==NULL) 
        { 
                MessageBox(NULL,_T( "没有发现有效的表格!"), _T("TrueTable"),MB_ICONERROR | MB_OK); 
                app.ReleaseDispatch (); 
                return RTERROR; 
        } 
        sheet.AttachDispatch(lpDisp); 
        //读取sheet名 
        lpDisp=sheet.get_Parent(); 
        if(lpDisp==NULL) 
        { 
                MessageBox(NULL,_T( "没有发现有效的Book!"), _T("TrueTable"),MB_ICONERROR | MB_OK); 
                app.ReleaseDispatch (); 
                sheet.ReleaseDispatch(); 
                return RTERROR; 
        } 
        book.AttachDispatch(lpDisp); 
        CString BookName = book.get_Name(); 
        CString SheetName=sheet.get_Name(); 
 
 
        //获取选择区 
        LPDISPATCH Selectioned = app.get_Selection(); 
        if (Selectioned == NULL) 
        { 
                MessageBox(NULL,_T( "没有发现有效的表格!"), _T("TrueTable"),MB_ICONERROR | MB_OK); 
                app.ReleaseDispatch (); 
                sheet.ReleaseDispatch(); 
                book.ReleaseDispatch(); 
                return RTERROR; 
        } 
        vector<vector<TextInfo>>VectorTableinfo; 
        //选择的行数、列数: 
        long row_num,col_num,StartRow,StartCol; 
        ranges.AttachDispatch(Selectioned); 
        range.AttachDispatch(ranges.get_Rows()); 
        row_num=range.get_Count(); 
        range.AttachDispatch(ranges.get_Columns()); 
        col_num=range.get_Count(); 
//        ranges.AttachDispatch(Selectioned); 
        StartRow=range.get_Row();       //起始行 
        StartCol=range.get_Column();    //起始列 
        if(col_num<2 && row_num<2)     //未选中区域 
        { 
                MessageBox(NULL,_T("\n当前表格未选中区域数据!"),_T("TrueTable"),MB_ICONERROR | MB_OK); 
                app.ReleaseDispatch (); 
                return RTERROR; 
 
        } 
        else 
        { 
                ads_printf(_T("\n表格%s共选中%d行,%d列"),SheetName,row_num,col_num); 
        } 
 
 
 
        acutPrintf(_T("\nSheet名称:%s\n"),SheetName); 
        //得到全部Cells，此时,range是cells的集合 
        range.AttachDispatch(sheet.get_Cells()); 
        
        int rowhight,colwide; 
        CString cstr; 
        TableLine tableline; 
        //表格信息二维数组 
        
        AcGePoint3d RowStartPoint = ptInsert; 
        AcGePoint3d ColStartPoint; 
        for(long i=StartRow;i<StartRow+row_num;i++) 
        { 
                vector<TextInfo>Vectortextinfo; 
                AcGePoint3d ptRowCurren = RowStartPoint; 
                for(long j=StartCol;j<StartCol+col_num;j++) 
                { 
                        TextInfo textinfo; 
//                         _tcscpy_s(textinfo.SheetName,SheetName); 
//                         _tcscpy_s(textinfo.BookName,BookName); 
                        AcGePoint3d ptColCurren = ColStartPoint; 
                        //读取单元格文本 
                        iCell.AttachDispatch(range.get_Item (COleVariant(i),COleVariant(j)).pdispVal ); 
                        RangeRow.AttachDispatch(iCell.get_EntireRow()); 
                        COleVariant hReasult = RangeRow.get_Hidden(); 
                        if (hReasult.boolVal == VARIANT_TRUE) 
                                break; 
                        RangeCol.AttachDispatch(iCell.get_EntireColumn()); 
                        hReasult = RangeCol.get_Hidden(); 
                        if (hReasult.boolVal == VARIANT_TRUE) 
                                continue; 
                        //获取单元格的对齐方式 
                        hReasult.lVal=0; 
                        hReasult=iCell.get_HorizontalAlignment(); 
                        if(hReasult.lVal!=0) 
                        { 
                                switch (hReasult.lVal) 
                                { 
                                case 1:      //默认 
                                        { 
                                                textinfo.HorizontalAlignment =Aligndefault; 
                                                break; 
                                        } 
                                case -4108:  //居中 
                                        { 
                                                textinfo.HorizontalAlignment = AlignCenter; 
                                                break; 
                                        } 
                                        
                                case -4131 : //靠左 
                                        { 
                                                textinfo.HorizontalAlignment = Alignleft; 
                                                break; 
                                        } 
                                        
                                case -4152 : //靠右 
                                        { 
                                                textinfo.HorizontalAlignment = AlignRight; 
                                                break; 
                                        } 
                                } 
                        } 
                        //获取单元格所处的行号列号和文字 
                        textinfo.RowNum = i; 
                        textinfo.ColNum = j; 
                        vResult =iCell.get_Text(); 
                        cstr=vResult.bstrVal; 
                        _tcscpy(textinfo.text,cstr); 
                        //获取单元格字体 
                        Font0 = iCell.get_Font(); 
                        COleVariant varFontInfo; 
                        //字体高度 
                        varFontInfo = Font0.get_Size(); 
                        textinfo.texthight = abs(varFontInfo.dblVal * Scale * 0.7); 
                        //单元格行高列宽 
                        COleVariant Var=iCell.get_RowHeight(); 
                        //行高 
                        textinfo.rowheiht=Var.dblVal * Scale; 
                        Var=iCell.get_ColumnWidth(); 
                        //列宽 
                        textinfo.colwidth = Var.dblVal * 5 * Scale; 
                        vResult = iCell.get_MergeCells(); 
                        if (vResult.boolVal == -1) 
                        {        //是合并单元格 
                                textinfo.IsMergeCells = true; 
                                UnionRanges.AttachDispatch(iCell.get_MergeArea()); 
                                //合并单元格的行数 
                                UnionRange.AttachDispatch(UnionRanges.get_Rows()); 
                                textinfo.UnionRowNums = UnionRange.get_Count(); 
                                //合并单元格的列数 
                                UnionRange.AttachDispatch(UnionRanges.get_Columns()); 
                                textinfo.UnionColNums = UnionRange.get_Count(); 
                                //合并单元格的起始行列号 
                                textinfo.UnionStartRowNum = UnionRanges.get_Row(); 
                                textinfo.UnionStartColNum = UnionRanges.get_Column(); 
                                //合并单元格的行判断 
                                if (textinfo.UnionRowNums >1) 
                                { 
                                        if (textinfo.RowNum == textinfo.UnionStartRowNum) 
                                        {        //如果当前单元格的行是合并单元格第一行 
                                                textinfo.IsTop = true; 
                                                textinfo.IsBottom = false; 
                                                textinfo.LUPoint = ptRowCurren; 
                                                textinfo.RUPoint = textinfo.LUPoint; 
                                                textinfo.RUPoint.x += textinfo.colwidth; 
                                        } 
                                        else if(textinfo.RowNum == textinfo.UnionStartRowNum + textinfo.UnionRowNums-1) 
                                        {        //如果当前单元格的行是合并单元格最后一行 
                                                textinfo.IsBottom = true; 
                                                textinfo.IsTop = false; 
                                                textinfo.LBPoint = ptRowCurren; 
                                                textinfo.LBPoint.y -= textinfo.rowheiht; 
                                                textinfo.RBPoint = textinfo.LBPoint; 
                                                textinfo.RBPoint.x += textinfo.colwidth; 
                                        } 
                                        else 
                                        {        //如果当前单元格的行不是合并单元格第一行也不是最后一行 
                                                textinfo.IsBottom = false; 
                                                textinfo.IsTop = false; 
                                        } 
                                } 
                                else 
                                { 
                                        textinfo.IsBottom = true; 
                                        textinfo.IsTop = true; 
                                        textinfo.LUPoint = ptRowCurren; 
                                        textinfo.RUPoint = textinfo.LUPoint; 
                                        textinfo.RUPoint.x += textinfo.colwidth; 
                                        textinfo.LBPoint = textinfo.LUPoint; 
                                        textinfo.LBPoint.y -= textinfo.rowheiht; 
                                        textinfo.RBPoint = textinfo.LBPoint; 
                                        textinfo.RBPoint.x += textinfo.colwidth; 
                                } 
                                //合并单元格的列判断 
                                if (textinfo.UnionColNums>1) 
                                { 
                                        if (textinfo.ColNum == textinfo.UnionStartColNum) 
                                        {        //如果当前单元格的行是合并单元格第一列 
                                                textinfo.IsLeft = true; 
                                                textinfo.IsRight = false; 
                                                textinfo.LUPoint = ptRowCurren; 
                                                textinfo.LBPoint = textinfo.LUPoint; 
                                                textinfo.LBPoint.y -= textinfo.rowheiht; 
                                        } 
                                        else if(textinfo.ColNum == textinfo.UnionStartColNum + textinfo.UnionColNums-1) 
                                        {        //如果当前单元格的行是合并单元格最后一列 
                                                textinfo.IsRight = true; 
                                                textinfo.IsLeft = false; 
                                                textinfo.RUPoint = ptRowCurren; 
                                                textinfo.RUPoint.x += textinfo.colwidth; 
                                                textinfo.RBPoint = textinfo.RUPoint; 
                                                textinfo.RBPoint.y -= textinfo.rowheiht; 
                                        } 
                                        else 
                                        {        //如果当前单元格的行不是合并单元格第一行也不是最后一行 
                                                textinfo.IsRight = false; 
                                                textinfo.IsLeft = false; 
                                        } 
                                } 
                                else 
                                { 
                                        textinfo.IsLeft = true; 
                                        textinfo.IsRight = true; 
                                        textinfo.LUPoint = ptRowCurren; 
                                        textinfo.LBPoint = textinfo.LUPoint; 
                                        textinfo.LBPoint.y -= textinfo.rowheiht; 
                                        textinfo.RUPoint = textinfo.LUPoint; 
                                        textinfo.RUPoint.x += textinfo.colwidth; 
                                        textinfo.RBPoint = textinfo.RUPoint; 
                                        textinfo.RBPoint.y -= textinfo.rowheiht; 
                                } 
                        } 
                        else 
                        {        //不是合并单元格 
                                textinfo.IsMergeCells = false; 
                                textinfo.IsBottom = true; 
                                textinfo.IsTop= true; 
                                textinfo.IsLeft = true; 
                                textinfo.IsRight = true; 
                                textinfo.LUPoint = ptRowCurren; 
                                textinfo.RUPoint = textinfo.LUPoint; 
                                textinfo.RUPoint.x += textinfo.colwidth; 
                                textinfo.LBPoint = textinfo.LUPoint; 
                                textinfo.LBPoint.y -= textinfo.rowheiht; 
                                textinfo.RBPoint = textinfo.LBPoint; 
                                textinfo.RBPoint.x += textinfo.colwidth; 
                        } 
                        Vectortextinfo.push_back(textinfo); 
                        ptRowCurren.x += textinfo.colwidth; 
                } 
                if (!Vectortextinfo.empty()) 
                { 
                        VectorTableinfo.push_back(Vectortextinfo); 
                        RowStartPoint.y -= Vectortextinfo.back().rowheiht; 
                } 
        } 
        
        //释放Dispatch 
        iCell.ReleaseDispatch (); 
        range.ReleaseDispatch (); 
        ranges.ReleaseDispatch(); 
        RangeRow.ReleaseDispatch(); 
        RangeCol.ReleaseDispatch(); 
        UnionRanges.ReleaseDispatch(); 
        UnionRange.ReleaseDispatch(); 
        sheet.ReleaseDispatch (); 
        sheets.ReleaseDispatch (); 
        book.ReleaseDispatch (); 
        books.ReleaseDispatch (); 
        Font0.ReleaseDispatch(); 
        app.ReleaseDispatch (); 
 
        //行表格线列表 
        //行表格线列表 
        
        
        vector<list<TableLine>>lRow; 
        vector<list<TableLine>>lCol; 
        AcGePoint3d StartPoint = ptInsert; 
        AcGePoint2d ptlu,ptrb; 
        ptlu.x = ptInsert.x; 
        ptlu.y=ptInsert.y; 
        TextInfo * TextInfoArry = new TextInfo[VectorTableinfo.size() * VectorTableinfo[0].size()+1]; 
        int number =1; 
        TextInfoArry[0].RowNum = VectorTableinfo.size() * VectorTableinfo[0].size(); 
        BookName.Append(_T(",")); 
        BookName.Append(SheetName); 
        BookName.Append(_T(",")); 
        BookName.Append(Caption); 
        _tcscpy(TextInfoArry[0].text,BookName); 
        TextInfoArry[0].RowNum=row_num; 
        TextInfoArry[0].ColNum=col_num; 
        TextInfoArry[0].UnionStartRowNum =StartRow; 
        TextInfoArry[0].UnionStartColNum=StartCol; 
        for (int i = 0;i < VectorTableinfo.size();i++) 
        { 
                vector<TextInfo>Vectortextinfo = VectorTableinfo[i]; 
                list<TableLine> ListTableRowline; 
                bool iscontinue = false; 
                TableLine RowTableLine; 
                for (int j = 0;j<Vectortextinfo.size();j++) 
                { 
                        
                        TextInfo textinfo = Vectortextinfo[j]; 
                        list<TableLine> ListTableColline; 
                        TableLine RowTableLine,ColTableLine; 
                        if (i > 0) 
                        {        //第一行顶线不用判断 
                                if (textinfo.IsMergeCells) 
                                {        //是合并单元格 
                                        if (textinfo.IsTop) 
                                        { 
                                                if (ListTableRowline.empty() || iscontinue) 
                                                { 
                                                        RowTableLine.TopStartPoint=textinfo.LUPoint; 
                                                        RowTableLine.TopEndPoint = textinfo.RUPoint; 
                                                        ListTableRowline.push_back(RowTableLine); 
                                                        iscontinue = false; 
                                                } 
                                                else 
                                                { 
                                                        ListTableRowline.back().TopEndPoint=textinfo.RUPoint; 
                                                } 
                                        } 
                                        else 
                                        { 
                                                iscontinue =true; 
                                        } 
 
                                } 
                                else 
                                {        //不是合并单元格 
                                        if (ListTableRowline.empty()|| iscontinue) 
                                        { 
                                                RowTableLine.TopStartPoint=textinfo.LUPoint; 
                                                RowTableLine.TopEndPoint = textinfo.RUPoint; 
                                                ListTableRowline.push_back(RowTableLine); 
                                        } 
                                        else 
                                        { 
                                                ListTableRowline.back().TopEndPoint=textinfo.RUPoint; 
                                        } 
                                } 
                        } 
                        //列向竖线 
                        if (j>0) 
                        { 
                                if (textinfo.IsMergeCells) 
                                { 
                                        //是合并单元格 
                                        if (textinfo.IsLeft) 
                                        {        //单元格有左线 
                                                if (i == 0) 
                                                { 
                                                        //当前单元格未创建左线链表 
                                                        ColTableLine.TopStartPoint=textinfo.LUPoint; 
                                                        ColTableLine.BottomEndPoint=textinfo.LBPoint; 
                                                        ColTableLine.IsColcontinue = true; 
                                                        ListTableColline.push_back(ColTableLine); 
                                                        lCol.push_back(ListTableColline); 
                                                } 
                                                else 
                                                {        //当前单元格已创建左线链表 
                                                        if (lCol[j-1].back().IsColcontinue) 
                                                        {        //上段线连续 
                                                                lCol[j-1].back().BottomEndPoint=textinfo.LBPoint; 
                                                                
                                                        } 
                                                        else 
                                                        {        //上段线不连续 
                                                                ColTableLine.TopStartPoint=textinfo.LUPoint; 
                                                                ColTableLine.BottomEndPoint=textinfo.LBPoint; 
                                                                ColTableLine.IsColcontinue = true; 
                                                                lCol[j-1].push_back(ColTableLine); 
                                                                
                                                        } 
 
                                                } 
                                        } 
                                        else 
                                        { 
                                                if (i == 0) 
                                                { 
                                                        //当前单元格未创建左线链表 
                                                        
                                                        ColTableLine.TopStartPoint=AcGePoint3d(0,0,0); 
                                                        ColTableLine.BottomEndPoint=AcGePoint3d(0,0,0); 
                                                        ColTableLine.IsColcontinue = false; 
                                                        ListTableColline.push_back(ColTableLine); 
                                                        lCol.push_back(ListTableColline); 
                                                } 
                                                if (j<lCol.size()) 
                                                { 
//                                                        CreateLine(lCol[i].back().TopStartPoint,lCol[i].back().BottomEndPoint); 
                                                        lCol[j-1].back().IsColcontinue = false; 
                                                } 
 
                                        } 
                                } 
                                else 
                                {//不是合并单元格 
                                        if (i == 0) 
                                        { 
                                                //当前单元格未创建左线链表 
                                                ColTableLine.TopStartPoint=textinfo.LUPoint; 
                                                ColTableLine.BottomEndPoint=textinfo.LBPoint; 
                                                ColTableLine.IsColcontinue = true; 
                                                ListTableColline.push_back(ColTableLine); 
                                                lCol.push_back(ListTableColline); 
                                        } 
                                        else 
                                        {        //当前单元格已创建左线链表 
                                                if (lCol[j-1].back().IsColcontinue) 
                                                {        //上段线连续 
                                                        lCol[j-1].back().BottomEndPoint=textinfo.LBPoint; 
 
                                                } 
                                                else 
                                                {        //上段线不连续 
                                                        ColTableLine.TopStartPoint=textinfo.LUPoint; 
                                                        ColTableLine.BottomEndPoint=textinfo.LBPoint; 
                                                        ColTableLine.IsColcontinue = true; 
                                                        lCol[j-1].push_back(ColTableLine); 
 
                                                } 
                                        } 
                                } 
                        } 
                        //表的右下角点 
                        if (i+1 == VectorTableinfo.size() && j+1 == Vectortextinfo.size()) 
                        { 
                                ptrb.x = textinfo.RBPoint.x; 
                                ptrb.y = textinfo.RBPoint.y; 
                        } 
                        //向CAD中写字 
                        if (_tcscmp(textinfo.text,_T("")) != 0) 
                        { 
                                if (textinfo.IsMergeCells) 
                                { 
                                        if (textinfo.ColNum == textinfo.UnionStartColNum && textinfo.RowNum == textinfo.UnionStartRowNum) 
                                        { 
                                                AcGePoint3d InsertPt1 =textinfo.LUPoint; 
                                                AcGePoint3d InsertPt2 = VectorTableinfo[i + textinfo.UnionRowNums-1][j + textinfo.UnionColNums-1].RBPoint; 
                                                textinfo.RBPoint = InsertPt2; 
//                                                AcGePoint3d InsertPoint =CCalculation::MiddlePoint(InsertPt1,InsertPt2); 
                                                AcDbObjectId Obj = CreateMText(InsertPt1,InsertPt2,textinfo.text,AcDbObjectId::kNull,textinfo.texthight,textinfo.HorizontalAlignment,ptInsert,Caption,BookName,SheetName,StartRow,StartCol,row_num,col_num); 
                                                if (Obj != NULL) 
                                                { 
                                                        textinfo.Objectid = Obj; 
//                                                         AcDbText* pEntity; 
//                                                         if(acdbOpenObject(pEntity,Obj,AcDb::kForRead) == Acad::eOk) 
//                                                         { 
//                                                                 AcGePoint3d position; 
//                                                                 position = pEntity->position(); 
//                                                                 position = pEntity->alignmentPoint(); 
//                                                                 pEntity->close(); 
//                                                         } 
                                                } 
                                        } 
                                } 
                                else 
                                { 
//                                        AcGePoint3d InsertPoint =CCalculation::MiddlePoint(textinfo.LUPoint,textinfo.RBPoint); 
                                        AcDbObjectId Obj = CreateMText(textinfo.LUPoint,textinfo.RBPoint,textinfo.text,AcDbObjectId::kNull,textinfo.texthight,textinfo.HorizontalAlignment,ptInsert,Caption,BookName,SheetName,StartRow,StartCol,row_num,col_num); 
                                        if (Obj != NULL) 
                                        { 
                                                textinfo.Objectid = Obj; 
                                        } 
                                } 
                        } 
                        else 
                        {        //如果单元格为空 
                                if (textinfo.IsMergeCells) 
                                {        //单元格为合并单元格 
                                        if (textinfo.ColNum == textinfo.UnionStartColNum && textinfo.RowNum == textinfo.UnionStartRowNum) 
                                        {        //设置第一个合并单元格左上角和右下角的坐标 
                                                AcGePoint3d InsertPt1 =textinfo.LUPoint; 
                                                AcGePoint3d InsertPt2 = VectorTableinfo[i + textinfo.UnionRowNums-1][j + textinfo.UnionColNums-1].RBPoint; 
                                                textinfo.RBPoint = InsertPt2; 
                                        } 
                                } 
                        } 
                        TextInfoArry[number]=textinfo; 
                        number++; 
                } 
                lRow.push_back(ListTableRowline); 
                ListTableRowline.clear(); 
        } 
        //画列线 
        for (int i =0;i<lCol.size();i++) 
        { 
                list<TableLine> ListTableColline = lCol[i]; 
                list<TableLine>::const_iterator Iterator; 
                for (Iterator=ListTableColline.begin();Iterator != ListTableColline.end();Iterator++) 
                { 
 
                        if (Iterator->TopStartPoint != Iterator->BottomEndPoint) 
                        { 
                                CreateLine(Iterator->TopStartPoint,Iterator->BottomEndPoint); 
                        } 
                } 
        } 
        //画行线 
        for (int i =0;i<lRow.size();i++) 
        { 
                list<TableLine> ListTableRowline = lRow[i]; 
                list<TableLine>::const_iterator Iterator; 
                for (Iterator=ListTableRowline.begin();Iterator != ListTableRowline.end();Iterator++) 
                { 
                        if (Iterator->TopStartPoint != Iterator->BottomEndPoint) 
                        { 
                                CreateLine(Iterator->TopStartPoint,Iterator->TopEndPoint); 
                        } 
                } 
        } 
        CreateRectangle(ptlu,ptrb,0); 
        LPVOID lpParameter =(LPVOID)TextInfoArry; 
        HANDLE hThreade = ::CreateThread( 
                NULL,  // pointer to security attributes 
                NULL,                         // initial thread stack size 
                ThreadProc,     // pointer to thread function 
                lpParameter,                        // argument for new thread 
                NULL,                     // creation flags 
                NULL                         // pointer to receive thread ID 
                ); 
        ::CloseHandle(hThreade); 
        if (!VectorTableinfo.empty()) 
        { 
                for (int i=0;i<VectorTableinfo.size();i++) 
                { 
                        VectorTableinfo[i].clear(); 
                } 
                VectorTableinfo.clear(); 
        } 
        return RTNORM; 
} 
 
//----------------------------------------------------------------------------- 
//----- ObjectARX EntryPoint 
class CExcelApp : public AcRxArxApp { 
 
public: 
        CExcelApp () : AcRxArxApp () {} 
 
        virtual AcRx::AppRetCode On_kInitAppMsg (void *pkt) { 
                // TODO: Load dependencies here 
 
                // You *must* call On_kInitAppMsg here 
                AcRx::AppRetCode retCode =AcRxArxApp::On_kInitAppMsg (pkt) ; 
                
                // TODO: Add your initialization code here 
 
                return (retCode) ; 
        } 
 
        virtual AcRx::AppRetCode On_kUnloadAppMsg (void *pkt) { 
                // TODO: Add your code here 
 
                // You *must* call On_kUnloadAppMsg here 
                AcRx::AppRetCode retCode =AcRxArxApp::On_kUnloadAppMsg (pkt) ; 
 
                // TODO: Unload dependencies here 
 
                return (retCode) ; 
        } 
 
        virtual void RegisterServerComponents () { 
        } 
 
 
        // - YCLExcel.ReadExcel command (do not rename) 
        static void YCLExcelReadExcel(void) 
        { 
                // Add your code for command YCLExcel.ReadExcel here 
                IsExitThreade = true; 
                acutPrintf(_T("本插件由孤帆制作，仅供试用！用前请保存工作，CAD随时可能崩溃！\n")); 
                ads_real ScaleBak=1.0; 
                TCHAR str[30]={0}; 
                TCHAR str1[10] = {0}; 
                _tcscpy(str, _T("请输入生成表格的比例：<")); 
                _stprintf(str1,_T("%f"),Scale); 
                _tcscat(str,str1); 
                _tcscat(str,_T(">:")); 
                if (acedGetReal(str,&ScaleBak) == RTNORM) 
                { 
                        Scale = ScaleBak; 
                } 
                ads_point pt; 
                if(acedGetPoint(NULL,_T("请拾取插入点:\n"),pt)!= RTNORM) 
                        return; 
                ptInsert.x=pt[0]; 
                ptInsert.y=pt[1]; 
                ptInsert.z=pt[2]; 
                IsExitThreade = false; 
                DynamicReadFromExcel() ; 
        } 
 
        // - YCLExcel.WriteExcel command (do not rename) 
        static void YCLExcelWriteExcel(void) 
        { 
                // Add your code for command YCLExcel.WriteExcel here 
 
                DynamicWriteToExcel(); 
        } 
 
//         // - YCLExcel.ReAccess command (do not rename) 
//         static void YCLExcelReAccess(void) 
//         { 
//                 // Add your code for command YCLExcel.ReAccess here 
//                 IsExitThreade = true; 
//                 CString Caption,BookName,SheetName; 
//                 int Start_Row,Start_Col,Row_Nums,Col_Nums; 
//                 AcGePoint3d pt; 
//                 struct resbuf *rb; // 结果缓冲区链表 
//                 ads_name ssname; 
//                 rb = acutBuildList(RTDXF0, _T("MTEXT"),    // 实体类型 
//                         RTNONE); 
//                 // 选择复合要求的文字 
//                 if(acedSSGet(NULL,NULL,NULL,rb,ssname) != RTNORM) 
//                 { 
//                         acutRelRb(rb); 
//                         AfxMessageBox(_T("选择对象失败！")); 
//                         return; 
//                 } 
//                 long sslength; 
//                 acedSSLength(ssname, &sslength); 
//                 acutRelRb(rb); 
//                 bool IsXData = false; 
//                 for(int i = 0;i < sslength;i++) 
//                 { 
//                         ads_name ent; 
//                         AcDbObjectId objId; 
//                         acedSSName(ssname, i, ent); 
//                         acdbGetObjectId(objId, ent); 
//                         AcDbEntity *pEnt; 
//                         if(acdbOpenAcDbEntity(pEnt, objId, AcDb::kForRead) == Acad::eOk) 
//                         { 
//                                 struct resbuf  *pXData,*pTemp; 
//                                 pXData = pEnt->xData(_T("ReadeEXCEL")); 
//                                 pEnt->close(); 
//                                 if (pXData != NULL)     // 如果已经包含扩展数据，就不再添加新的扩展数据 
//                                 { 
//                                         pTemp = pXData->rbnext; 
//                                         Caption = pTemp->resval.rstring; 
//                                         pTemp = pTemp->rbnext; 
//                                         BookName = pTemp->resval.rstring; 
//                                         pTemp = pTemp->rbnext; 
//                                         SheetName = pTemp->resval.rstring; 
//                                         pTemp = pTemp->rbnext; 
//                                         Start_Row = pTemp->resval.rint; 
//                                         pTemp = pTemp->rbnext; 
//                                         Start_Col = pTemp->resval.rint; 
//                                         pTemp = pTemp->rbnext; 
//                                         Row_Nums = pTemp->resval.rint; 
//                                         pTemp = pTemp->rbnext; 
//                                         Col_Nums = pTemp->resval.rint; 
//                                         pTemp = pTemp->rbnext; 
//                                         pt.x = pTemp->resval.rpoint[X]; 
//                                         pt.y = pTemp->resval.rpoint[Y]; 
//                                         pt.z = pTemp->resval.rpoint[Z]; 
//                                         acutRelRb(pXData); 
//                                         IsXData = true; 
//                                         break; 
//                                 } 
//                         } 
//                 } 
//                 acedSSFree(ssname); 
//                 if (IsXData) 
//                 { 
//                         ReReadeExcel(Caption,BookName,SheetName,Start_Row,Start_Col,Row_Nums,Col_Nums,pt); 
//                 } 
//                 else 
//                 { 
//                         AfxMessageBox(_T("未找到有效的扩展数据！")); 
//                 } 
//         } 
} ; 
 
//----------------------------------------------------------------------------- 
IMPLEMENT_ARX_ENTRYPOINT(CExcelApp) 
 
ACED_ARXCOMMAND_ENTRY_AUTO(CExcelApp, YCLExcel, ReadExcel, ReadExcel, ACRX_CMD_TRANSPARENT, NULL) 
ACED_ARXCOMMAND_ENTRY_AUTO(CExcelApp, YCLExcel, WriteExcel, WriteExcel, ACRX_CMD_TRANSPARENT, NULL) 
//ACED_ARXCOMMAND_ENTRY_AUTO(CExcelApp, YCLExcel, ReAccess, ReAccess, ACRX_CMD_TRANSPARENT, NULL)

fsafaffa · 发表于 2017-8-18 20:09:52

有权限限制，下载不了

，楼主，能解除权限吗

zhangcan0515 · 发表于 2017-8-18 21:34:44

收藏了比较实用

alexmai · 发表于 2017-8-19 20:14:31

springwillow 发表于 2017-8-18 18:00
不会，这个只是练习多线程的作品，关掉EXCEL就失效拉

这样的话，意义不大，因为cad可以外部参照 xls 文件，双击外部参照也能打开xls文件，修改内容

qq644212869 · 发表于 2017-8-21 17:23:20

下载不了。。。我晕

账号		自动登录	找回密码
密码			注册

[经验] 动态读取Excel中的内容