在对话框中使用网页输入数据

技术2022-05-11 112

作者的话：使用DHTMLEdit控件在应用程序中显示HTML是一个学习简单但是不很有效的方法，可以用于浏览器编程入门。此对话框使用了IE5附带的DHTMLEdit控件。

头文件

//{{AFX_INCLUDES()#include "dhtmledit/dhtmledit.h"//}}AFX_INCLUDES#if !defined(AFX_PARAMDLG_H__0655C0B1_BEAD_4F17_AAAC_506C1D07D073__INCLUDED_)#define AFX_PARAMDLG_H__0655C0B1_BEAD_4F17_AAAC_506C1D07D073__INCLUDED_

#if _MSC_VER > 1000#pragma once#endif // _MSC_VER > 1000// ParamDlg.h : header file//class CHtmlparam:public CObject{public: CString m_strAlt; COleVariant m_varVal;};#define HTML_TAG_INPUT _T("INPUT")#define HTML_TAG_SELECT _T("SELECT")#define HTML_ATTRIB_NAME _T("NAME")#define HTML_ATTRIB_VALUE _T("VALUE")#define HTML_ATTRIB_CHECKED _T("checked")#define HTML_ATTRIB_TYPE _T("TYPE")#define HTML_ATTRIB_ALT _T("ALT")#define HTML_TYPE_CHECKBOX _T("checkbox")/// CParamDlg dialogCString HTMLElement_GetValueAttributeName(CHTMLElement* pel);CString HTMLElement_GetToolTipAttributeName(CHTMLElement* pel);CString HTMLElement_GetIDOrName(CHTMLElement* pel);BOOL HTMLElement_IsInputElement(CHTMLElement* pel);BOOL HTMLElement_IsInputCheckBoxElement(CHTMLElement* pel);

