文字列の縦方向の配置
svg:text の配置で，横方向の指定（text-anchor=”middle”）はあるが，縦方向はなさそうだったので…
if (fabs(incX) > 1e-7 || fabs(incY) > 1e-7) {
CString moveStr = _T(“translate(“)+ToString(pnt.x)+_T(“,”)+ToString(pnt.y)+_T(“)\t”) ;
CString rot_Str ;
CString skewStr ;
if (fabs(incX) > 1e-7) {
rot_Str = _T(“rotate(“)+ToString(0-incX)+_T(“,0,0)\t”) ;
}
if (fabs(incY) > 1e-7) {
skewStr = _T(“skewX(“) + ToString(0+incY) + _T(“)\t”) ;
}
CString vAlign ;
{
P2 move = P2(0,0+txH.GetHeight()/3) ;
vAlign = _T(“translate(“) + ToString(move.x) + _T(“,“) + ToString(move.y) + _T(“)\t”) ;
}
th.AddAttribute (_T(“transform”), moveStr + rot_Str + skewStr + vAlign ) ;
}
else {
th.AddAttribute (_T(“x”), ::ToString(pnt.x)) ;
th.AddAttribute (_T(“y”), ::ToString(pnt.y+txH.GetHeight()/3)) ;
}
文字列と文字の回転
{
TextH txH = parts1.GetTextH (thIndex) ;
P3 pnt = parts1.GetPTextH(thIndex) ;
XmlOut_E th(_T(“text”),txH.GetText()) ;
{
th.AddAttribute (_T(“text-anchor”), _T(“middle”) ) ;
th.AddAttribute (_T(“font-size”), ::ToString(txH.GetHeight())) ;
}
if (fabs(txH.GetIncX()) > 1e-7 || fabs(txH.GetIncY()) > 1e-7) {
CString moveStr = _T(“translate(“) + ToString(pnt.x) + _T(“,”) + ToString(pnt.y) + _T(“)\t”) ;
CString rot_Str ;
CString skewStr ;
if (fabs(txH.GetIncX()) > 1e-7) {
rot_Str = _T(“rotate(“) + ToString(0-txH.GetIncX()) + _T(“,0,0)\t”) ;
}
if (fabs(txH.GetIncY()) > 1e-7) {
skewStr = _T(“skewX(“) + ToString(0+txH.GetIncY()) + _T(“)\t”) ;
}
th.AddAttribute (_T(“transform”), moveStr + rot_Str + skewStr ) ;
}
else {
th.AddAttribute (_T(“x”), ::ToString(pnt.x)) ;
th.AddAttribute (_T(“y”), ::ToString(pnt.y)) ;
}
g.AddChild(th) ;
}
translate で回転の位置に動かし，
rotate で文字列を回転
skewX で文字を傾ける
explorer /e,/select
Explorer.exe コマンドライン オプション
void CDropADlg::OnExecExplorer()
{
UpdateData(TRUE) ;
CString file = m_SelectFile ;
ShellExec se ;
if (::FileIsDirectory(file)) {
se.SetFile(file) ;
}
else {
se.SetNon2QMark(TRUE) ;
se.SetFile(_T(“explorer.exe”)) ;
se.SetParamaters(_T(“/e,/select,”)+file) ;
}
se.Execute() ;
}
XML の書出しテスト – 5
MSXML.dll を利用しない方法を用意．
//#include “Xml_MS_.hxx”
#include “XmlOut.hxx”
#include “SvgOut.hxx”
class Xml_Attribute {
public:
// …
protected:
CString Name ;
CString Value ;
} ;
class XmlOut_E {
public:
// …
protected:
CString Name ;
CString Text ;
CArray<Xml_Attribute,Xml_Attribute> Attribute ;
protected:
CArray<XmlOut_E,XmlOut_E> Child ;
} ;
inline
BOOL XmlOut::Export (const XmlOut_E& elements,LPCTSTR svgName)
{
#ifdef UseMSXML
return Xml_MS::Export(elements,svgName) ;
#endif
CStringArray strAry ;
{
#ifdef _UNICODE
CString xml_ver = _T(“<?xml version=\”1.0\” encoding=\”utf-16\”?>”) ;
#else
CString xml_ver = _T(“<?xml version=\”1.0\” encoding=\”Shift-JIS\”?>”) ;
#endif
strAry.Add( xml_ver) ;
}
{
CStringArray sa ;
CreateElement(elements,&sa,0) ;
strAry.Append(sa) ;
}
return ::SaveText(svgName,strAry,TRUE) ;
}
inline
BOOL XmlOut::CreateElement (const XmlOut_E& elements,CStringArray* sa,const int indent)
{
CString tab = _T(“\t\t\t\t\t\t\t\t\t\t\t\t\t”) ;
CStringArray strAry ;
int nowIndent = indent ;
if (elements.IsComment()) {
sa->Add(tab.Left(indent) + _T(“<!–“)+elements.GetText()+_T(“–>”)) ;
return TRUE ;
}
CString eleStr ;
{
eleStr = tab.Left(indent) + _T(“<“) + elements.GetName() + _T(” “) ;
CString attStr ;
for (int aIndex=0 ; aIndex<elements.GetAttributeCount() ; aIndex++) {
Xml_Attribute a = elements.GetAttribute(aIndex) ;
CString name = a.GetName () ;
CString value= a.GetValue() ;
attStr += name + _T(“=\””) + value + _T(“\”\t”) ;
}
if (!attStr.IsEmpty()) {
eleStr += attStr ;
}
CString nameOrChild ;
if (!elements.GetText().IsEmpty()) {
nameOrChild = elements.GetText() ;
eleStr += _T(” >”) + nameOrChild ;
}
else {
CStringArray saChild ;
for (int cIndex=0 ; cIndex<elements.GetChildCount() ; cIndex++) {
XmlOut_E c = elements.GetChild(cIndex) ;
CreateElement(c,&saChild,indent+1) ;
}
if (saChild.GetSize() > 0) {
::StringArrayToString(saChild,nameOrChild) ;
eleStr += _T(” >\r\n”) + nameOrChild ;
}
}
if (nameOrChild.IsEmpty()) {
eleStr += _T(“/>”) ;
}
else {
if (!elements.GetText().IsEmpty()) {
eleStr += _T(“</”) + elements.GetName() + _T(“>”) ;
}
else {
eleStr += tab.Left(indent+1) + _T(“</”) + elements.GetName() + _T(“>”) ;
}
}
strAry.Add(eleStr) ;
}
return sa->Append(strAry) ;
}
xmlns を間違えて 0xE06D7363
xmlns の所を xmlne とタイプミス．そのまま実行して 0xE06D7363．
—————————
Microsoft Visual C++
—————————
ﾊﾝﾄﾞﾙされていない例外 は T_xml_7.exe (KERNEL32.DLL) にあります: 0xE06D7363: Microsoft C++ Exception。
—————————
OK
—————————
通常の実行の場合は，
—————————
Microsoft Visual C++ Debug Library
—————————
Debug Error!
Program: …NGS\ALL USERS\DOCUMENTS\VC_TEST\SVG\T_xml_7\Debug\T_xml_7.exe
abnormal program termination
(Press Retry to debug the application)
—————————
中止(A) 再試行(R) 無視(I)
—————————
コンパイルで C4786
——————–構成: T_xml_7 – Win32 Debug——————–
ｺﾝﾊﾟｲﾙ中…
T_xml_7.cpp
c:\documents and settings\all users\documents\develop\____test\xmlout.hxx(69) : warning C4786: ‘__ehhandler$?Add_Attribute@XmlOut@@SAHV?$_com_ptr_t@V?$_com_IIID@UIXMLDOMDocument@MSXML@@$1?_GUID_2933bf81_7b36_11d2_b20e_00c04f983e60@@3U__s_GUID@@A@@@@
V?$_com_ptr_t@V?$_com_IIID@UIXMLDOMElement@MSXML@@$1?_GUID_2933bf86_7b36_11d2_b20e_00c04f983e60@@3U__s_GUID@@A@@@@PBD2@Z’ : ﾃﾞﾊﾞｯｸﾞ情報で識別子が 255 文字に切り捨てられました。
．．．
ﾘﾝｸ中…
T_xml_7.exe – ｴﾗｰ 0、警告 6
コードは以下の部分．
inline
BOOL XmlOut::Add_Attribute (
MSXML::IXMLDOMDocumentPtr pDoc,
MSXML::IXMLDOMElementPtr pEle,
LPCTSTR name,LPCTSTR value)
{
if (pDoc == NULL) { return FALSE ; }
if (pEle == NULL) { return FALSE ; }
MSXML::IXMLDOMAttributePtr pAtt = pDoc->createAttribute(name) ;
pAtt->value = value ;
pEle->setAttributeNode(pAtt) ;
return TRUE ;
}
前後に，
#pragma warning (disable : 4786 )
と
#pragma warning (default : 4786 )
を付加．
XML の書出しテスト – 4
xmlns="" が付加されない方法がわからなかったので，逆に svg:svg などと出力する様に変更．
<?xml version="1.0" encoding="utf-8"?>
<!–SVG 出力テスト–>
<svg:svg width="50%" height="50%" viewBox="0 0 100 100" xmlns:svg="http://www.w3.org/2000/svg">
<svg:g stroke="red" stroke-width="0.3" stroke-dasharray="3 3">
<svg:line x1="0" x2="0" y1="10" y2="90"/>
<svg:line x1="10" x2="10" y1="10" y2="90"/>
<svg:line x1="20" x2="20" y1="10" y2="90"/>
<svg:line x1="30" x2="30" y1="10" y2="90"/>
<svg:line x1="40" x2="40" y1="10" y2="90"/>
</svg:g>
</svg:svg>
BOOL TestXML (void)
{
HRESULT hr = ::CoInitialize(NULL) ;
if (FAILED(hr)) { return FALSE ; }
{
MSXML::IXMLDOMDocumentPtr pDoc = NULL ;
hr = pDoc.CreateInstance(MSXML::CLSID_DOMDocument) ;
if (FAILED(hr)) { return FALSE ; }
MSXML::IXMLDOMProcessingInstructionPtr pi = pDoc->createProcessingInstruction(L”xml”, L”version=’1.0′ encoding=’utf-8′ “);
pDoc->appendChild(pi);
MSXML::IXMLDOMCommentPtr pc = pDoc->createComment(L”SVG 出力テスト”);
pDoc->appendChild(pc);
{
MSXML::IXMLDOMElementPtr pRoot = NULL ;
pRoot = pDoc->createElement(L”svg:svg”);
{ // <svg width =’50%’ height=’50%’ viewBox=’0 0 100 100′ xmlns=”http://www.w3.org/2000/svg”>
MSXML::IXMLDOMAttributePtr paw = pDoc->createAttribute(L”width”);
paw->value = L”50%”;
pRoot->setAttributeNode(paw);
MSXML::IXMLDOMAttributePtr pah = pDoc->createAttribute(L”height”);
pah->value = L”50%”;
pRoot->setAttributeNode(pah);
MSXML::IXMLDOMAttributePtr pav = pDoc->createAttribute(L”viewBox”);
pav->value = L”0 0 100 100″;
pRoot->setAttributeNode(pav);
MSXML::IXMLDOMAttributePtr pan = pDoc->createAttribute(L”xmlns:svg”);
pan->value = _T(“http://www.w3.org/2000/svg”) ;
pRoot->setAttributeNode(pan);
}
pDoc->appendChild(pRoot);
{ // <g stroke=’red’ stroke-width=’0.3′ stroke-dasharray=’3 3′>
MSXML::IXMLDOMElementPtr pGrop= pDoc->createElement(_T(“svg:g”));
{
MSXML::IXMLDOMAttributePtr pas = pDoc->createAttribute(L”stroke”);
pas->value = _T(“red”) ;
pGrop->setAttributeNode(pas);
MSXML::IXMLDOMAttributePtr paw = pDoc->createAttribute(L”stroke-width”);
paw->value = _T(“0.3″) ;
pGrop->setAttributeNode(paw);
MSXML::IXMLDOMAttributePtr pad = pDoc->createAttribute(L”stroke-dasharray”);
pad->value = _T(“3 3″) ;
pGrop->setAttributeNode(pad);
}
pRoot->appendChild(pGrop) ;
{
for (int index=0 ; index<5 ; index++) {
// <line x1=”10″*x x2=”10″*x y1=”0″ y2=”100″ />
MSXML::IXMLDOMElementPtr pLine= pDoc->createElement(L”svg:line”);
{
CString xStr ; xStr.Format(_T(“%d”),10*index) ;
MSXML::IXMLDOMAttributePtr pax = pDoc->createAttribute(L”x1″);
pax->value = LPCTSTR(xStr) ;
pLine->setAttributeNode(pax);
MSXML::IXMLDOMAttributePtr pa2 = pDoc->createAttribute(L”x2″);
pa2->value = LPCTSTR(xStr) ;
pLine->setAttributeNode(pa2);
MSXML::IXMLDOMAttributePtr pay = pDoc->createAttribute(L”y1″);
pay->value = _T(“10″) ;
pLine->setAttributeNode(pay);
MSXML::IXMLDOMAttributePtr pae = pDoc->createAttribute(L”y2”);
pae->value = _T(“90”) ;
pLine->setAttributeNode(pae);
}
pGrop->appendChild(pLine) ;
}
}
}
}
CString tmpPath ;
{
UINT size = MAX_PATH ;
::GetTempPath (size,tmpPath.GetBuffer(size)) ;
tmpPath.ReleaseBuffer() ;
}
CString tmpSVG = tmpPath + CTime::GetCurrentTime().Format(_T(“%H%M%S.svg”)) ;
pDoc->save(LPCTSTR(tmpSVG)) ;
}
::CoUninitialize() ;
return TRUE ;
}