単位は m sec

表では MFC と表現しているが，実際は CStringArray を利用している程度．
ちょっと意外だったのが，STL のコードで，UNICODE 版が MBCS 版の 3 倍以上になってしまっている．

STL を利用しているコードは以下の通り．
std::vector<tstring> String_Split (const tstring& str_,LPCTSTR sp=_T(" \r\n"))
{
　　std::vector<tstring> strAry ;
　　tstring str = str_ ;
　　{
　　　　tstring::size_type spPos = tstring::npos ;
　　　　while ((spPos=::String_FindFirstOf(str,sp)) != tstring::npos) {
　　　　　　if (str.empty()) { break ; }
　　　　　　TCHAR fc = str[0] ;
　　　　　　if (fc == _T(‘\"’) || fc == _T(‘\”)) { // "—" or ‘—‘
　　　　　　　　if ((spPos=::String__Find(str,fc,1)) == tstring::npos) {
　　　　　　　　　　break ;
　　　　　　　　　　}
　　　　　　　　if ((spPos = ::String_FindFirstOf(str,sp,spPos)) == tstring::npos) {
　　　　　　　　　　break ;
　　　　　　　　　　}
　　　　　　　　}
　　　　　　tstring splitS = str.substr(0,spPos) ;
　　　　　　strAry.push_back(splitS) ;
　　　　　　str = str.substr(spPos+1) ;
　　　　　　if (str.empty()) { break ; }
　　　　　　}
　　　　if (!str.empty()) {
　　　　　　strAry.push_back(str) ;
　　　　　　}
　　　　}
　　return strAry ;
　　}

String_Join も同様だが，MFC 版 StringArrayToLine1 の １ 割程度なので，このままとする．
MFC 版 StringArrayToString は十分速い．

StrAryFn.hxx

3DS 出力で正しくないのが生成されたので，バイナリを解析した時のメモ

http://www.dcs.ed.ac.uk/home/mxr/gfx/3d/3DS.spec
http://www.martinreddy.net/gfx/3d/3DS.spec

　
4D4D
　　3D3D
　　　　AFFF
　　　　　　A000　　　　　　　　名称
　　　　　　A020　　　15
　　　　　　　　0011　 9　　　　RGB
　　　　AFFF　
　　　　…
　　　　4000　　　　　　　　　　名称
　　　　　　4100　　　　
　　　　　　　　4110　　　　　　頂点情報 （ WORD 頂点数 , [ float x , y , z ] ）
　　　　　　　　4140　　　　　　テクスチャ （ WORD 点数 , [ float x , y ] ）
　　　　　　　　4160　　　　　　
　　　　　　　　4120　　　　　　面情報 （ WORD 面数 , [ WORD 3 頂点のインデックス , WORD 面の情報 ] ）
　　　　　　　　　　4130　　　　材質名 , WORD 面数 , [ WORD 面のインデックス ]
　　　　　　　　　　4130　　　　　　　　
　　　　　　　　　　…
　　　　B000　　　　　　
　　　　　　…

頂点数が WORD を超えていたのが原因．
PgonsA_To3DS の objIs1==TRUE で，vp3Ary.GetCount() >= 0x10000 の時，PgonsA_To3DS (…,FALSE,…) ．

CStatic 内に表示するには，this ではなく &m_Image とする．
// u_Zoom. Init(this,&u_Scale) ;
　　 u_Zoom. Init(&m_Image,&u_Scale) ;
// u_EyeChg. Init(&m_Image) ;
　　 u_EyeChg. Init(this) ;
　　 Eye eye(Eye::StdR) ;
　　 u_EyeChg. SetEye (eye) ;
　　 u_EyeChg. SetExtent(doc->PartsA_.GetExtent()) ;
　　 u_EyeChg. Set_MouseEyeChange(TRUE) ;
// u_Zoom. Init(this,&u_Scale,&u_EyeChg) ;
　　 u_Zoom. Init(&m_Image,&u_Scale,&u_EyeChg) ;
MButton , MouseWheel では，InvalidateRect などが必要．
　void CAboutDlg::OnMButtonDown(UINT nFlags, CPoint point)
　{
　　 if (u_EyeChg. Event(GetCurrentMessage())) { return ; }
　　 if (u_Zoom. Event(GetCurrentMessage())) { InvalidateRect(NULL) ; return ; }
　　 CDialog::OnMButtonDown(nFlags, point);
　　}
　BOOL CAboutDlg::OnMouseWheel(UINT nFlags, short zDelta, CPoint pt)
{
　　 if (u_EyeChg. Event(GetCurrentMessage())) { return TRUE ; }
　　 if (u_Zoom. Event(GetCurrentMessage())) { InvalidateRect(NULL) ; return TRUE ; }
　　 return CDialog::OnMouseWheel(nFlags, zDelta, pt);
　　}

ファイルにより，open で errno に 13 EACCES Permission denied が設定される．
　　bool Get_fstat (LPCTSTR name,struct stat* fs) {
　　　　if (fs == NULL) { return false ; }
　　　　int fh = _topen(name,O_RDONLY) ;
　　　　if (fh < 0) { i_Dump(errno) ; }
　　　　if (fh < 0) { return false ; }
　　　　memset(fs,0,sizeof(struct stat)) ;
　　　　int ret = fstat(fh,fs) ;
　　　　_close(fh) ;
　　　　return (ret == 0) ;
　　　　}
__FILE__ などは期待した動作だが，c:\pagefile.sys でエラーとなった．

VC 6 では，～\VC98\CRT\SRC\OPEN.C で CreateFile を呼出している．
その時の値は，
fileaccess 0x80000000
fileattrib 0x00000080
filecreate 0x00000003
fileshare 0x00000003
osfh 0x0013fef0
+ path 0x000326d1 “c:\pagefile.sys”
+ &SecurityAttributes 0x0013fdbc

circle.svg の Load で，
‘System.Xml.XmlException’ の初回例外が System.Xml.dll で発生しました。
‘System.Xml.XmlException’ のハンドルされていない例外が System.Xml.dll で発生しました。
追加情報: セキュリティ上の理由から、DTD はこの XML ドキュメントでは使用できません。
DTD 処理を有効にするには、XmlReaderSettings の ProhibitDtd プロパティを False に設定し、XmlReader.Create メソッドにその設定を渡してください。

<?xml version=”1.0″ standalone=”no”? >
<!DOCTYPE svg PUBLIC “-//W3C//DTD SVG 1.1//EN” “http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd” >
<svg width=”320pt” height=”224pt” viewBox=”0 0 100 70″ xmlns=”http://www.w3.org/2000/svg” >
<circle cx=”30″ cy=”25″ r=”20″ fill=”orange”/>
<circle cx=”50″ cy=”35″ r=”20″ stroke-width=”4″ stroke=”brown” fill=”coral”/>
<circle cx=”70″ cy=”45″ r=”20″ stroke-width=”4″ stroke=”chocolate” fill=”none”/>
</svg>

これは，MSXML.dll を利用した場合も正しく読み込めていない（Xml_Import で対応）．
Xml_Fnc.hxx の Xml_Import を MFC を利用しない様に書き直した時にもう一度考える．
現状の XmlI_MS や Xml_CLI は，DTD などが付加された xml には対応していない（Xml_Import では可能）．

Win 32 コンソール AP で MFC サポートのプロジェクトを作成．
/clr を有効にして，以下のコードで，

// L_xml_K.cpp : コンソール アプリケーションのエントリ ポイントを定義します。
#include "StdAfx.h"
#include "L_xml_K.h"
#include "Xml_CLI.hxx"
#include "XmlOut.hxx"
#include "Xml_MS_.hxx"
#undef GetTempPath
#using <System.dll>
　
#ifdef _DEBUG
#define new DEBUG_NEW
#endif
　
// 唯一のアプリケーション オブジェクトです。
CWinApp theApp;
using namespace std;
　
int _tmain(int argc, TCHAR* argv[], TCHAR* envp[])
{
　　int nRetCode = 0;
　　if (!AfxWinInit(::GetModuleHandle(NULL), NULL, ::GetCommandLine(), 0)) {
　　　　_tprintf(_T("致命的なエラー: MFC の初期化ができませんでした。\n"));
　　　　nRetCode = 1;
　　　　}
　　else {
　　　　System::String^ tmp = System::IO::Path::GetTempPath() ;
　　　　System::String^ url = tmp + "211626.svg" ;
　　　　tstring inXml = ::to_tstring(url) ;
　　　　Xml_E xe_CLI = XmlI_CLI::Import(inXml.c_str()) ;
　　　　Xml_E xe_MFC = XmlI_MS ::Import(inXml.c_str()) ;
　　　　tstring outCLI = inXml + _T("_CLI.svg") ;
　　　　tstring outMFC = inXml + _T("_MFC.svg") ;
　　　　XmlOut::Export(xe_CLI,outCLI.c_str()) ;
　　　　XmlOut::Export(xe_MFC,outMFC.c_str()) ;
　　　　}
　　return nRetCode;
　　}

—— すべてのリビルド開始: プロジェクト: L_xml_K, 構成: Debug Win32 ——
プロジェクト ‘L_xml_K’、構成 ‘Debug|Win32’ の中間出力ファイルを削除しています。
コンパイルしています…
StdAfx.cpp
コンパイルしています…
L_xml_K.cpp
c:\…\CRT_MBWC.hxx(179) : warning C4793: ‘vararg’ : 関数 ‘BOOL StPrintF(LPTSTR,size_t,LPCTSTR,…)’ 用に
　　ネイティブ コードの生成が発生します
　　c:\…\CRT_MBWC.hxx(149) : ‘StPrintF’ の宣言を確認してください。
C:\…\Xml_MS_.hxx(14) : warning C4279: ‘value’: タイプ ライブラリ ‘msxml.dll’ の識別子はキーワードです。
　　’rename’ 修飾子を使用してください。
C:\…\Xml_MS_.hxx(14) : warning C4279: ‘value’: タイプ ライブラリ ‘msxml.dll’ の識別子はキーワードです。…
C:\…\Xml_MS_.hxx(14) : warning C4279: ‘value’: タイプ ライブラリ ‘msxml.dll’ の識別子はキーワードです。…
C:\…\Xml_MS_.hxx(14) : warning C4279: ‘value’: タイプ ライブラリ ‘msxml.dll’ の識別子はキーワードです。…
C:\…\Xml_MS_.hxx(14) : warning C4279: ‘value’: タイプ ライブラリ ‘msxml.dll’ の識別子はキーワードです。…
C:\…\Xml_MS_.hxx(14) : warning C4279: ‘value’: タイプ ライブラリ ‘msxml.dll’ の識別子はキーワードです。…
C:\…\Xml_MS_.hxx(14) : warning C4279: ‘value’: タイプ ライブラリ ‘msxml.dll’ の識別子はキーワードです。…
リソースをコンパイルしています…
リンクしています…
マニフェストを埋め込んでいます…
L_xml_K – エラー 0、警告 8
========== すべてリビルド: 1 正常終了、0 失敗、0 スキップ ==========

C4793 は，可変個引数リストの関数のため．
　　コンパイラの警告 (レベル 1 および 3) C4793
C4279 は検索すると，
　　having MSXML warnings
　　Why warning C4279 happens?

C4279 は，今回のプロジェクトのみの問題となると思われる．
　　MSXML.dll と，System.Xml.dll を同一プロジェクトでは利用しない様にするため．
　　今回は，それぞれで読込み，単純に書き込む動作のデバッグのためにプロジェクトを作成した．

Visual C++ を使用して、ファイルから XML データを読み取る
Netting C++ XML による構成
XmlNode メンバ
　　XmlNode.Attributes プロパティ
　　XmlNode.ChildNodes プロパティ

System::Xml を利用した読込のコードを作成していて，テスト用のコードで
—— ビルド開始: プロジェクト: L_xml_I, 構成: Debug Win32 ——
コンパイルしています…
L_xml_I.cpp
.\L_xml_I.cpp(182) : error C2039: ‘GetTempPathW’ : ‘System::IO::Path’ のメンバではありません。
c:\windows\microsoft.net\framework\v2.0.50727\mscorlib.dll : ‘System::IO::Path’ の宣言を確認してください。
.\L_xml_I.cpp(182) : error C2660: ‘GetTempPathW’ : 関数に 0 個の引数を指定できません。
L_xml_I – エラー 2、警告 0
========== ビルド: 0 正常終了、1 失敗、0 更新、0 スキップ ==========
　　Windows.h をインクルードしてはいけない？
　　使用する前？に以下を追加．
　　　　#undef GetTempPath

2020/07　https://jml.mish.work/index.php/cpp/xml.html

2019/01　C++ と STL の範囲で書き直し
リンク先に msxml.dll などを使用しない C++ で書いたコードを置いています．

2019/08　System.Xml.dll と msxml.dll を使用したコードへのリンクを追加
xml_base.hxx
Str_CLI.hxx
Xml_CLI.hxx
Xml_MS_.hxx
Xml_In.hxx

今度は「COM 相互運用機能」ってやつ．
Tlbimp.exe を利用して，AsFile.tlb を ISFile.dll として出力．
　　SDK コマンドプロンプトを開き，～\ReleaseU のフォルダに移動．
　　tlbimp AsFile.tlb ISFile.dll
C# フォームアプリケーションを作成して，ボタンを配置．
　　参照の追加で，iSFile.dll を追加．
　　　　using iSFile; を追加．
　　　　private void button1_Click(object sender,EventArgs e) {
　　　　　　iSFile.SearchF srchF = new iSFile.SearchF() ;
　　　　　　string selFile = srchF.BrowseFile(“%Temp%\\”,””) ;
　　　　　　MessageBox.Show(selFile) ;
　　　　　　}
同様の動作の vbs での呼び出しは，
　　dim oFSch : set oFSch = CreateObject(“AsFile.SearchF”)
　　selFile = oFSch.BrowseFile(“%Temp%\”,””) ;
　　MsgBox x
以前聞いた時には，もっと面倒なイメージがあったがそれ程でもない．
　　ただ COM の部分が確定していない（平行してコードを書いている）時は面倒なのかも．

同様に AsHVR.exe をやってみたら，実行時エラー．
型 ‘AsHVR.AsHVRClass’ の COM オブジェクトをインターフェイス型 ‘AsHVR.IAsHVR’ にキャストできません。
IID ‘{1625D8E7-B67B-4592-878F-ECFAD1227734}’ が指定されたインターフェイスの COM コンポーネント上での QueryInterface 呼び出しのときに次のエラーが発生したため、この操作に失敗しました:
インターフェイスがサポートされていません (HRESULT からの例外: 0x80004002 (E_NOINTERFACE))。

これが面倒だったのかも？

他にも，T54W7U64 環境で，DevXP\～\CSCallL\bin\Debug\CSCallL.exe を起動して，「ボタン 1」 もエラーとなる．
　　これは，AsFile.dll の 64 ビット版がないことによるものと思うが，…
　　うまい方法がよくわからない．

2013/08/06
既存の AsHVR.exe などがうまく動作しないのは変わらないが，
　　VC 8 で新規に MFC ダイアログベースのプロジェクト TstComE を作成．オートメーションを有効に．
　　メソッド GetTmpPath を追加して実行するとうまくいった．

C++/CLI コンソール AP として作成．
// CPCallL.cpp : メイン プロジェクト ファイルです。
#include "stdafx.h"
using namespace System;
using namespace System::Windows::Forms;
int main(array<System::String ^> ^args)
{
　　{
　　　　iSFile::SearchF^ srchF = gcnew iSFile::SearchF();
　　// String^ selFile = srchF->BrowseFile("%Temp%\\","") ;
　　// MessageBox::Show(selFile) ;
　　　　}
　　{
　　　　AsHVR::AsHVR^ hmpvr = gcnew AsHVR::AsHVR();
　　// String^ key = hmpvr->GetKeySP();
　　// MessageBox::Show(key);
　　　　}
　　{
　　　　TstComE::TstComE^ tce = gcnew TstComE::TstComE() ;
　　　　String^ tmpFile = tce->GetTmpPath() ;
　　　　MessageBox::Show(tmpFile) ;
　　　　}
　　return 0;
　　}
今度は TstComE 以外うまく動作しない．

連載! とことん VC++
　　第 8 回 C++/CLI を利用した相互運用 ～ネイティブ C++ から .NET の利用～
　　第 9 回 C++/CLI を利用した相互運用 ～.NET からのネイティブ C++ 資産の再利用～

VC++ 2010 Express などが対象となっている．
インストールなしで用意できた環境が VS 2008 だったが，特に問題なく進められた．

メニューの「プロジェクト」－「参照の追加」は，VC 2003 以降？
VC 2005 , VC 2008 では，ソリューションエクスプローラのプロジェクトの下に「参照設定」がない？
　　VC 2003 には存在するので．
VC 2002 では，プログラミング VisualC++.NET Vol.2　429 ページで
　　#using <..\Ex32a\Debug\Ex32a.dll> となっている．

さまざまな文字列型間で変換する
Visual C++ で System::String* から char* に変換する方法
System::String を wchar_t* または char* に変換する
BUG: The VC++ .NET or VC++ 2005 debugger cannot display std::string and std::wstring variables correctly

2013/08/05
C++/CLI を用いて、.NET 対応アプリケーションから MFC 対応クラスを使用する
　　慣れかもしれないが，ちょっと面倒に感じる．

ゼロから学ぶ！最新 Visual Basic をやっていて，
　　—— ビルド開始: プロジェクト: GetGMail, 構成: Debug Any CPU ——
　　C:\…\GetGMail\Form1.vb(29) : error BC30451: 名前 ‘HttpUtility’ は宣言されていません。
　　C:\…\GetGMail\Form1.vb(30) : error BC30451: 名前 ‘HttpUtility’ は宣言されていません。
　　C:\…\GetGMail\Form1.vb(112) : error BC30451: 名前 ‘HttpUtility’ は宣言されていません。
　　========== ビルド: 0 正常終了または最新の状態、1 失敗、0 スキップ ==========
検索すると，「参照の追加」で System.Web を追加する必要があるとのこと．

ODMMeta.cxx , ODrawDcM.hxx
　　　　pDC->IntersectClipRect(imgRect) ;
　　　　MetaFile mf ;
　　　　mf.SetFileName(imgN) ;
　　//　mf.Draw(pDC,imgRect) ;
　　　　{
　　　　　　MemoryDC memDC ;
　　　　　　CRect mRect(CPoint(0,0),imgRect.Size()) ;
　　　　　　memDC.Init(CRect(mRect).Size()) ;
　　　　　　{
　　　　　　　　int colIndex = COLOR_3DFACE ;
　　　　　　　　COLORREF clrC = ::GetSysColor(colIndex) ;
　　　　　　　　CDC* mdc = memDC.GetMemoryDC() ;
　　　　　　　　CRect clrR = mRect ;
　　　　　　　　mdc->FillSolidRect(clrR,clrC) ;
　　　　　　　　mf.Draw(mdc,mRect) ;
　　　　　　　　}
　　　　　　memDC.Draw(pDC,imgRect) ;
　　　　　　memDC.Term() ;
　　　　　　}