VC 10 で作成したダイアログベースのプロジェクトを VC 6 に

1. プロジェクト作成時の基本クラス CDialogEx → CDialog
2. 「構成プロパティ」－「全般」の「出力ディレクトリ」と「中間ディレクトリ」を $(Configuration).100\ に
3. RC ファイルなどが UNICODE だったため，Shift-JIS に
4. RC ファイル内でエラーになる部分をコメントに
5. ico ファイル内に2573x1293x16777216 (256x256x32 png) があり，ビルドエラーになったので削除
   C:\…\Project.rc (67): error RC2176 : old DIB in res\Project.ico; pass it through SDKPAINT
6. StdAfx.h 内の AfxControlBar.h をコメントに
7. CAboutDlg : CDialogEx となっているので，CDialog に
8. CShellManager 関係をコメントに
9. ON_COMMAND(ID_HELP, &CWinApp::OnHelp) をコメントに

ここまででビルド，実行はできたが，なんか変
VC 10 でのダイアログエディタの操作は可能だが，VC 6 では出来ない．
VC 10 で編集したものを，VC 6 でビルド，実行は可能？
ON_BN_CLICKED(IDC_XXX, &CBrwFileDlg::OnClickedXxx) の ‘&’ が邪魔．

* ここの情報は，動作などを保証するものではありません．個人的なメモです．

Common Resource Attributes
https://docs.microsoft.com/en-us/windows/win32/menurc/common-resource-attributes

http://msdn.microsoft.com/ja-jp/library/cc429335.aspx

簡略化するために HelpAPI.hxx に以下を用意．
inline CString GetLongPathName (LPCTSTR fileName)
{
　CString longPath ;
　UINT size = _MAX_PATH ;
　DWORD len  = ::GetLongPathName(fileName,longPath.GetBuffer(size),size) ;
　longPath.ReleaseBuffer() ;
　if (len == 0) { return fileName ; }
　return longPath ;
　}

ファイルが存在しないと関数が失敗する様なので，
　::CreateEmptyFile(sFile) ;
　CString  lFile = ::GetLongPathName(sFile) ;
　

以下の様な DImageS の配列で，要素の表示が 1 回目しかできなかった．
　CString selFile = DImgAry.GetAt(selIndex).GetFileName() ;
　DImgAry[selIndex].Draw(&m_Image) ;

配列を直接使用するのではなく，DImageS にファイル名を取得してからでは OK ．
　DImageS dImg ;
　dImg.SetFileName(selFile) ;
　dImg.Draw(&m_ImageMBA) ;
　

ヘッダファイルへの追加
　#include “DImgS.hxx” または “DImg.hxx”
　#include “ODrawDcM.hxx”

　ListBoxDocMF m_ListDImage;
　CArray <DImageS,DImageS> DImgAry ; または　<DImage,…>

OnInitDialog など
　m_ListDImage.SubclassDlgItem(IDC_XXXX_FILE_LIST,this) ;
　m_ListDImage.Init() ;
　m_ListDImage.ResetContent() ;

リストに表示するファイルの設定
　DImgAry.RemoveAll() ;
　for (int dIndex=0 ; dIndex<addFiles.GetSize() ; dIndex++) {
　　DImageS dImg ; または　DImage
　　dImg.SetFileName(addFiles[dIndex]) ;
　　DImgAry.Add(dImg) ;
　　}
　m_ListDImage.ResetContent() ;
　for (int rIndex=0 ; rIndex<DImgAry.GetSize() ; rIndex++) {
　　CString fileName = DImgAry.GetAt(rIndex).GetFileName() ;
　　m_ListDImage.AddString(fileName,fileName) ;
　　 // 以下は登録時に画像を付ける場合
　　CString mfName = CacheFile::GetCF_Name(fileName,1000) ;
　　if (::FileIsExist(mfName)) {
　　　m_ListDImage.SetAtDocMF(rIndex,mfName) ;
　　　}
　　else {
　　　HICON icon = DImageS_GetIcon(fileName) ;
　　　m_ListDImage.SetAtIcon(rIndex,icon) ;
　　　}
　　}