class CParamDlg : public CDialog{// Constructionpublic: CParamDlg(CWnd* pParent = NULL); // standard constructor ~CParamDlg();// Dialog Data //{{AFX_DATA(CParamDlg) enum { IDD = IDD_PARAM_DLG }; CDHTMLEdit m_wndDhtmlEdit; //}}AFX_DATA CString m_strFilePath; CString m_strFileURL; COleVariant GetValue(CString strName); void GetValue(CString strName,int& iVal); void GetValue(CString strName,long& lVal); void GetValue(CString strName,CString& strVal); void SetValue(CString strName, COleVariant varVal, LPCTSTR lpszAlt=NULL);//displayed as tooltip void SetValue(CString strName, int iVal, LPCTSTR lpszAlt=NULL);//displayed as tooltip void SetValueBool(CString strName, BOOL bVal, LPCTSTR lpszAlt=NULL);//displayed as tooltip

// Overrides // ClassWizard generated virtual function overrides //{{AFX_VIRTUAL(CParamDlg) protected: virtual void DoDataExchange(CDataExchange* pDX); // DDX/DDV support //}}AFX_VIRTUAL// Implementationprotected: CMapStringToOb m_mapNameToParam; BOOL LoadValues(); BOOL SaveValues(); // Generated message map functions //{{AFX_MSG(CParamDlg) virtual BOOL OnInitDialog(); afx_msg void OnDocumentCompleteDhtmledit1(); virtual void OnOK(); DECLARE_EVENTSINK_MAP() //}}AFX_MSG DECLARE_MESSAGE_MAP()};

//{{AFX_INSERT_LOCATION}}// Microsoft Visual C++ will insert additional declarations immediately before the previous line.

#endif // !defined (AFX_PARAMDLG_H__0655C0B1_BEAD_4F17_AAAC_506C1D07D073__INCLUDED_)

实现文件

// ParamDlg.cpp : implementation file//

#include "stdafx.h"#include <atlbase.h>#include <mshtml.h>#include <mshtmdid.h>#include "dhtmledit/htmlelementcollection.h"#include "dhtmledit/htmldocument2.h"#include "dhtmledit/htmlelement.h"#include "WorkBench.h"#include "ParamDlg.h"#include "global.h"#ifdef _DEBUG#define new DEBUG_NEW#undef THIS_FILEstatic char THIS_FILE[] = __FILE__;#endif

/// CParamDlg dialog

CParamDlg::CParamDlg(CWnd* pParent /*=NULL*/) : CDialog(CParamDlg::IDD, pParent){ //{{AFX_DATA_INIT(CParamDlg) //}}AFX_DATA_INIT m_strFileURL.Empty(); m_strFilePath.Empty(); m_mapNameToParam.RemoveAll();}CParamDlg::~CParamDlg(){ POSITION pos=m_mapNameToParam.GetStartPosition(); CString strKey; CObject* pOb; while(pos){ m_mapNameToParam.GetNextAssoc(pos,strKey,pOb); delete pOb; }}

void CParamDlg::DoDataExchange(CDataExchange* pDX){ CDialog::DoDataExchange(pDX); //{{AFX_DATA_MAP(CParamDlg) DDX_Control(pDX, IDC_DHTMLEDIT1, m_wndDhtmlEdit); //}}AFX_DATA_MAP}

BEGIN_MESSAGE_MAP(CParamDlg, CDialog) //{{AFX_MSG_MAP(CParamDlg) //}}AFX_MSG_MAPEND_MESSAGE_MAP()

/// CParamDlg message handlers

BOOL CParamDlg::OnInitDialog() { CDialog::OnInitDialog(); // TODO: Add extra initialization here COleVariant varFile,varPrompt; varPrompt.vt=VT_BOOL; varPrompt.boolVal=FALSE; if(!m_strFileURL.IsEmpty()) varFile=m_strFileURL; else varFile=m_strFilePath; TRY{ m_wndDhtmlEdit.LoadDocument(&varFile,&varPrompt); } CATCH(COleDispatchException,pEx) { CGlobal::ProcessOleDispatchException(pEx); return FALSE; } AND_CATCH(CException,pEx) { CGlobal::ProcessException(pEx); return FALSE; } END_CATCH return TRUE; // return TRUE unless you set the focus to a control // EXCEPTION: OCX Property Pages should return FALSE}

BEGIN_EVENTSINK_MAP(CParamDlg, CDialog) //{{AFX_EVENTSINK_MAP(CParamDlg) ON_EVENT(CParamDlg, IDC_DHTMLEDIT1, 1 /* DocumentComplete */, OnDocumentCompleteDhtmledit1, VTS_NONE) //}}AFX_EVENTSINK_MAPEND_EVENTSINK_MAP()

void CParamDlg::OnDocumentCompleteDhtmledit1() { GetDlgItem(IDOK)->EnableWindow(TRUE); //read value from data LoadValues();}

void CParamDlg::OnOK() { // TODO: Add extra validation here if(!SaveValues())return; CDialog::OnOK();}

BOOL CParamDlg::LoadValues(){ TRY{ CHTMLElementCollection ecAll=m_wndDhtmlEdit.GetDom().GetAll(); long lecLength=ecAll.GetLength(); COleVariant varIndex,varTemp;//var2 is not used because accessing index,not name varIndex.vt=VT_I4; CString strElementID,strTemp; CHtmlparam* pHtmlparam; CObject* pOb; for(int i=0;i<lecLength;i++){ varIndex.lVal=i; CHTMLElement el(ecAll.item(varIndex,varTemp)); strTemp=HTMLElement_GetValueAttributeName(&el); if(!strTemp.IsEmpty()){//can have values strElementID=HTMLElement_GetIDOrName(&el); if(m_mapNameToParam.Lookup(strElementID,pOb)){//found pHtmlparam=(CHtmlparam*)pOb; el.setAttribute(strTemp,pHtmlparam->m_varVal,0); } } strTemp=HTMLElement_GetToolTipAttributeName(&el); if(!strTemp.IsEmpty()){//can have ToolTip varTemp=pHtmlparam->m_strAlt; el.setAttribute(strTemp,varTemp,0); }

} } CATCH(CException,pEx) { CGlobal::ProcessException(pEx); return FALSE; } END_CATCH return TRUE;}

BOOL CParamDlg::SaveValues(){ TRY{ CHTMLElementCollection ecAll=m_wndDhtmlEdit.GetDom().GetAll(); long lecLength=ecAll.GetLength(); COleVariant varIndex,varTemp;//var2 is not used because accessing index,not name varIndex.vt=VT_I4; CString strElementID,strTemp; CHtmlparam* pHtmlparam; CObject* pOb; for(int i=0;i<lecLength;i++){ varIndex.lVal=i; CHTMLElement el(ecAll.item(varIndex,varTemp)); varIndex.lVal=i; strTemp=HTMLElement_GetValueAttributeName(&el); if(!strTemp.IsEmpty()){//can have values strElementID=HTMLElement_GetIDOrName(&el); if(m_mapNameToParam.Lookup(strElementID,pOb)){//found pHtmlparam=(CHtmlparam*)pOb; varTemp=el.getAttribute(strTemp,0); } TRY{ pHtmlparam->m_varVal.ChangeType(pHtmlparam->m_varVal.vt,&varTemp); } CATCH(CException,pEx) { CGlobal::ProcessException(pEx); el.InvokeHelper(DISPID_IHTMLELEMENT2_FOCUS,DISPATCH_METHOD, VT_EMPTY, NULL, NULL); return FALSE; } END_CATCH } } } CATCH(CException,pEx) { CGlobal::ProcessException(pEx); return FALSE; } END_CATCH return TRUE;}COleVariant CParamDlg::GetValue(CString strName){ COleVariant varRet; CHtmlparam* pHtmlparam; CObject* pOb; if(m_mapNameToParam.Lookup(strName,pOb)){//found pHtmlparam=(CHtmlparam*)pOb; varRet=pHtmlparam->m_varVal; } return varRet;}void CParamDlg::GetValue(CString strName,int& iVal){ COleVariant var=GetValue(strName); var.ChangeType(VT_I4); iVal=var.iVal;}void CParamDlg::GetValue(CString strName,long& lVal){ COleVariant var=GetValue(strName); var.ChangeType(VT_I4); lVal=var.lVal;}

void CParamDlg::GetValue(CString strName,CString& strVal){ COleVariant var=GetValue(strName); var.ChangeType(VT_BSTR); strVal=var.bstrVal;}

void CParamDlg::SetValue(CString strName, COleVariant varVal, LPCTSTR lpszAlt/*=NULL*/)//displayed as tooltip{ COleVariant varRet; CHtmlparam* pHtmlparam; CObject* pOb; if(m_mapNameToParam.Lookup(strName,pOb)){//found pHtmlparam=(CHtmlparam*)pOb; } else{ pHtmlparam=new CHtmlparam; m_mapNameToParam.SetAt(strName,pHtmlparam); } pHtmlparam->m_varVal=varVal; if(lpszAlt) pHtmlparam->m_strAlt=lpszAlt;}void CParamDlg::SetValue(CString strName, int iVal, LPCTSTR lpszAlt/*=NULL*/)//displayed as tooltip{ COleVariant var; var.vt=VT_I4; var.iVal=iVal; SetValue(strName,var,lpszAlt);}void CParamDlg::SetValueBool(CString strName, BOOL bVal, LPCTSTR lpszAlt/*=NULL*/)//displayed as tooltip{ SetValue(strName,COleVariant((long)bVal,VT_BOOL),lpszAlt);}CString HTMLElement_GetValueAttributeName(CHTMLElement* pel){ CString strValAttribName; CString strTagName=pel->GetTagName(); if(!strTagName.CompareNoCase(HTML_TAG_INPUT)||!strTagName.CompareNoCase(HTML_TAG_SELECT)){ strValAttribName=HTML_ATTRIB_VALUE; } if(HTMLElement_IsInputCheckBoxElement(pel)) strValAttribName=HTML_ATTRIB_CHECKED; //to be continued return strValAttribName;}

CString HTMLElement_GetToolTipAttributeName(CHTMLElement* pel){ CString strTipAttribName; CString strTagName=pel->GetTagName(); if(!strTagName.CompareNoCase(HTML_TAG_INPUT)) strTipAttribName=HTML_ATTRIB_ALT; //to be continued return strTipAttribName;}CString HTMLElement_GetIDOrName(CHTMLElement* pel){ COleVariant varTemp; CString strElementID=pel->GetId(); if(strElementID.IsEmpty()){ varTemp=pel->getAttribute(HTML_ATTRIB_NAME,0); varTemp.ChangeType(VT_BSTR); strElementID=varTemp.bstrVal; } return strElementID;}BOOL HTMLElement_IsInputElement(CHTMLElement* pel){ CString strTagName=pel->GetTagName(); return (!strTagName.CompareNoCase(HTML_TAG_INPUT));}BOOL HTMLElement_IsInputCheckBoxElement(CHTMLElement* pel){ BOOL bRet=FALSE; if(HTMLElement_IsInputElement(pel)){ COleVariant varTemp=pel->getAttribute(HTML_ATTRIB_TYPE,0); varTemp.ChangeType(VT_BSTR); CString strTemp=varTemp.bstrVal; if(!strTemp.CompareNoCase(HTML_TYPE_CHECKBOX)) bRet=TRUE; } return bRet;}

* pHtmlparam; CObject* pOb; for(int i=0;i<lecLength;i++){ varIndex.lVal=i; CHTMLElement el(ecAll.item(varIndex,varTemp)); strTemp=HTMLElement_GetValueAttributeName(&el); if(!strTemp.IsEmpty()){//can have values strElementID=HTMLElement_GetIDOrName(&el); if(m_mapNameToParam.Lookup(strElementID,pOb)){//found pHtmlparam=(CHtmlparam*)pOb; el.setAttribute(strTemp,pHtmlparam->m_varVal,0); } } strTemp=HTMLElement_GetToolTipAttributeName(&el); if(!strTemp.IsEmpty()){//can have ToolTip varTemp=pHtmlparam->m_strAlt; el.setAttribute(strTemp,varTemp,0); }

} } CATCH(CException,pEx) { CGlobal::ProcessException(pEx); return FALSE; } END_CATCH return TRUE;}

void CParamDlg::GetValue(CString strName,CString& strVal){ COleVariant var=GetValue(strName); var.ChangeType(VT_BSTR); strVal=var.bstrVal;}

专利

最新回复(0)