实现文件 | // ParamDlg.cpp : implementation file // #include "stdafx.h" #include
#include
#include
#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_FILE
static 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_MAP END_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_MAP END_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
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
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
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
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; }
|