国内精品久久久,99re成人精品视频,亚洲精选一区

MFC中自�׃��用自定义消息

让心飞翔 — Wed, 17 Dec 2008 05:18:00 GMT

    消息映射、��@环机制是Windows�E�序�q�行的基本方式。VC++ MFC 中有许多现成的消息句柄，可当我们需要完成其它的��d��Q�需要自定义消息�Q�就遇到了一些困难�?br>    在MFC ClassWizard中不允许��d��用户自定义消息，所以我们必��d��E�序中添加相应代码，以便可以象处理其它消息一样处理自定义消息。通常的做法是采取以下步骤:
�W�一�?定义消息�?/font>
　推荐用户自定义消息至��是WM_USER+100�Q�因为很多新控�g也要使用WM_USER消息�?br>#define WM_MY_MESSAGE (WM_USER+100)
�W�二�?实现消息处理函数�?/strong>
该函��C��用WPRAM和LPARAM参数�q�返回LPESULT�?
LPESULT CMainFrame::OnMyMessage(WPARAM wParam, LPARAM lParam)
{
    // TODO: 处理用户自定义消�?
    ...
    return 0;
}
�W�三�?在类头文件的AFX_MSG块中说明消息处理函数:
class CMainFrame:public CMDIFrameWnd
{
    ...
    // 一般消息映��函�?
    protected:
    // {{AFX_MSG(CMainFrame)
    afx_msg int OnCreate(LPCREATESTRUCT lpCreateStruct);
    afx_msg void OnTimer(UINT nIDEvent);
    afx_msg LRESULT OnMyMessage(WPARAM wParam, LPARAM lParam);
    //}}AFX_MSG
    DECLARE_MESSAGE_MAP()
}
�W�四�?在用��L��的消息块中，使用ON_MESSAGE宏指令将消息映射到消息处理函��C��?/strong>
BEGIN_MESSAGE_MAP(CMainFrame, CMDIFrameWnd)
//{{AFX_MSG_MAP(CMainFrame)
    ON_WM_CREATE()
    ON_WM_TIMER()
    ON_MESSAGE(WM_MY_MESSAGE, OnMyMessage)
//}}AFX_MSG_MAP
END_MESSAGE_MAP()

　　如果用户需要一个定义整个系�l�唯一的消�?可以调用SDK函数RegisterWindowMessage定义消息:
static UINT WM_MY_MESSAGE=RegisterWindowMessage("User");
　　�q��用ON_REGISTERED_MESSAGE宏指令取代ON_MESSAGE宏指�?其余步骤同上�?br>　　当需要��用自定义消息�?可以在相应类中的函数中调用函数PostMessage或SendMessage发送消�?font color="#990000">PoseMessage(WM_MY_MESSAGE,O,O);
如果向其他进�E�发送消息可通过如下�Ҏ��发送消�?
DWORD result;
SendMessageTimeout(wnd->m_hWnd, // 目标�H�口
                   WM_MY_MESSAGE, // 消息
                   0, // WPARAM
                   0, // LPARAM
                   SMTO_ABORTIFHUNG |
                   SMTO_NORMAL,
                   TIMEOUT_INTERVAL,
                   &result);
