連想配列

  VC++ COM



Scripting.Dictionary が、連想配列の機能を持っており、VBScript 等でも使用されるので、
C++ でもそれを利用します。

実用では、ユーザのクラスでラップし、演算子のオーバロードを行うと良いとおもいますが、
実際使った事が無いので、問題点はあるかもしれません

  
#include <windows.h>
#include <stdio.h>
#undef GetFreeSpace
#import "C:\WINDOWS\System32\scrrun.dll"

inline void TESTHR(HRESULT x) {if FAILED(x) _com_issue_error(x);};

int main(int argc, char* argv[])
{
	CoInitialize(NULL);

	Scripting::IDictionaryPtr pDic;

	try {
		TESTHR(pDic.CreateInstance("Scripting.Dictionary"));

		_variant_t Key,Value;

		// 追加
		Key = "A";
		Value = "日本語";
		pDic->Add( &Key, &Value );

		// 追加
		Key = "B";
		Value = "表示";
		pDic->Add( &Key, &Value );

		// 追加
		Key = "XXX";
		Value = "面倒なので、文字列のみ";
		pDic->Add( &Key, &Value );

		// 置き換え
		Key = "B";
		Value = "【表示】";
		pDic->PutItem( &Key, &Value );

		_bstr_t str;

		printf( "要素数 : %d\n", pDic->GetCount() );

		// Key による参照
		Key = "A";
		str = pDic->GetItem( &Key );
		printf( "GetItem で直接表示 : %s\n", (LPTSTR)str );

		_variant_t ar;

		ar = pDic->Keys();

		SAFEARRAY *psa;
		long lLBound, lUBound, cElements;  

		psa = ar.parray;

		// 配列の下位および上位の境界を取得
		SafeArrayGetLBound( psa, 1, &lLBound );
		SafeArrayGetUBound( psa, 1, &lUBound );

		// 要素数を計算
		cElements = lUBound - lLBound + 1;

		// 列挙
		printf( "----------------------\n");
		for ( long cCnt = lLBound; cCnt <= lUBound; cCnt++ ) {
			VARIANT vVal;
			SafeArrayGetElement( psa, &cCnt, &vVal );
			Key = vVal;
			str = pDic->GetItem( &Key );
			printf( "%s\n", (LPTSTR)str );
		}

	}
	catch (_com_error &e)
	{
	}

	pDic.Release();

	CoUninitialize();
	return 0;
}
  

build.bat
  
cmd.exe /c vc.bat hash
  

vc.bat
  
Set AddPath=C:\Program Files\Microsoft Visual Studio\COMMON\MSDev98\Bin
Set PATH=%AddPath%;%PATH%
Set CL6="C:\Program Files\Microsoft Visual Studio\VC98\Bin\cl.exe"
Set LINK6="C:\Program Files\Microsoft Visual Studio\VC98\Bin\link.exe"
Set INC6="C:\Program Files\Microsoft Visual Studio\VC98\Include"
Set INCA="C:\Program Files\Microsoft Visual Studio\VC98\ATL\Include"
Set LIB6="C:\Program Files\Microsoft Visual Studio\VC98\Lib"
Set LIBS1=kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib
Set LIBS2=shell32.lib ole32.lib oleaut32.lib uuid.lib odbc32.lib odbccp32.lib
%CL6% %1.cpp /c /I%INC6% /I%INCA% /GX
%LINK6% /LIBPATH:%LIB6% %1.obj %LIBS1% %LIBS2%
  
↑Visual C++ 6.0

  
Set AddPath=C:\Program Files\Microsoft Visual Studio 8\Common7\IDE
Set PATH=%AddPath%;%PATH%
Set CL8="C:\Program Files\Microsoft Visual Studio 8\VC\bin\cl.exe"
Set LINK8="C:\Program Files\Microsoft Visual Studio 8\VC\bin\link.exe"
Set INC81="C:\Program Files\Microsoft Visual Studio 8\VC\include"
Set INC82="C:\Program Files\Microsoft Platform SDK\Include"
Set INC83="C:\Program Files\Microsoft Platform SDK\Include\atl"
Set LIB81="C:\Program Files\Microsoft Visual Studio 8\VC\lib"
Set LIB82="C:\Program Files\Microsoft Platform SDK\Lib"
Set LIBS1=kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib
Set LIBS2=shell32.lib ole32.lib oleaut32.lib uuid.lib odbc32.lib odbccp32.lib
%CL8% %1.cpp /c /I%INC81% /I%INC82% /I%INC83% /EHsc
%LINK8% /LIBPATH:%LIB81% /LIBPATH:%LIB82% %1.obj %LIBS1% %LIBS2%
  
↑Visual C++ 2005 Express Edition + SDK










  infoboard   管理者用   
このエントリーをはてなブックマークに追加




SQLの窓  天気  IT用語辞典
Yahoo!ニュース  マルチ辞書
PHP マニュアル  Google URL短縮 


フリーフォントWEBサービス
SQLの窓WEBサービス

SQLの窓フリーソフト

素材

一般WEBツールリンク

SQLの窓

フリーソフト

JSライブラリ