DImageS クラスでなく DImage クラスを使用した場合は，ImageDMF クラスをサポートする形になる．
DImageS クラスでは，対応付けた EMF での動作になる．
現状の ListBoxDocMF では Shell Extension を利用できないみたい．
別のクラスを用意するか変更が必要．間にListBoxDocSE などを用意するか？
　

データが増えると遅かったので改良
BOOL FaceA::Search(const long edgeS,const long edgeE,long* left_Face,long* rightFace) const
{
　　if (left_Face == NULL) { return FALSE ; }
　　if (rightFace== NULL) { return FALSE ; }
　　*left_Face = *rightFace = -1 ;
　　BOOL lfFound = FALSE ;
　　BOOL rfFound = FALSE ;
　　 static long LastFace = 0 ;
　　int index = 0 ;
　　 for (index=LastFace ; index<GetCount() ; index++) {
　　　　 Face f = Faces[index] ;
　　　　 if (!f.Search(edgeS,edgeE,&lfFound,&rfFound)) { continue ; }
　　　　 if (*left_Face<0 && lfFound) { *left_Face = index ; }
　　　　 if (*rightFace<0 && rfFound) { *rightFace = index ; }
　　　　 if (*left_Face >= 0 && *rightFace>=0) {
　　　　　　 LastFace = min(*left_Face,*rightFace) ;
　　　　　　 return TRUE ;
　　　　　　 }
　　　　 }
　　for (index=0 ; index<GetCount() ; index++) {
　　　　Face f = Faces[index] ;
　　　　if (!f.Search(edgeS,edgeE,&lfFound,&rfFound)) { continue ; }
　　　　if (*left_Face<0 && lfFound) { *left_Face = index ; }
　　　　if (*rightFace<0 && rfFound) { *rightFace = index ; }
　　　　if (*left_Face >= 0 && *rightFace>=0) {
　　　　　　LastFace = min(*left_Face,*rightFace) ;
　　　　　　return TRUE ;
　　　　　　}
　　　　}
　　return FALSE ;
　　}

前に検索して一致した所から再検索するコードを追加．

FaceA::FaceA (const FaceA& other)
{

//　ループによるコピー
　　Faces.SetSize(other.Faces.GetSize()) ;
　　for (int index=0 ; index<other.Faces.GetSize() ; index++) {
　　　　Faces[index] = other.Faces[index] ;
　　　　}

//　CArray::Copy
　　Faces.Copy(other.Faces) ;

　　}

VC 6 リリース版では体感できなかったが，少なくともデバッグ版では Copy の方がはるかに速かった．

//　　AtlImage.h より

inline BOOL CImage::Draw(
　　_In_ HDC hDestDC,
　　_In_ int xDest,
　　_In_ int yDest,
　　…
{
　　…
#if WINVER >= 0x0500
　　if( ((m_iTransparentColor != -1) || (m_clrTransparentColor != (COLORREF)-1)) && IsTransparencySupported() ) {
　　　　bResult = ::TransparentBlt( hDestDC, xDest, yDest, … , GetTransparentRGB() ) ;
　　　　}
　　else if( m_bHasAlphaChannel && IsTransparencySupported() ) {
　　　　BLENDFUNCTION bf;
　　　　bf.BlendOp = AC_SRC_OVER;
　　　　bf.BlendFlags = 0;
　　　　bf.SourceConstantAlpha = 0xff;
　　　　bf.AlphaFormat = AC_SRC_ALPHA;
　　　　bResult = ::AlphaBlend( hDestDC, xDest, yDest, … , bf) ;
　　　　}
　　else
#endif // WINVER >= 0x0500
　　{
　　　　bResult = ::StretchBlt( hDestDC, xDest, yDest, … , SRCCOPY) ;
　　　　}
　　…
　　return( bResult );
　　}

Displaying a Picture and Storing It in an Enhanced Metafile
http://msdn.microsoft.com/en-us/library/dd183568.aspx

2020/12
E_MF.hxx
EMF_fnc.hxx

サイズの大きな画像を縮小して表示すると汚くなる

SetStretchBltMode の指定が必要．
http://msdn.microsoft.com/ja-jp/library/cc428734.aspx

「配布先リスト」の「名前」の所にメールアドレスでなく「連絡先」の「表示名」のみの場合？に配信不能になる．
修正後，「配信不能」にならなかったことは確認済み．
詳細は未確認．