以避免其它进�E�如果被��d��而造成�pȝ��ȝ��状态�?br>    可是如果需要向其它�c?(如主框架、子�H�口、视�c�R��对话框、状态条、工��h��或其他控件等发送消息时上述�Ҏ��昑־�无能为力�Q�而在�~�程�q�程中往往需要获取其它类中的某个识别信号框架�l�我们造成了种�U�限�?但是可以通过获取某个�cȝ��指针而向�q�个�c�d��送消息，而自定义消息的各�U�动作则在这个类中定义，�q�样��可以自��p��在的向其它类发送消息了�?nbsp;

　　下面丄��例子叙述了向视类和框架类发送消息的�Ҏ��Q?br>★在��L��架类中向视类发送消息：
1.视类中定义消息：
ON_REGISTERED_MESSAGE(WM_MY_MESSAGE,OnMyMessage) //定义消息映射

2.视类定义消息处理函数�Q?br>LRESULT CMessageView::OnMyMessage(WPARAM wParam, LPARAM lParam)
{
    // TODO: 处理用户自定义消�?
    ...
    return 0;
}
3.发送消息的��试函数
void CMainFrame::OnTest()
{
    CView * active = GetActiveView();//获取当前视类指针
    if(active != NULL)
    active->PostMessage(WM_MY_MESSAGE,0,0);
}
★在其它�c�M��向视�c�d��送消息：
//发送消息的��试函数
void CMyDialog::OnTest()
{
    CMDIFrameWnd *pFrame;
    CMDIChildWnd *pChild;
    CView *pView;
    //获取�ȝ��口指�?br>    pFrame =(CMDIFrameWnd*)AfxGetApp()->m_pMainWnd;
    // 获取子窗口指�?br>    pChild = (CMDIChildWnd *) pFrame->GetActiveFrame();
    //获取视类指针
    pView = pChild->GetActiveView();
    if(pView != NULL)
    pView->PostMessage(WM_MY_MESSAGE,0,0);//发送消�?br>}
其余步骤同上�?br>★在视类中向��L��架发送消�?
首先在主框架中定义相关的消息,�Ҏ��同上,然后在发送消息的函数中添加代码如�?br>//发送消息的��试函数
void CMessageView::OnTest()
{
    CFrameWnd * active = GetActiveFrame();//获取当前�ȝ��口框架指�?br>    if(active != this)
    active->PostMessage(WM_MY_MESSAGE,0,0);
    return 0;
}
　　在其它类中向不同的类发送消息可依次�Ҏ��c�L��Q�这��h��们的�E�序��可以的不受限制向其它类和进�E�发送消息，而避免了�U�种意想不到的风险�?br>
【实例�?
　　下面一个例子程序�ؓ多文档程序里在一对话框中向视�c�d��送消�?详述了发送自定义消息的具体过�E��?br>　　实现步骤�Q?/p> �W�一步：在VC++中新建工�E�Message�Q�所有ClassWizard步骤选项均�ؓ�~�省,完成�?br>�W�二步：在主菜单中添加测试菜单�ؓ调出对话框，在框架类中徏立相应函数OnTest().
�W�三步：在资源中建立对话框，通过ClassWizard��d��新类TestDialog,��d��试按钮, 在对话框�c�M��建立相应函数OnDialogTest()
//通过对话框按钮发送消息的函数
void TestDialog::OnDialogTest()
{
    CMDIFrameWnd *pFrame;
    CMDIChildWnd *pChild;
    CView *pView;
    //获取�ȝ��口指�?br>    pFrame =(CMDIFrameWnd*)AfxGetApp()->m_pMainWnd;
    // 获取子窗口指�?br>    pChild = (CMDIChildWnd *) pFrame->GetActiveFrame();
    //获取视类指针
    pView = pChild->GetActiveView();
    if(pView != NULL)
    pView ->PostMessage(WM_MY_MESSAGE,0,0);//发送消�?br>}
　　在Message.h头文件中��d��如下语句�Q?br>static UINT WM_MY_MESSAGE=RegisterWindowMessage("Message");
�W�四�?在视�c�M��d��自定义消�?
在头文�gMessageView.h中添加消息映��?br>protected:
//{{AFX_MSG(CMessageView)
//}}AFX_MSG
afx_msg LRESULT OnMyMessage(WPARAM wParam, LPARAM lParam); //此行为添加代�?br>DECLARE_MESSAGE_MAP()
在视�c�L��件MessageView.cpp中的消息映射中添加自定义消息映射
BEGIN_MESSAGE_MAP(CMessageView, CView)
//{{AFX_MSG_MAP(CMessageView)
//}}AFX_MSG_MAP
// Standard printing commands
ON_REGISTERED_MESSAGE(WM_MY_MESSAGE,OnMyMessage) //此行��d��代码定义唯一消息
END_MESSAGE_MAP()
��d��相应�?消息处理函数
LRESULT CMessageView::OnMyMessage(WPARAM wParam, LPARAM lParam)
{
    CRect rect;
    GetClientRect(&rect);
    InvalidateRect(&rect);
    test=!test;
    return 0;
}
在MessageView.h中添加布��变�?public:BOOL test;
在视�c�L��造函��C��初始�?test变量:test=FALSE;
修改CMessageView::OnDraw()函数
void CMessageView::OnDraw(CDC* pDC)
{
    CMessageDoc* pDoc = GetDocument();
    ASSERT_VALID(pDoc);
    // 以下�E�序昄��消息响应效果
    if(test)
    pDC->TextOut(0,0,"消息响应!");
}
�W�五步：昄��试对话�?br>在MainFrame�c�M��包含对话框头文�g�Q?br>#include "TestDialog.h";
OnTest()函数中添加代�?br>void CMainFrame::OnTest()
{
    TestDialog dialog;
    dialog.DoModal();
}
�q�行�E�序,在测试菜单打开对话�?点击��试按钮卛_��看到�l�果

让心飞翔 2008-12-17 13:18 发表评论

让心飞翔 — Fri, 23 Jun 2006 15:21:00 GMT

很多人都觉得自己的程序的界面不那么美观，往往VC默认产生的对话框比较单调�Q�因此很多�h往往扑ֈ�很多其它的控件对对话框进行美化修饎ͼ�例如�l�静态控件设�|�字体，讄��背景颜色�{�等�Q?其实�q�些完全可以由VC自己的WM_CTLCOLOR消息来完成！
WM_CTLCOLOR消息用来完成对EDIT、STATIC、BUTTON�{�控件设�|�背景和字体颜色�Q�其用法如下�Q?/p>
1.首先在自己需要设�|�界面的对话框上点击右键-->建立�c�d��?->加入WM_CTLCOLOR消息-->自动生成OnCtlColor�Q�）函数�Q�此函数可以�Ҏ��对话框的控�g的界面外观做修饰�Q�用法如下：
��类向导产生的函数做如下修改�Q?br />
HBRUSH CDialogColor::OnCtlColor(CDC* pDC, CWnd* pWnd, UINT nCtlColor)
{
HBRUSH hbr = CDialog::OnCtlColor(pDC,pWnd, nCtlColor);
// TODO: Change any attributes of theDC here
//讄��昄��字体
CFont * cFont=new CFont;
cFont->CreateFont(16,0,0,0,FW_SEMIBOLD,FALSE,FALSE,0,
ANSI_CHARSET,OUT_DEFAULT_PRECIS,
CLIP_DEFAULT_PRECIS,DEFAULT_QUALITY,
DEFAULT_PITCH&FF_SWISS,"Arial");
//对特定的控�g做修�?br /> switch()
{
case CTLCOLOR_STATIC: //�Ҏ��有静态文本控件的讄��
{
pDC->SetBkMode(TRANSPARENT);
//讄��背景为透明
pDC->SetTextColor(RGB(255,255,0)); //讄��字体颜色
pWnd->SetFont(cFont); //讄��字体
HBRUSH B = CreateSolidBrush(RGB(125,125,255));
//创徏��d��
return (HBRUSH) B; //�q�回��d��句柄
}
case CTLCOLOR_EDIT: //�Ҏ��有编辑框的设�|?br /> {
pDC->SetBkMode(TRANSPARENT);
pDC->SetTextColor(RGB(255,255,0));
pWnd->SetFont(cFont);
HBRUSH B = CreateSolidBrush(RGB(125,125,255));
return (HBRUSH) B;
}
default:
return CDialog::OnCtlColor(pDC,pWnd, nCtlColor);
}
}

注：case的类别有以下几种�Q?br />CTLCOLOR_BTN 按钮控�g
CTLCOLOR_DLG 对话�?br />CTLCOLOR_EDIT �~�辑�?br />CTLCOLOR_LISTBOX 列表�?br />CTLCOLOR_MSGBOX 消息�?br />CTLCOLOR_SCROLLBAR 滚动�?br />CTLCOLOR_STATIC 静态文�?

2.你可能觉得对所有的控�g使用�l�一的界面设�|�觉得不自由�Q�其实VC同样可以对特定的ID的控件进行设�|�，�Ҏ��如下�Q?

switch (pWnd->GetDlgCtrlID())
{
//针对ID为IDC_CTL1、IDC_CTL2和IDC_CTL3的控件进行同��L��讄��
case IDC_CTL1:
case IDC_CTL2:
case IDC_CTL3:
{
pDC->SetBkMode(TRANSPARENT);
pDC->SetTextColor(RGB(255,255, 0));
pWnd->SetFont(cFont);
HBRUSH B = CreateSolidBrush(RGB(125,125,255));
return (HBRUSH) B;
}
default:
return CDialog::OnCtlColor(pDC, pWnd, nCtlColor);
}

让心飞翔 2006-06-23 23:21 发表评论

对话框中直接打印且保证打印内容连�l�的�Ҏ��

让心飞翔 — Fri, 23 Jun 2006 15:18:00 GMT

    在对话框�E�序的打印功能中�Q�如果��用针式打印机�Q�那么你可能希望�q�箋打印的多个表中不换页。我们知道，在��用打印功能的时候，每当 dc.startpage()��׃��开始一��늚�打印�Q�而dc.endpage()��׃��l�束一��늚�打印�Q�那么如何能使多个dc.startpage()�? dc.endpage()不换��而实现连�l�打印呢�Q�方法如下：假设我们要打印m_nTotalNum个表�Q�每个表有m行，那么要实现m_nTotalNum个表�q�箋打印不换��可以如下实玎ͼ�(�׃��打印机制问题�Q�在打满一张后是必��要换页的，我们的做法是在换��늚�地方让给它留��Z��定的�I�白�Q�不太媄响表的连�l��?

/////////////��d��?/strong>

void CDlgTest::PrintOneNum()
{
CDC dc;
CPrintDialog printDlg(FALSE);
CPrintInfo Info;
printDlg.GetDefaults();
dc.Attach(printDlg.GetPrinterDC());
dc.m_bPrinting=TRUE;
CString strTitle;
strTitle.LoadString(AFX_IDS_APP_TITLE);
DOCINFO di;
::ZeroMemory(&di,sizeof(DOCINFO));
di.cbSize=sizeof(DOCINFO);
di.lpszDocName=strTitle;
if(dc.m_hDC)
{
BOOL bPrintingOk=dc.StartDoc(&di);
CPrintInfo Info;
m_nCurrentNum_WhenPrint=1; //当前表数�?,�q�个用来控制打印的表�?/font>
int nPageTotalScale=0; //初始化从0开�?/font>
Info.m_nCurPage=1; //从第一��开�?/font>
dc.StartPage(); //开始打印页
for(;;)
{
//打印完需要的表数m_nTotalNum则退出��@�?/font>
if(m_nCurrentNum_WhenPrint >m_nTotalNum) break;
else //打印一张表
{
nPageTotalScale=OnPrintReport (&dc,&Info,nPageTotalScale, m_nCurrentNum_WhenPrint);
m_nCurrentNum_WhenPrint ++;
nPageTotalScale+=30; //打印下一张表的行距从�Q?0开�?/font>
}
}
bPrintingOk=(dc.EndPage()>0); //�l�束一��?/font>
m_nCurrentNum_WhenPrint =0;
if(bPrintingOk)
dc.EndDoc();
else
dc.AbortDoc();
}
else
{
MessageBox("��h��查打印机是否�q�接完好�Q?,"我的�E?�?,MB_ICONEXCLAMATION);
}
dc.Detach();
}

/////////////打印函数

int CdlgTest::OnPrintReport(CDC *pDC, CPrintInfo *pInfo,
int nXBasePointWhenPrint, int m_nCurrentNum_WhenPrint)
{
int nXCurrentPoint=nXBasePointWhenPrint; //�q�行行控制的变量
//--------换页---------
if(nXCurrentPoint+210> 2000) //210为将要占用的长度
{
pDC->EndPage();
pDC->StartPage();
nXCurrentPoint=0;
pInfo->m_nCurPage++;
}
nXCurrentPoint+=210;
pDC->TextOut(0,nXCurrentPoint,"我的报表内容�Q�从0�Q?10的表长度 ");
//每当打印的输��换行的时候就要判断if(nXCurrentPoint+��要使用的高�?gt; 2000)2000��定的一张纸的高度�?如果大于�U�张高度��p��换页。这样就保证打印内容�q�箋�?/font>
return nXCurrentPoint; //最后返回打印完当前表时当前的页面高度，
以便下一张表接着�q�个高度打印
}

让心飞翔 2006-06-23 23:18 发表评论

GridCtrl使用详解

让心飞翔 — Fri, 23 Jun 2006 15:16:00 GMT

在单文档中的使用�Ҏ��
步骤一　初始�?/font>

在CView�cȝ��.h头文件中包含文�g:
    #include "Gridctrl.h"

�q�且手写加入如下的成员函�?
    CGridCtrl * m_pGridCtrl;

步骤二　构造与析构

构造函��C��:
   m_pGridCtrl = NULL;
析构函数�?
   if(m_pGridCtrl)
       delete m_pGridCtrl;

步骤�?如果需要打印功能的话添加同名打印函��C��?/font>

在CView�cȝ��OnBeginPrinting()函数中添加如下代�?
if(m_pGridCtrl)
    m_pGridCtrl->OnBeginPrinting(pDC,pInfo); //��单吧,�q�就是类的好�?br />
其它两个打印函数也一��L��做法.

步骤�?在OnInitaUpdate()函数中或者你自己��d��的要昄��Grid的消息函��C��如下初始�?

//创徏非模式对话框
CDlg *dlg;
dlg=new CDlg();
dlg->Create(IDD_Dlg,this);

//初始化GridCtrl控�g
if(m_pGridCtrl!=NULL)
{
delete m_pGridCtrl;
m_pGridCtrl=NULL;
}
if (m_pGridCtrl == NULL)
{
// Create the Gridctrl object
m_pGridCtrl = new CGridCtrl;
if (!m_pGridCtrl) return 0;
// Create the Gridctrl window
CRect rect;
GetClientRect(rect);
m_pGridCtrl->Create(rect, this, 100);
// fill it up with stuff
m_pGridCtrl->SetEditable(false);
m_pGridCtrl->SetTextBkColor(RGB(0xFF, 0xFF, 0xE0)); //黄色背景
m_pGridCtrl->EnableDragAndDrop(false);
try {
m_pGridCtrl->SetRowCount(k); //讄��行数为k�?br /> m_pGridCtrl->SetColumnCount(4); //k�?br /> m_pGridCtrl->SetFixedRowCount(1); //标题行�ؓ一�?br /> m_pGridCtrl->SetFixedColumnCount(1); //同上
}
catch (CMemoryException* e)
{
e->ReportError();
e->Delete();
return 0;
}
//填充列标�?br /> int row=0;
for(int col=0;col<4;col++)
{
GV_ITEM Item;
Item.mask = GVIF_TEXT|GVIF_FORMAT;
Item.row = row;
Item.col = col;
if(col==0){
Item.nFormat = DT_CENTER|DT_WORDBREAK;
Item.strText.Format(_T("【类别�?),col);
}
else if(col==1){
Item.nFormat = DT_LEFT|DT_WORDBREAK;
Item.strText.Format(_T("�W�一�?),col);
}
else if(col==2){
Item.nFormat = DT_LEFT|DT_WORDBREAK;
Item.strText.Format(_T("�W�二�?),col);
}
m_pGridCtrl->SetItem(&Item);
}
// fill rows/cols with text
for (row = 1; row < k; row++)
for (col = 0; col < h; col++)
{
GV_ITEM Item;
Item.mask = GVIF_TEXT|GVIF_FORMAT;
Item.row = row;
Item.col = col;
if (col < 1) { //行标题头
Item.nFormat = DT_CENTER|DT_VCENTER
|DT_SINGLELINE|DT_END_ELLIPSIS
|DT_NOPREFIX;
Item.strText.Format(_T("%d"),row);
}
else if(col==1){ //�W�一列的�?br /> Item.nFormat = DT_CENTER|DT_VCENTER
|DT_SINGLELINE|DT_END_ELLIPSIS
|DT_NOPREFIX;
str="aa";
Item.strText.Format(_T("%s"),str);
}else if(col==2){ //�W�二列第�?br /> Item.nFormat = DT_CENTER|DT_VCENTER
|DT_SINGLELINE|DT_END_ELLIPSIS
|DT_NOPREFIX;
CString str;
str="bb";
Item.strText.Format(_T("%s"),str);
}
m_pGridCtrl->SetItem(&Item);
}
m_pGridCtrl->AutoSize();

//--------------讄��行列�?-----------------
for(int a=1;a m_pGridCtrl->SetRowHeight(a,21); //讄��各行�?br /> m_pGridCtrl->SetRowHeight(0,24); //讄��0行高
m_pGridCtrl->SetColumnWidth(1,110); //讄��2列宽
m_pGridCtrl->SetColumnWidth(2,160); //讄��3列宽
m_pGridCtrl->SetColumnWidth(3,100); //讄��4列宽
}
上例取自实际工程,�E�有修改!
部分注释:
void SetVirtualMode(TRUE)　//设�ؓ虚模�?/font>
BOOL SetRowCount(int nRows) //讄��ȝ��行数�?/font>
BOOL SetFixedRowCount(int nFixedRows = 1)//讄��固定的行数据
BOOL SetColumnCount(int nCols) //讄��列数
BOOL SetFixedColumnCount(int nFixedCols = 1)//讄��固定的列�?/font>

步骤�? ��d��WM_SIZE消息,调整控�g的界面占屏幕大小

  if(m_pGridCtrl->GetSafeHWnd())
   {
      CRect rect;
     GetClientRect(rect);
     m_pGridCtrl->MoveWindow(rect);
   }

在对话框中的使用�Ҏ��

步骤一　创徏数据昄��表格对话�?/font>
在资源管理器中新创徏一个对话框�Q�假设�ؓCDlgTestReportBox�?从工��L��中加入Custom Control�Q�就是�h头像的那个，��其区域拉��臌��昄��数据表格的大��，充满整个对话框�?/p>
在CDlgTestReportBox�cȝ��头文件中�Q?/p>
#include "GridCtrl.h"
再定义成员变量：
CGridCtrl* m_pGrid;
��d��OnShowWindow()消息处理函数如下�Q?/p>
void CDlgTestReportBox::OnShowWindow(BOOL bShow, UINT nStatus)
{
CDialog::OnShowWindow(bShow, nStatus);
// TODO: Add your message handler code here
if(m_pGrid!=NULL)
{
delete m_pGrid;
m_pGrid=NULL;
}
if(m_pGrid==NULL)
{
m_pGrid=new CGridCtrl;
CRect rect;
GetDlgItem(IDC_ReportAera)->GetWindowRect(rect); //得到昄��区域
ScreenToClient(&rect);
m_pGrid->Create(rect,this,100);
m_pGrid->SetEditable(false);
m_pGrid->SetTextBkColor(RGB(0xFF, 0xFF, 0xE0)); //黄色背景
try
{
m_pGrid->SetRowCount(10); //初始�?0�?br /> m_pGrid->SetColumnCount(11); //初始化�ؓ11�?br /> m_pGrid->SetFixedRowCount(1); //表头��Z��?br /> m_pGrid->SetFixedColumnCount(1); //表头��Z��?
}
catch (CMemoryException* e)
{
e->ReportError();
e->Delete();
// return FALSE;
}
for (int row = 0; row < m_pGrid->GetRowCount(); row++)
for (int col = 0; col < m_pGrid->GetColumnCount(); col++)
{
//讄��表格昄��属�?br /> GV_ITEM Item;
Item.mask = GVIF_TEXT|GVIF_FORMAT;
Item.row = row;
Item.col = col;
if(row==0&&col==0) //�W?0�Q?)�?br /> {
Item.nFormat = DT_CENTER|DT_WORDBREAK;
Item.szText.Format(_T("报表昄��"),col);
}
else if (row < 1) //讄��0行表头显�C?br /> {
Item.nFormat = DT_CENTER|DT_WORDBREAK;
Item.szText.Format(_T(" ��目%d"),col);
}
else if (col < 1) //讄��0列表头显�C?br /> {
if(row< m_pGrid->GetRowCount()-4)
{
Item.nFormat = DT_CENTER|DT_VCENTER|DT_SINGLELINE|DT_END_ELLIPSIS;
Item.szText.Format(_T("�W?d��?),row);
}
}
else
{
Item.nFormat = DT_CENTER|DT_VCENTER|DT_SINGLELINE|DT_END_ELLIPSIS;
Item.szText.Format(_T(""),2);
}
m_pGrid->SetItem(&Item);
}
m_pGrid->Invalidate();
}
//--------------讄��行列�?-----------------
for(int a=0;aGetRowCount();a++)
m_pGrid->SetRowHeight(a,16); //讄��各行�?
m_pGrid->SetColumnWidth(0,58); //讄��0列宽
for(int b=1;bGetColumnCount();b++)
m_pGrid->SetColumnWidth(b,59); //讄��各列�?br />}

步骤二　嵌入上面的对话框昄��数据
在你需要显�C�数据的对话框上的头文�g中，假设为CDlgTest�Q�加�?/p>
#include "GridCtrl.h"
CDlgTestReportBox* m_pTestReportBox;
��数据显�C�对话框攑օ�你的对话框相应位�|�上�Q�在CDlgTest::OnInitDialog() 中：
if(!m_pTestReportBox)
{
     m_pTestReportBox=new CDlgTestReportBox(this);
}
m_pTestReportBox->Create(IDD_DlgTestReportBox,this);
//定义区域变量
CRect rectDraw;
GetDlgItem(IDC_AeraReport)->GetWindowRect(rectDraw);
ScreenToClient(&rectDraw); //动态测试数据显�C�区域rectDraw
//��对应的对话框放到指定区�?/font>
m_pTestReportBox->MoveWindow(rectDraw);
m_pTestReportBox->ShowWindow(SW_SHOW);
自定义填充数据的函数�Q�CDlgTest::FillGrid() 如下�Q?/p>
CGridCtrl* pGrid=m_pTestReportBox->m_pGrid;
for (int row = pGrid->GetRowCount()-1; row >= pGrid->GetRowCount()-3; row--)
{
for (int col = 1; col <= pGrid->GetColumnCount(); col++)
{
GV_ITEM Item;
Item.mask = GVIF_TEXT|GVIF_FORMAT;
Item.row = row;
Item.col = col;
if(row==pGrid->GetRowCount()-3&&col>0) //�q�_��?br /> {
if(col==10){
Item.nFormat = DT_CENTER|DT_WORDBREAK;
Item.szText.Format(_T(" %6.2f "),avjch);
}
else{
Item.nFormat = DT_CENTER|DT_WORDBREAK;
Item.szText.Format(_T(" %6.2f "),av[col-1]);
}
}
pGrid->SetItem(&Item); //提交数据
if(row==0||col==0)
{
COLORREF clr = RGB(0, 0, 0);
pGrid->SetItemBkColour(row, col, clr);
pGrid->SetItemFgColour(row, col, RGB(255,0,0));
}
}//循环�l�束
pGrid->Invalidate();
}
好篏�?忙了一天时间终于写完了!

让心飞翔 2006-06-23 23:16 发表评论

VC用ADO讉K��数据库全�ȝ��

让心飞翔 — Fri, 23 Jun 2006 15:14:00 GMT

一、ADO概述
ADO是Microsoft为最新和最强大的数据访问范�?OLE DB 而设计的�Q�是一个便于��用的应用�E�序层接口。ADO 使您能够�~�写应用�E�序以通过 OLE. DB 提供者访问和操作数据库服务器中的数据。ADO 最主要的优�Ҏ��易于使用、速度快、内存支出少和磁盘遗�q�小。ADO 在关键的应用�Ҏ��中��用最��的�|�络��量�Q��ƈ且在前端和数据源之间使用最��的层数�Q�所有这些都是�ؓ了提供轻量、高性能的接口。之所以称�? ADO�Q�是用了一个比较熟悉的暗喻�Q�OLE 自动化接口�?/div>
OLE DB是一�l�”组件对象模型�?COM) 接口�Q�是新的数据库低层接口，它封装了ODBC的功能，�q�以�l�一的方式访问存储在不同信息源中的数据。OLE DB是Microsoft UDA(Universal Data Access)�{�略的技术基��。OLE DB ��Z�Q何数据源提供了高性能的访问，�q�些数据源包括关�p�d��非关�p�L��据库、电子邮件和文�g�pȝ��、文本和囑�Ş、自定义业务对象�{�等。也��是��_��OLE DB �q�不局限于 ISAM、Jet 甚至关系数据源，它能够处理�Q何类型的数据�Q�而不考虑它们的格式和存储�Ҏ��。在实际应用中，�q�种多样性意味着可以讉K��ȝ��?Excel 电子数据表、文本文件、电子邮�?目录服务甚至邮�g服务器，诸如 Microsoft Exchange 中的数据。但是，OLE DB 应用�E�序�~�程接口的目的是为各�U�应用程序提供最佳的功能�Q�它�q�不�W�合��单化的要求。您需要的API 应该是一座连接应用程序和OLE DB 的桥梁，�q�就�?ActiveX Data Objects (ADO)�?

二、在VC中��用ADO(开发步骤好下：)

1、引入ADO库文�?

使用ADO前必��d��工程的stdafx.h头文仉��用直接引入符�?import引入ADO库文�?以�ɾ~�译器能正确�~�译。代码如下所�C�：

�?import引入ADO库文�?/div>

#import "c:\program files\common files\system\ado\msado15.dll"no_namespaces rename("EOF" adoEOF")

�q�行语句声明在工�E�中使用ADO�Q�但不��用ADO的名字空��_��q�且��Z��避免常数冲突�Q�将常数EOF改名为adoEOF。现在不需��d��另外的头文�g�Q�就可以使用ADO接口了�?

2、初始化OLE/COM库环�?br />必须注意的是�Q�ADO库是一�l�COM动态库�Q�这意味应用�E�序在调用ADO前，必须初始化OLE/COM库环境。在MFC应用�E�序里，一个比较好的方法是在应用程序主�cȝ��InitInstance成员函数里初始化OLE/COM库环境�?/div>

BOOL CMyAdoTestApp�Q�：InitInstance()
{
if(!AfxOleInit())//�q�就是初始化COM�?br />{
AfxMessageBox(“OLE初始化出�?�?;
return FALSE;
}

…�?

}

3、ADO接口��?

ADO库包含三个基本接�?_ConnectionPtr接口、_CommandPtr接口和_RecordsetPtr接口�?br />_ConnectionPtr 接口�q�回一个记录集或一个空指针。通常使用它来创徏一个数据连接或执行一条不�q�回��M��l�果的SQL语句�Q�如一个存储过�E�。��? _ConnectionPtr接口�q�回一个记录集不是一个好的��用方法。对于要�q�回记录的操作通常用_RecordserPtr来实现。而用 _ConnectionPtr操作时要惛_��到记录条数得遍历所有记录，而用_RecordserPtr时不需要�?

_CommandPtr 接口�q�回一个记录集。它提供了一�U�简单的�Ҏ��来执行返回记录集的存储过�E�和SQL语句。在使用_CommandPtr接口�Ӟ��你可以利用全局 _ConnectionPtr接口�Q�也可以在_CommandPtr接口里直接��用连接串。如果你只执行一�ơ或几次数据讉K��操作�Q�后者是比较好的选择。但如果你要频繁讉K��数据库，�q�要�q�回很多记录集，那么�Q�你应该使用全局_ConnectionPtr接口创徏一个数据连接，然后使用_CommandPtr 接口执行存储�q�程和SQL语句�?

_RecordsetPtr是一个记录集对象。与以上两种对象相比�Q�它对记录集提供了更多的控制功能�Q�如记录锁定�Q�游标控制等。同 _CommandPtr接口一��P��它不一定要使用一个已�l�创建的数据�q�接�Q�可以用一个连接串代替�q�接指针赋给 _RecordsetPtr的connection成员变量�Q�让它自己创建数据连接。如果你要��用多个记录集�Q�最好的�Ҏ��是同Command对象一样��? 已经创徏了数据连接的全局_ConnectionPtr接口
�Q�然后��用_RecordsetPtr执行存储�q�程和SQL语句。　

4、��用_ConnectionPtr接口
_ConnectionPtr主要是一个连接接口，取得与数据库的连接。它的连接字�W�串可以是自��q��接写�Q�也可以指向一个ODBC　DSN�?/div>

_ConnectionPtr pConn;
if (FAILED(pConn.CreateInstance("ADODB.Connection")))
{
AfxMessageBox("Create Instance failed!");
return;
}

CString strSRC;
strSRC="Driver=SQL Server;Server=";
strSRC+="suppersoft";
strSRC+=";Database=";
strSRC+="mydb";
strSRC+=";UID=SA;PWD=";

CString strSQL = "Insert into student(no,name,sex,address) values(3,'aaa','male','beijing')";

_variant_t varSRC(strSRC);
_variant_t varSQL(strSQL);
_bstr_t bstrSRC(strSRC);

if (FAILED(pConn->Open(bstrSRC,"","",-1)))
{
AfxMessageBox("Can not open Database!");
pConn.Release();
return;
}

COleVariant vtOptional((long)DISP_E_PARAMNOTFOUND,VT_ERROR);

pConn->Execute(_bstr_t(strSQL),&vtOptional,-1);

pConn.Release();

AfxMessageBox("ok!");

5、��用_RecordsetPtr接口(以连接SQL Server��Z��)

_RecordsetPtr pPtr;
if (FAILED(pPtr.CreateInstance("ADODB.Recordset")))
{
AfxMessageBox("Create Instance failed!");
return FALSE;
}

CString strSRC;
strSRC="Driver=SQL Server;Server=";
strSRC+="210.46.141.145";
strSRC+=";Database=";
strSRC+="mydb";
strSRC+=";UID=sa;PWD=";
strSRC+="sa";

CString strSQL = "select id,name,gender,address from personal";

_variant_t varSRC(strSRC);
_variant_t varSQL(strSQL);

if(FAILED(pPtr->Open(varSQL,varSRC,adOpenStatic,adLockOptimistic,adCmdText)))
{
AfxMessageBox("Open table failed!");
pPtr.Release();
return FALSE;
}

while(!pPtr->GetadoEOF())
{
_variant_t varNo;
_variant_t varName;
_variant_t varSex;
_variant_t varAddress;

varNo = pPtr->GetCollect ("id");
varName = pPtr->GetCollect ("name");
varSex = pPtr->GetCollect ("gender");
varAddress = pPtr->GetCollect ("address");

CString strNo =(char *)_bstr_t(varNo);
CString strName =(char *)_bstr_t(varName);
CString strSex =(char *)_bstr_t(varSex);
CString strAddress =(char *)_bstr_t(varAddress);

strNo.TrimRight();
strName.TrimRight();
strSex.TrimRight();
strAddress.TrimRight();

int nCount = m_list.GetItemCount();
int nItem = m_list.InsertItem (nCount,_T(""));
m_list.SetItemText (nItem,0,strNo);
m_list.SetItemText (nItem,1,strName);
m_list.SetItemText (nItem,2,strSex);
m_list.SetItemText (nItem,3,strAddress);

pPtr->MoveNext();
}

pPtr->Close();
pPtr.Release();

6、��用_CommandPtr接口
_CommandPtr接口�q�回一个Recordset对象�Q��ƈ且提供了更多的记录集控制功能�Q�以下代码示例了使用_CommandPtr接口的方法：

代码11:使用_CommandPtr接口获取数据

_CommandPtr pCommand;
_RecordsetPtr pRs;
pCommand.CreateInstance(__uuidof(Command));
pCommand->ActiveConnection=pConn;
pCommand->CommandText="select * from student";
pCommand->CommandType=adCmdText;
pCommand->Parameters->Refresh();
pRs=pCommand->Execute(NULL,NULL,adCmdUnknown);
_variant_t varValue = pRs->GetCollect("name");
Cstring strValue=(char*)_bstr_t(varValue);

7、关于数据类型�{换由于COM对象是跨�q�_��的，它��用了一�U�通用的方法来处理各种�c�d��的数据，
因此Cstring �c�d��COM对象是不兼容的，我们需要一�l�API来�{换COM对象和C++�c�d��的数据。_vatiant_t和_bstr_t��是�q�样两种对象。它们提供了通用的方法�{换COM对象和C++�c�d��的数据�?/div>

让心飞翔 2006-06-23 23:14 发表评论

Forms2.0�p�d��的控件无法在未安装OFFICE的机器上�q�行

让心飞翔 — Fri, 23 Jun 2006 15:11:00 GMT

    Forms2.0�p�d��的控�Ӟ��? Microsoft forms 2.0 label �Q?/font>Microsoft forms 2.0 commandbutton�{?其依赖的动态链接库�?font color="#660099">Fm20.dlls。在使用�q�程中我发现�Q�如�?/font>在发布��Y件的时候，用户的客��h��上没有安装word的话�Q�程序就不能�q�行(虽然�E�序�q�行了，但是看不到界面出�?�?后来在网上搜索了很多资料�Q�终于找��C��问题的关键，在微软网站上扑ֈ�关于�q�个问题的解释�ؓ�Q?Fm20.dlls 不是可以重分配的�Q�你必须安装一个象OFFICE97那样的系�l�在你的目标客户��Z��作�ؓ你��Y件分发的一部分�?如果不安装Microsoft Office 97那样的系�l�的话，即��你��用regsvr32注册都没有作�?/font>(我翻译的,有点不通顺哦^_^)�?/font>

    最�l�的解决办法��是�Q�做为Microsoft Office 97的替代，你可以免费下载和安装Microsoft ActiveX Control Pad. 安装完毕�Q�客��h��上就可以无需安装office而��用你的程序了。[需要的��L��下email,我会发给你的]

让心飞翔 2006-06-23 23:11 发表评论

CTypedPtrMap模板指针�cȝ��用法

让心飞翔 — Fri, 23 Jun 2006 15:07:00 GMT

下面是我在编�E�中�q�用CTypedPtrMap指针模板�cȝ��Ҏ��Q�其存储�l�构占用物理�I�间��，比单�U�的用数�l�结构存储的文�g��小很多�Q�所以是一�U�非常推荐的存储及读取文件的�Ҏ��?/p>
你必��d��stdafx.h文�g�?包含 #include     // MFC templates
在头文�g中包含�?#include

其中 CBank.h文�g如下�Q?br />

class CBank : public CObject
{
DECLARE_SERIAL(CBank)   //声明序列化存�?br />public:
       CBank();
       CBank(CString str){ m_bankname = str; }
       CBank(const CBank &b){ m_bankname= b.m_bankname;} //拯��构造函�?br />      virtual ~CBank();
private:
       CString m_bankname;
public:
    virtual void Serialize(CArchive& ar);
};
typedef CTypedPtrMap
                     CString,
                     CBank*>CBanktmp; //�q�个才是我们�Ҏ��此类生成的类�?/p>

它的实现文�g.cpp如下�Q?br />

IMPLEMENT_SERIAL(CBank, CObject, 1)   //实现序列化存�?br />CBank::CBank()
{
m_bankname="";
}
CBank::~CBank()
{
}
void CBank::Serialize(CArchive& ar)
{
    if (ar.IsLoading())
    {
        ar >> m_bankname;
    }
    else
    {
        ar << m_bankname;
    }
}

/*----------------------------------------------------
从文件中��d��参数�Q?br />注意�Q?其中的m_map是这样定义的�Q?font color="#0000ff">CBanktmp m_map;
-------------------------------------------------*/

void CDlgBankIn::LoadBankName()
{
       UINT nFlags = CFile::typeBinary |CFile::modeReadWrite;
       if(_access(_T("BankName.dat"),0))
       {
              nFlags |= CFile::modeCreate;
       }
       CFile file;
       CFileException fe;
       if (file.Open(_T("BankName.dat"),nFlags, &fe))
       {
           if(file.GetLength()==0)   //如果文�g为空则不�q�行��d��操作
           {
           }
           else
           {
                CArchive ar(&file, CArchive::load);
                m_map.Serialize(ar);   //��d��文�g
               //�Ҏ��文�g内容填充列表�?br />                POSITION   pos;
                CString    strKey;
                CBank   *pB=NULL;
                for( pos = m_map.GetStartPosition(); pos != NULL; )
                {
                    m_map.GetNextAssoc(pos,strKey,(CBank*)pB);
                    m_CmbBank.AddString(strKey);
                }
                delete pB;
              }
       }
       file.Close();
}

/*-------------------------------------------------
功能: 先打开文�g,然后查找文�g中是否有与编辑框关键字相同的内容,
       如果有相同内容则不添�?如果没有相同内容则写文�g.
------------------------------------- ------------*/

void CDlgBankList::OnBtnAdd()
{
       // TODO: Add your control notification handler code here
       CString strKey;
       GetDlgItemText(IDC_EDITBank,strKey);
       if (0 != strKey.GetLength())
       {
          CBank *pB;
          //打开文�g
         UINT nFlags = CFile::typeBinary |CFile::modeRead;
          CFile file;
          CFileException fe;
          if (file.Open(_T("BankName.dat"),nFlags, &fe))
          {
                 if(file.GetLength()==0) //如果文�g为空则不�q�行序列化操�?br />                 {
                 }
                 else
                 {
                  CArchive ar(&file, CArchive::load);
                  m_map.Serialize(ar);
                 }
               //分析文�g�q�给文�g��d��~�辑框的内容
                if(!m_map.Lookup(strKey,(CBank*)pB)) //当不存在时才需要添�?br />                  {
                      if (CB_ERR != m_ListBox.AddString(strKey))
                      {
                         m_map.SetAt(strKey, new CBank(strKey)); //�l�关键字strKey赋�?br />                      }
                 }
          }
       file.Close();
       //存储文�g
     nFlags = CFile::typeBinary |CFile::modeWrite;
       if (file.Open(_T("BankName.dat"),nFlags, &fe))
       {
            CArchive ar(&file, CArchive::store);
            m_map.Serialize(ar);   //序列化存�?br />     }
    }
}

/*-------------------------------------------------
功能: 先打开文�g,然后查找文�g中的关键�?
    扑ֈ�后则删除此关键字, 但是注意关键字对应的内容仍然没有删除�Q�这�Ҏ��待改�q?
-------------------------------------------------*/

void CDlgBankList::OnBtnDel()
{
       // TODO: Add your control notification handler code here
       int iIndex;
       CString strKey;
       if(LB_ERR!=m_ListBox.GetCurSel())
       {
        //打开文�g
     & nbsp;     UINT nFlags = CFile::typeBinary |CFile::modeRead;
           CFile file;
           CFileException fe;
           if (file.Open(_T("BankName.dat"),nFlags, &fe))
           {
              CArchive ar(&file, CArchive::load);
              m_map.Serialize(ar);
              iIndex=m_ListBox.GetCurSel();
              m_ListBox.GetText(iIndex,strKey);
              m_ListBox.DeleteString(iIndex);
              //分析文�g�q�给文�g��d��~�辑框的内容
               CBank *pB=NULL;
              if(m_map.Lookup(strKey,(CBank*)pB))
              {
                  m_map.RemoveKey(strKey);   //删除关键�?但没有删除关键字对应的内�?br />               }
            }
            file.Close();
            //存储文�g
           nFlags = CFile::typeBinary |CFile::modeWrite;
           if (file.Open(_T("BankName.dat"),nFlags, &fe))
           {
                CArchive ar(&file, CArchive::store);
                m_map.Serialize(ar);   //序列化存�?br />           }
       }
}

让心飞翔 2006-06-23 23:07 发表评论