三级韩国一区久久二区综合,亚洲AV无码久久精品狠狠爱浪潮,亚洲国产精品无码久久SM

��CListCtrl中的数据导出至Excel

披星戴月 — Mon, 10 Sep 2007 04:25:00 GMT

#import "C:\\Program Files\\Common Files\\Microsoft Shared\\OFFICE11\\MSO.DLL" rename( "RGB", "MSORGB" )
using namespace Office;

#pragma warning(disable : 4192)

#import "C:\\Program Files\\Common Files\\Microsoft Shared\\VBA\\VBA6\\VBE6EXT.OLB"
#import "D:\\Program Files\\Microsoft Office\\OFFICE11\\EXCEL.EXE" \
  rename( "DialogBox", "ExcelDialogBox" ) \
  rename( "RGB", "ExcelRGB" ) \
  rename( "CopyFile", "ExcelCopyFile" ) \
  rename( "ReplaceText", "ExcelReplaceText" )

void CRecordView::OnFileExport()
{
TCHAR szFilter[] = { _T("Excel文�g (*.xls)|*.xls|所有文�?(*.*)|*.*||") };
CFileDialog SaveDialog(FALSE, NULL, NULL, OFN_HIDEREADONLY | OFN_OVERWRITEPROMPT, szFilter);
if (SaveDialog.DoModal() == IDOK)
{
  _variant_t varOption((long)DISP_E_PARAMNOTFOUND, VT_ERROR);

CWaitCursor wait;

  try
  {
   Excel::_ApplicationPtr pExcelApp(_T("Excel.Application"));
   Excel::_WorkbookPtr pBook = pExcelApp->Workbooks->Add(varOption);
   Excel::_WorksheetPtr pSheet = pBook->ActiveSheet;

   //Excel::RangePtr pRange = pSheet->GetRange(_T("A1"), _T("D1"));
   Excel::RangePtr pRange = pSheet->Cells;

   CHeaderCtrl* pHeader = m_wndList.GetHeaderCtrl();
   int nColumn = pHeader->GetItemCount();

   {
    TCHAR szText[40] = { 0 };
    HDITEM hdi = { 0 };
    hdi.mask = HDI_TEXT;
    hdi.pszText = szText;
    hdi.cchTextMax = 40;
    for (int i = 1; i < nColumn; i++)
    {
     pHeader->GetItem(i, &hdi);
     pRange->Item[1][i] = hdi.pszText;
    }

    Excel::RangePtr pHeaderRange = pRange->GetRange(variant_t(_T("A1")), variant_t(_T("F1")));
    pHeaderRange->Font->Bold = true;
   }

   for (int i = 0; i < m_wndList.GetItemCount(); i++)
   {
    for (int j = 1; j < nColumn; j++)
    {
     pRange->Item[i+2][j] = (LPCTSTR)m_wndList.GetItemText(i, j);
    }
   }

pRange = pRange->EntireColumn;
pRange->AutoFit();

pBook->Close(true, (LPCTSTR)SaveDialog.GetPathName(), varOption);
pExcelApp->Quit();

   AfxMessageBox(_T("数据已成功导出到Excel表格中！"), MB_OK | MB_ICONINFORMATION);
  }
  catch (...)
  {
   AfxMessageBox(_T("导出数据错误�Q?), MB_OK | MB_ICONERROR);
   return;
  }
}
}

披星戴月 2007-09-10 12:25 发表评论

披星戴月 — Mon, 10 Sep 2007 04:22:00 GMT

BOOL CRoiDialog::ContinueModal()
{
      if(m_wndToolBar.IsWindowVisible())
      {
            CWnd* pWndParent = m_wndToolBar.GetParent();
            m_wndToolBar.OnUpdateCmdUI((CFrameWnd*)this, TRUE);
      }

return CDialog::ContinueModal();
}

披星戴月 2007-09-10 12:22 发表评论

FormView 外观

披星戴月 — Mon, 10 Sep 2007 04:21:00 GMT

BOOL CMainFrame::PreCreateWindow(CREATESTRUCT& cs)
{
if (!CFrameWndBase::PreCreateWindow(cs))
return FALSE;

cs.dwExStyle &= ~WS_EX_CLIENTEDGE;

return TRUE;
}

BOOL CMainView::PreCreateWindow(CREATESTRUCT& cs)
{
cs.style &= ~WS_BORDER;
return CFormView::PreCreateWindow(cs);
}

披星戴月 2007-09-10 12:21 发表评论

删除文�g臛_��收站而不是永久删除[转]

披星戴月 — Mon, 10 Sep 2007 04:20:00 GMT

class CRecycleFile : private SHFILEOPSTRUCT
{
public:
      CRecycleFile()
      {
            memset((SHFILEOPSTRUCT*)this,0,sizeof(SHFILEOPSTRUCT));
            fFlags |= FOF_SILENT;                // don't report progress
            fFlags |= FOF_NOERRORUI;             // don't report errors
            fFlags |= FOF_NOCONFIRMATION;        // don't confirm delete
      }

      ~CRecycleFile()
      {
      }

      //
      // Send a file to the recycle bin. Args:
      // - full pathname of file.
      // - bDelete: if TRUE, really delete file (no recycle bin)
      //
      int Recycle(LPCTSTR pszPath, BOOL bDelete=FALSE)
      {
            TCHAR buf[_MAX_PATH + 1]; // allow one more character
            _tcscpy(buf, pszPath);    // copy caller's path name
            buf[_tcslen(buf)+1]=0;    // need two NULLs at end

            // Set SHFILEOPSTRUCT params for delete operation
            wFunc = FO_DELETE;                   // REQUIRED: delete operation
            pFrom = buf;                         // REQUIRED: which file(s)
            pTo = NULL;                          // MUST be NULL
            if(bDelete)
            {                       // if delete requested..
                  fFlags &= ~FOF_ALLOWUNDO;         // ..don't use Recycle Bin
            }
            else
            {                             // otherwise..
                  fFlags |= FOF_ALLOWUNDO;          // ..send to Recycle Bin
            }
            return SHFileOperation(this);        // do it!
      }

}

披星戴月 2007-09-10 12:20 发表评论

披星戴月 — Mon, 10 Sep 2007 04:15:00 GMT

#import "C:\\Program Files\\Common Files\\Microsoft Shared\\OFFICE11\\MSO.DLL" named_guids
using namespace Office;
#import "C:\\Program Files\\Common Files\\Microsoft Shared\\VBA\\VBA6\\VBE6EXT.OLB"
#import "D:\\Program Files\\Microsoft Office\\OFFICE11\\MSWORD.OLB" named_guids rename("ExitWindows","WordExitWindows")

披星戴月 2007-09-10 12:15 发表评论

在客户区内拖动鼠标移动对话框

披星戴月 — Mon, 10 Sep 2007 04:06:00 GMT

1. 捕获WM_NCHITTEST�Q?br>
    UINT CMyDialog::OnNcHitTest(CPoint point)
    {
         UINT nResult = CDialog::OnNcHitTest(point);
         return nResult == HTCLIENT ? HTCAPTION : nResult;
    }

2. 捕获WM_LBUTTONDOWN�Q?br>
    void CMyDialog::OnLButtonDown(CPoint point)
    {
          SendMessage(WM_SYSCOMMAND, 0xF012, 0);
          CDialog::OnLButtonDown(point);
    }

披星戴月 2007-09-10 12:06 发表评论

VideoLAN

披星戴月 — Wed, 04 Apr 2007 05:59:00 GMT

VideoLAN是法国巴黎的一��学生搞出来的，主要用途是用作MPEG和DVD播放。但是随着开发小�l�的努力�Q�最后成��Z��个单独的多媒体播攑֙��Q�不仅可以播放视频，�q�可以接收卫星视频信��h��者MPEG捕捉卡上的信受��?br>
http://www.videolan.org/

披星戴月 2007-04-04 13:59 发表评论

应用�E�序之间互相通讯的几�U�方法[转]

披星戴月 — Thu, 22 Mar 2007 03:36:00 GMT

应用�E�序之间的数据交换（互相通讯�Q�一直是困扰�q�大�E�序员的��N��Q�尽��已�l�出��C��各式各样的解��x��案，但迄今�ؓ止没有哪一�U�方案是完美无缺的。因此，只有学习�q�了解了它们的优�~�点后，才能在特定的情况下选择最��x��案，以满��x��l�的要求�?

　　1、共�?

　　在硬盘上建立一个文�Ӟ��一个应用程序往该文仉��写数据（可以不关闭文�Ӟ��但必��d��新缓冲区�Q�，另一个应用程序以�׃�n方式打开�q�个文�g�q�读取其中的内容�Q�这便是最��单的一�U�数据交换方式。对于网�l�用戯��言�Q�只要两台终端上安装的都是Win311 For Workgroup或Windows 95�Q�或NT�Q�，则只要设�|�一下目录共享，映射成网�l�驱动器�Q�同样可以简单地实现数据交换。但它的�~�点也是显而易见的�Q�只能采取轮询的方式获得最新数据（效率低下�Q�，�|�络映射的驱动器�l�对不能变动或取消（可靠性差�Q�，所以这是一�U�“低�U�”的通讯方式�?

　　2、DDE

　　每个Windows�E�序员都不会对DDE�Q�动态数据交换）感到陌生�Q�它是最早的��Z��Windows的数据交换方法，有三�U�方式可供选择�Q�冷�q�接、温�q�接和热�q�接。一般都是由客户端向服务器端发出�q�接甌��Q��ƈ且必��L��明服务器端的名字和标题。在�q�接建立后，数据可以双向��动。典型的例子如抓图��Y件SnagIt�Q�它提供了DDE接口�Q�能够让其它应用�E�序来控制它。DDE是完全向后兼容的�Q�从16位��^台�{�?2位，源代码几乎不用修攏V�?

　　DDE�q�有�|�络功能。��用过Win311 For Workgroup的�h大概都还记得�Q�它自带一个非常吸引�h的小�E�序“Chat”，能��两台计算机通过�|�络实时交谈�Q�这在当时几乎是一��创举。可是很��有人知道“Chat”��用的是一�U�特�D�的DDE�Q�即NetDDE。它的基本工作原理仍然是DDE�Q�但它能使一台计��机向在同一个网�l�中的另一台终端发消息�Q�而不像普通DDE 只能局限在同一台机器上。与其它的数据交换方式相比，DDE已不够先�q�，而且Microsoft也不再积极支持DDE�Q�所以它的前景不被看好�?

　　3、WM_COPYDATA

　　Windows消息WM_COPYDATA功能强大�Q�知之者却甚少。它的确切定义是�Q�一个应用程序向另一个应用程序传递数据时所发出的消息。众所周知�Q�W(xu��)indows 在很大程度上依赖于消息机�Ӟ��那么我们��Z��么不把数据放在消息中一起发送出��d��Q�这��P��我们只要调用SendMessage�Q�）�Q�以�Ҏ(gu��)��H�体的句柄作为第一个参敎ͼ�以含有指向实际数据的指针�l�构的地址作�ؓ�W�二个参敎ͼ��可以把整个数据块当作消息发向另一个应用程序。也许有的程序员会说�Q�一个自定义的消息同样可以完成这��L��工作。他只说对了一半。自定义消息的确可以发送到其它的应用程序上去，但其原始数据所在的内存区只有在发送过�E�中才是合法的，若在其它模块中存取该内存区就会导致“Access Violation”。而��用WM_COPYDATA 则不存在�q�个问题�Q�因为Windows 本��n会替你处理这一切。深入钻研下去，你会发现它其实是先创��Z��一个文件映��的对象�Q�将发送方的原始数据先拯��x��文�Ӟ��然后再在接收方对�q�个映射文�g打开一个“视�䏀�。WM_COPYDATA 的不��之处在于：必须要有一个窗体来接收消息和数据（�~�Z��灉|��性）�Q�数据在使用之前先得拯��C��个映��文�Ӟ��费资源�Q��?

　　4、NetBIOS

　　�?0�q�代开始，NetBIOS��是开发Client/Server�cȝ��序的标准接口。而当时其它的解决�Ҏ(gu��)��几乎都是从UNIX�pȝ��上发展而来的。当�Ӟ��对于今天的用戯��言�Q�NetBIOS已不是唯一的选择�Q�他们可以从各种�Ҏ(gu��)��中择优选取。在Windows 95和NT�q�_��上，可以通过API函数Netbios()来调用NetBIOS功能�?

　　NetBIOS兼容以下几种低层协议�Q�NetBEUI协议�Q�NBF�Q�、NWLink NetBIOS(NWNBlink)、NetBIOS over TCP/IP(NetBT)。NetBIOS的优�Ҏ(gu��)��速度较快�Q�缺�Ҏ(gu��)��可靠性较差�?

　　5、标准的Sockets和W(xu��)inSock

　　Sockets�?5�q�前在UNIX�pȝ��上提出来的，一开始主要是用于本地通讯�Q�但很快��应用在Client/Server体系上了。它的内核很��单：你可以将一个Socket看作是一个双向的节点�Q�一个应用程序可以通过它先与另一个程序徏立连接（建立在一个双斚w��认可的端上，以便于区分同时运行的几个通讯�U�程�Q�，然后��可以彼此交换数据了�?

　　微��Y公司在其基础上创��Z��WinSock�Q�专门用于Windows接口�Q�与Socket完全兼容。近�q�来��Z��TCP/IP协议的网�l�大行其道，Socket也随之获得了更加�q�泛的应用�?

　　如今�Q�Sockets已在Internet上获得了最�q�泛的应用，主要是因为它的可�U�L��性好�Q?

　　Socket应用�E�序无论在�Q何��^台间都能互相�q�行通讯�Q�不��是PC��是Macintosh,也不��是Windows�q�_��q�是UNIX�q�_��Q�。而最新推出的WinSock 2.0�Q�已不仅仅只��Z��TCP/IP协议�Q�还可基于其它几�U�传输协议（如IPX�Q��?

　　Socket的缺��h��它工作在通讯的低层，所以实现�v来较为复杂（如果是Win 95或NT�q�_��Q�则不存在这个问题，微��Y公司提供了相应的控�g�Q�。但是，如果要在多个�q�_��间互盔R��讯�Q�则Socket是不二之选�?

　　6、Mailslot和Pipe

　　Mailslot和Pipe有很多相同点�Q�即都是高层的、基于内存的通讯�pȝ��。Mailslot由Server端创建，代码如下�Q?

　　myMailslot = CreateMailslot(pSlotName, 0, MAILSLOT_WAIT_FOREVER, NULL);

　　然后�Q�Client端就可以像打开文�g一��h��开�q�个Mailslot�Q�再通过API函数WriteFile()来将数据写入到消息队列中�?

　　与此相类��|��Pipe也是由Server端创建的�Q�代码如下：

　　pipe = CreateNamedPipe(pPipeName, PIPE_ACCESS_DUPLEX, PIPE_TYPE_MESSAGE |PIPE_READMODE_MESSAGE | PIPE_WAIT, PIPE_UNLIMITED_INSTANCES, BUFSIZE,BUFSIZE, 20000, NULL);

　　接着�Q�Client端就可以通过一般的文�gAPI��d��数据�Q�代码如下：

　　pipe = CreateFile(pPipeName, GENERIC_READ | GENERIC_WRITE, 0, NULL, OPEN_EXISTING,0,NULL);

　　success = WriteFile(pipe, pMessage, strlen(pMessage) + 1, &bytesWritten, NULL);

　　Pipe分两�U�，卛_��名Pipe和匿名Pipe。匿名Pipe是以句柄而不是以名字来进行标识的�Q�因而也��限制了它只能在同一台机器上通讯�Q�而不能应用于�|�络。命名Pipe则提供了以名字来�q�行标识�Q�所以能在网�l�上的其它�Q何地�Ҏ(gu��)��开它。需要注意的是：命名Pipe只能�?Win NT而不是Win 95上创建（即Server端）�Q�Client端则可以是�Q意��^台�?

　　Pipe既可以单向通讯也可以双向通讯�Q�Mailslot则只能单向通讯。Client端可以发送消息给mailslot�Q�但不能接收消息�Q�如果你惌��接收消息�Q�则只能创徏一个新的mailslot。但mailslot有一个很大的优点�Q�它支持数据�q�播。也��是��_��若Client端发送一条消息，则整个网�l�中的同名对象都能收到。这是因为mailslot的名字的作用域只是在本台机器上，所以可在不同机器上创徏同名的mailslot�Q�当Client端发来消息时则每一台机上的mailslot都得��C��该消息的一份拷贝，�q�在本机上作出相应的反应。Mailslot的最大缺��h��不可靠，因�ؓ它的数据是以数据报格式来传送的�Q�网�l�错误或负荷�q�重都会��D��数据丢失�?

　　Pipe则较为可靠，但它不能�q�播。所以，如果你不需要进行广播，则Pipe是更好的选择。选择Mailslot�Q�则要对此后遇到的麻烦有充分的准备�?

　　7、剪贴板�Q�Clipboard�Q?

　　大家对Windows的剪贴板应该不会感到陌生吧？它的出现��是��Z��实现应用�E�序间的互相数据交换。Windows提供了一�p�d��的API函数来让应用�E�序安全地打开剪脓(chu��ng)板，��d��其中的数据�?

　　剪脓(chu��ng)板的�~�陷也是显而易见的�Q�当有新的数据放在剪贴板上时�Q�则先前的数据就会被冲掉�Q�而在Windows中用到剪贴板的时候又实在太多了，所以这�U�方式用于程序间的通讯昄��不够安全�?

　　8、COM和DCOM

　　公共对象模式�Q�COM�Q�是一�U�协议，它徏立了一个��Y件模块同另一个��Y件模块之间的�q�接�Q�然后将其描�q�出来。当�q�种�q�接建立��h��之后�Q�则两个模块之间��可以通过�U�Cؓ“接口”的机制来进行通讯。COM可以用不同的语言�Q�VB、VC、Delphi�Q�进行编�Ӟ��又能被其它语�a��~�写的程序所使用�Q��ƈ且不用管通讯双方实际所处的位置�Q�是在同一台机上，�q�是在同一个网�l�上的不同机上）。事实上�Q�Internet上有大量的COM控�g可供��Z��下蝲使用�Q�其中有相当一部分��是用于应用�E�序间的�怺�通讯�Q�甚��x��Internet�E�序间的通讯�Q�，��盘上能够看到的大量�?ocx文�g其实��是一�U�COM�?

　　COM对象为外部调用提供了一个标准的界面�Q�COM Client通过创徏COM Server的一个实例获得指针，转向所需的函数定义处�q�执行相应的�E�序。讲得通俗一点，也就是先正确定义好COM对象的属性（Property�Q�，再执行相应的�Ҏ(gu��)��Q�Method�Q��?

　　DCOM�Q�分布式公共对象模式�Q�是COM在网�l�上的一�U�扩展，它通过把分布式对象间的通讯变成一个实体来实现通讯�?

　　COM如今被微软公司大力提倡，最著名的有OLE、ActiveX、DirectX和W(xu��)in95、WinNT的外壟뀂由于微软公司目前在软�g业处于霸��d��位，所以COM很有可能成�ؓ��来的业界标准，其前途也较�ؓ看好。但COM的庞大也会��一些经验丰富的�E�序员望而却步，他们宁可自己多写一些代码以使整个程序更为简�z�、有效而不愿��用COM�?

　　以上介绍的只是现今流行的一些通讯�Ҏ(gu��)��Q�它们各有各的优�~�点�Q�没有哪一�U�是万能的。因此，只有在合适的场合采用合适的�Ҏ(gu��)��Q�才是最好的解决办法�?

披星戴月 2007-03-22 11:36 发表评论