Changeset 828 in dev for trunk/ab5.0/abdev/abdev


Ignore:
Timestamp:
Mar 19, 2012, 1:59:48 AM (12 years ago)
Author:
イグトランス (egtra)
Message:

egtraブランチの内容をマージ。

Location:
trunk
Files:
1 deleted
34 edited
2 copied

Legend:

Unmodified
Added
Removed

  • trunk

  • trunk/ab5.0/abdev

    • Property svn:ignore set to
      *.opensdf
      *.sdf
      *.suo
      *.user
      int
      ipch
      out

  • trunk/ab5.0/abdev/abdev/Attach.cpp

    r763 r828  
    44
    55#include "common.h"
     6#include <abdev/ab_common/include/Path.h>
     7#include <abdev/ab_common/include/ProcessAndModule.h>
    68#include <psapi.h>
    79#include <tlhelp32.h>
    … …  
    3739}
    3840
    39 void InsertProcess_ToListView(HWND hListView,char *lpszAppPath,int id,char *lpszPlatform,char *lpszTitle){
     41void InsertProcess_ToListView(HWND hListView,char const* lpszAppPath,int id,char const* lpszPlatform,char const * lpszTitle){
    4042    char szAppName[MAX_PATH],temp2[MAX_PATH];
    4143    _splitpath(lpszAppPath,NULL,NULL,szAppName,temp2);
    … …  
    7577    ListView_SetItem(hListView,&item);
    7678
    77     item.pszText=lpszPlatform;
     79    item.pszText=const_cast<LPSTR>(lpszPlatform);
    7880    item.iSubItem++;
    7981    ListView_SetItem(hListView,&item);
    8082
    81     item.pszText=lpszTitle;
     83    item.pszText=const_cast<LPSTR>(lpszTitle);
    8284    item.iSubItem++;
    8385    ListView_SetItem(hListView,&item);
    … …  
    159161BOOL CALLBACK FindWindowProc(HWND hwnd, LPARAM lParam)
    160162{
    161     HWND* pphWnd = (HWND*)lParam;
    162     *pphWnd = hwnd;
    163     return FALSE; /* 列挙を中断 */
     163    auto pProcessIdAndHWnd = reinterpret_cast<std::pair<DWORD, HWND>*>(lParam);
     164    DWORD processId = 0;
     165    ::GetWindowThreadProcessId(hwnd, &processId);
     166    if (processId == pProcessIdAndHWnd->first)
     167    {
     168        pProcessIdAndHWnd->second = hwnd;
     169        return FALSE;
     170    }
     171    else
     172    {
     173        return TRUE;
     174    }
    164175}
    165176void ListupProcesses(HWND hListView){
    166     char temporary[MAX_PATH];
    167 
    168177    ListView_DeleteAllItems(hListView);
    169178
    170     DWORD *pdwProcessId;
    171     pdwProcessId=(DWORD *)HeapAlloc(hHeap,0,8192*sizeof(DWORD));
    172 
    173179    //プロセスを列挙
    174     DWORD cbNeeded;
    175     EnumProcesses(pdwProcessId,8192*sizeof(DWORD),&cbNeeded);
    176 
    177     char szMyAppPath[MAX_PATH];
    178     GetModuleFileName(GetModuleHandle(0),szMyAppPath,MAX_PATH);
    179 
    180     int i;
    181     for(i=0;i<(int)(cbNeeded/sizeof(DWORD));i++){
    182 
    183         //プロセスIDを元にハンドルを取得
    184         HANDLE hProcess;
    185         hProcess=OpenProcess(PROCESS_ALL_ACCESS,0,pdwProcessId[i]);
    186         if(!hProcess) continue;
    187 
     180    auto processIds = ActiveBasic::Common::GetProcesses();
     181
     182    char szMyAppPath[MAX_PATH] = {};
     183    GetModuleFileName(nullptr, szMyAppPath, MAX_PATH);
     184
     185    BOOST_FOREACH(DWORD processId, processIds)
     186    {
    188187        //そのプロセスにおける実行モジュールのインスタンスハンドルを取得
    189         HINSTANCE hModule;
    190         DWORD cbReturned;
    191         if(!EnumProcessModules( hProcess, &hModule, sizeof(HINSTANCE), &cbReturned ))
    192             continue;
    193 
    194         //実行ファイル名を取得
    195         GetModuleFileNameEx(hProcess,hModule,temporary,MAX_PATH);
    196 
     188        auto executablePath = ActiveBasic::Common::GetExecutableModulePath(processId);
    197189
    198190        //////////////////////////////
    … …  
    200192        //////////////////////////////
    201193
    202         //スナップショットを取得
    203         HANDLE hSnapshot;
    204         hSnapshot=CreateToolhelp32Snapshot(TH32CS_SNAPALL,0);
    205 
    206         THREADENTRY32 te;
    207         memset(&te,0,sizeof(THREADENTRY32));
    208         te.dwSize=sizeof(THREADENTRY32);
    209         if(Thread32First(hSnapshot,&te)){
    210             do{
    211                 if(te.th32OwnerProcessID==pdwProcessId[i]){
    212                     break;
    213                 }
    214             }while(Thread32Next(hSnapshot,&te));
    215         }
    216 
    217         HWND hwnd;
    218         hwnd=0;
    219         EnumThreadWindows(te.th32ThreadID,FindWindowProc,(LPARAM)&hwnd);
    220 
    221         while(GetParent(hwnd)) hwnd=GetParent(hwnd);
    222 
    223         char szWndTitle[1024];
    224         szWndTitle[0]=0;
    225         if(hwnd) GetWindowText(hwnd,szWndTitle,1024);
    226 
    227         CloseHandle(hSnapshot);
    228 
    229 
    230 
    231         CloseHandle(hProcess);
    232 
    233         if(lstrcmpi(szMyAppPath,temporary)==0){
     194        std::pair<DWORD, HWND> processIdAndHWnd(processId, nullptr);
     195        EnumWindows(FindWindowProc, reinterpret_cast<LPARAM>(&processIdAndHWnd));
     196        HWND hwnd = processIdAndHWnd.second;
     197
     198        TCHAR szWndTitle[1024] = {};
     199        if(hwnd) GetWindowText(hwnd, szWndTitle, 1024);
     200
     201        if (ActiveBasic::Common::IsPathEqual(Jenga::Common::ToWString(szMyAppPath).c_str(), executablePath.wstring().c_str()))
     202        {
    234203            //自分自身（ProjectEditor.exe）は無視
    235204            continue;
    … …  
    237206
    238207        //リストビューへ追加
    239         InsertProcess_ToListView(hListView,temporary,pdwProcessId[i],"Win32",szWndTitle);
    240     }
    241 
    242     HeapDefaultFree(pdwProcessId);
     208        InsertProcess_ToListView(hListView,executablePath.string().c_str(),processId,"Win32",szWndTitle);
     209    }
    243210}
    244211

  • trunk/ab5.0/abdev/abdev/ChildWndOnRebar.cpp

    r629 r828  
    229229
    230230
    231 #define ADD_TOOLBAR_BUTTON(id,iconID,lpszToolTip) pobj_StandardToolbar->Add(id,(HICON)LoadImage(hIconResInst,MAKEINTRESOURCE(iconID),IMAGE_ICON,16,16,0),lpszToolTip)
     231#define ADD_TOOLBAR_BUTTON(id, iconID, lpszToolTip) pobj_StandardToolbar->Add((id), ActiveBasic::Resource::LoadIconAlt(hIconResInst, (iconID), 16, 16), (lpszToolTip))
    232232#define ADD_TOOLBAR_SEPARATOR pobj_StandardToolbar->Add(0,0,0)
    233233    //ボタン類を追加
    … …  
    279279    pobj_DebuggerToolbar->Create(hDebuggerToolbarPager);
    280280
    281 #define ADD_TOOLBAR_BUTTON(id,iconID,lpszToolTip) pobj_DebuggerToolbar->Add(id,(HICON)LoadImage(hIconResInst,MAKEINTRESOURCE(iconID),IMAGE_ICON,16,16,0),lpszToolTip)
     281#define ADD_TOOLBAR_BUTTON(id, iconID, lpszToolTip) pobj_DebuggerToolbar->Add((id), ActiveBasic::Resource::LoadIconAlt(hIconResInst, (iconID), 16, 16), (lpszToolTip))
    282282#define ADD_TOOLBAR_SEPARATOR pobj_DebuggerToolbar->Add(0,0,0)
    283283    //ボタン類を追加
    … …  
    327327    pobj_ReleaseToolbar->Create(hReleaseToolbarPager);
    328328
    329 #define ADD_TOOLBAR_BUTTON(id,iconID,lpszToolTip) pobj_ReleaseToolbar->Add(id,(HICON)LoadImage(hIconResInst,MAKEINTRESOURCE(iconID),IMAGE_ICON,16,16,0),lpszToolTip)
     329#define ADD_TOOLBAR_BUTTON(id, iconID, lpszToolTip) pobj_ReleaseToolbar->Add((id), ActiveBasic::Resource::LoadIconAlt(hIconResInst, (iconID), 16, 16), (lpszToolTip))
    330330#define ADD_TOOLBAR_SEPARATOR pobj_ReleaseToolbar->Add(0,0,0)
    331331    //ボタン類を追加

  • trunk/ab5.0/abdev/abdev/Common.h

    r772 r828  
    3333#include "Debugger.h"
    3434
     35#include <Resource/Load.h>
    3536
    3637#pragma comment(lib, "wininet.lib")
    … …  
    627628void GetFullPath(char *path,const char *dir);
    628629void RemoveDirectoryStrong(const char *dirPath);
    629 BOOL GetFilePathDialog(HWND hwnd,char *filename,LPSTR Filter,LPSTR Title,_int8 IsOpen);
     630BOOL GetFilePathDialog(HWND hwnd,char *filename,LPCSTR Filter,LPCSTR Title,BOOL IsOpen);
    630631BOOL GetFolder(HWND hWnd,char *folder,char *OpenFolderTitle);
    631632int GetFileExtension( const char *path );

  • trunk/ab5.0/abdev/abdev/Complement.cpp

    r655 r828  
    754754            hImageList=ImageList_Create(16, 16, ILC_COLOR24, 7, 0);
    755755            ListView_SetImageList(hListView, hImageList, LVSIL_SMALL);
    756             ImageList_AddIcon(hImageList, LoadIcon(hResInst, MAKEINTRESOURCE(IDI_MEMBER_PRIVATE_VARIABLE)));
    757             ImageList_AddIcon(hImageList, LoadIcon(hResInst, MAKEINTRESOURCE(IDI_MEMBER_PUBLIC_VARIABLE)));
    758             ImageList_AddIcon(hImageList, LoadIcon(hResInst, MAKEINTRESOURCE(IDI_MEMBER_PRIVATE_FUNCTION)));
    759             ImageList_AddIcon(hImageList, LoadIcon(hResInst, MAKEINTRESOURCE(IDI_MEMBER_PUBLIC_FUNCTION)));
    760             ImageList_AddIcon(hImageList, LoadIcon(hResInst, MAKEINTRESOURCE(IDI_PAIRSTATEMENT)));
    761             ImageList_AddIcon(hImageList, LoadIcon(hResInst, MAKEINTRESOURCE(IDI_HTML_GENERAL_PARAMETER)));
    762             ImageList_AddIcon(hImageList, LoadIcon(hResInst, MAKEINTRESOURCE(IDI_HTML_PARAMETER)));
     756            ImageList_AddIcon(hImageList, ActiveBasic::Resource::LoadIconAlt(hResInst, IDI_MEMBER_PRIVATE_VARIABLE));
     757            ImageList_AddIcon(hImageList, ActiveBasic::Resource::LoadIconAlt(hResInst, IDI_MEMBER_PUBLIC_VARIABLE));
     758            ImageList_AddIcon(hImageList, ActiveBasic::Resource::LoadIconAlt(hResInst, IDI_MEMBER_PRIVATE_FUNCTION));
     759            ImageList_AddIcon(hImageList, ActiveBasic::Resource::LoadIconAlt(hResInst, IDI_MEMBER_PUBLIC_FUNCTION));
     760            ImageList_AddIcon(hImageList, ActiveBasic::Resource::LoadIconAlt(hResInst, IDI_PAIRSTATEMENT));
     761            ImageList_AddIcon(hImageList, ActiveBasic::Resource::LoadIconAlt(hResInst, IDI_HTML_GENERAL_PARAMETER));
     762            ImageList_AddIcon(hImageList, ActiveBasic::Resource::LoadIconAlt(hResInst, IDI_HTML_PARAMETER));
    763763
    764764            return 0;

  • trunk/ab5.0/abdev/abdev/DialogBoxes.cpp

    r763 r828  
    502502void DlgNewProjectWizard(HWND hwnd){
    503503#define MAX_NEWPROJECTPAGE 3
    504     PROPSHEETHEADER psh;
    505     PROPSHEETPAGE psp;
    506     HPROPSHEETPAGE hpsp[MAX_NEWPROJECTPAGE];
     504    PROPSHEETHEADER psh = {};
     505    PROPSHEETPAGE psp = {};
     506    HPROPSHEETPAGE hpsp[MAX_NEWPROJECTPAGE] = {};
    507507    int i;
    508508
    509     psp.dwSize=sizeof(PROPSHEETPAGE);
    510     psp.hInstance=hResInst;
    511     psp.dwFlags=PSP_DEFAULT;
     509    psp.dwSize = sizeof(PROPSHEETPAGE);
     510    psp.hInstance = GetWindowInstance(hwnd);
     511    psp.dwFlags = PSP_DLGINDIRECT;
    512512
    513513    //各ページのセッティング
    514514    i=0;
    515     psp.pszTemplate=MAKEINTRESOURCE(IDD_NEWPROJECT_PAGE1);
     515    psp.pResource = static_cast<PROPSHEETPAGE_RESOURCE>(ActiveBasic::Resource::LoadResourceAlt(hResInst, IDD_NEWPROJECT_PAGE1, RT_DIALOG));
    516516    psp.pfnDlgProc=DlgNewProject_Page1;
    517517    hpsp[i]=CreatePropertySheetPage(&psp);
    518518    i++;
    519     psp.pszTemplate=MAKEINTRESOURCE(IDD_NEWPROJECT_PAGE2);
     519    psp.pResource = static_cast<PROPSHEETPAGE_RESOURCE>(ActiveBasic::Resource::LoadResourceAlt(hResInst, IDD_NEWPROJECT_PAGE2, RT_DIALOG));
    520520    psp.pfnDlgProc=DlgNewProject_Page2;
    521521    hpsp[i]=CreatePropertySheetPage(&psp);
    522522    i++;
    523     psp.pszTemplate=MAKEINTRESOURCE(IDD_NEWPROJECT_PAGE3);
     523    psp.pResource = static_cast<PROPSHEETPAGE_RESOURCE>(ActiveBasic::Resource::LoadResourceAlt(hResInst, IDD_NEWPROJECT_PAGE3, RT_DIALOG));
    524524    psp.pfnDlgProc=DlgNewProject_Page3;
    525525    hpsp[i]=CreatePropertySheetPage(&psp);
    … …  
    630630            ImageList_AddIcon(hImageList, LoadIcon(hInst, MAKEINTRESOURCE(IDI_FILE_BAS)));
    631631            ImageList_AddIcon(hImageList, LoadIcon(hInst, MAKEINTRESOURCE(IDI_FILE_SBP)));
    632             ImageList_AddIcon(hImageList, LoadIcon(hResInst, MAKEINTRESOURCE(IDI_NEWFILE_PJ)));
    633             ImageList_AddIcon(hImageList, LoadIcon(hResInst, MAKEINTRESOURCE(IDI_NEWFILE_TEXT)));
    634             ImageList_AddIcon(hImageList, LoadIcon(hResInst, MAKEINTRESOURCE(IDI_NEWFILE_HTML)));
    635             ImageList_AddIcon(hImageList, LoadIcon(hResInst, MAKEINTRESOURCE(IDI_NEWFILE_ICON)));
     632            ImageList_AddIcon(hImageList, ActiveBasic::Resource::LoadIconAlt(hResInst, IDI_NEWFILE_PJ));
     633            ImageList_AddIcon(hImageList, ActiveBasic::Resource::LoadIconAlt(hResInst, IDI_NEWFILE_TEXT));
     634            ImageList_AddIcon(hImageList, ActiveBasic::Resource::LoadIconAlt(hResInst, IDI_NEWFILE_HTML));
     635            ImageList_AddIcon(hImageList, ActiveBasic::Resource::LoadIconAlt(hResInst, IDI_NEWFILE_ICON));
    636636
    637637
    … …  
    947947            switch(LOWORD(wParam)){
    948948                case IDC_DIR:
    949                     extern LPSTR ExeFileFilter;
     949                    extern const LPCSTR ExeFileFilter;
    950950                    if(!GetFilePathDialog(hwnd,temporary,ExeFileFilter,"DLLデバッグ用の実行可能ファイルを指定してください",1)) break;
    951951
    … …  
    967967}
    968968void DlgProjectOptionSetting(HWND hwnd){
    969     PROPSHEETHEADER psh;
    970     PROPSHEETPAGE psp[MAX_PJSETDLG];
    971     HPROPSHEETPAGE hpsp[MAX_PJSETDLG];
     969    PROPSHEETHEADER psh = {};
     970    PROPSHEETPAGE psp[MAX_PJSETDLG] = {};
     971    HPROPSHEETPAGE hpsp[MAX_PJSETDLG] = {};
    972972    int i;
    973973    memset(&SetSwitch,0,MAX_PJSETDLG);
    … …  
    976976    i=0;
    977977    psp[i].dwSize=sizeof(PROPSHEETPAGE);
    978     psp[i].dwFlags=PSP_DEFAULT;
    979     psp[i].hInstance=hResInst;
    980     psp[i].pszTemplate=MAKEINTRESOURCE(IDD_PJ_OPTION1);
    981     psp[i].pfnDlgProc=(DLGPROC)DlgProjectOption_Whole;
     978    psp[i].dwFlags = PSP_DLGINDIRECT;
     979    psp[i].hInstance = GetWindowInstance(hwnd);
     980    psp[i].pResource = static_cast<PROPSHEETPAGE_RESOURCE>(ActiveBasic::Resource::LoadResourceAlt(hResInst, IDD_PJ_OPTION1, RT_DIALOG));
     981    psp[i].pfnDlgProc = DlgProjectOption_Whole;
    982982    hpsp[i]=CreatePropertySheetPage(&psp[i]);
    983983    i++;
    984984    psp[i].dwSize=sizeof(PROPSHEETPAGE);
    985     psp[i].dwFlags=PSP_DEFAULT;
    986     psp[i].hInstance=hResInst;
    987     psp[i].pszTemplate=MAKEINTRESOURCE(IDD_PJ_OPTION2);
    988     psp[i].pfnDlgProc=(DLGPROC)DlgProjectOption_Win32API;
     985    psp[i].dwFlags=PSP_DLGINDIRECT;
     986    psp[i].hInstance = GetWindowInstance(hwnd);
     987    psp[i].pResource = static_cast<PROPSHEETPAGE_RESOURCE>(ActiveBasic::Resource::LoadResourceAlt(hResInst, IDD_PJ_OPTION2, RT_DIALOG));
     988    psp[i].pfnDlgProc = DlgProjectOption_Win32API;
    989989    hpsp[i]=CreatePropertySheetPage(&psp[i]);
    990990    i++;
    991991    psp[i].dwSize=sizeof(PROPSHEETPAGE);
    992     psp[i].dwFlags=PSP_DEFAULT;
    993     psp[i].hInstance=hResInst;
    994     psp[i].pszTemplate=MAKEINTRESOURCE(IDD_PJ_OPTION3);
    995     psp[i].pfnDlgProc=(DLGPROC)DlgProjectOption_Manifest;
     992    psp[i].dwFlags = PSP_DLGINDIRECT;
     993    psp[i].hInstance = GetWindowInstance(hwnd);
     994    psp[i].pResource = static_cast<PROPSHEETPAGE_RESOURCE>(ActiveBasic::Resource::LoadResourceAlt(hResInst, IDD_PJ_OPTION3, RT_DIALOG));
     995    psp[i].pfnDlgProc = DlgProjectOption_Manifest;
    996996    hpsp[i]=CreatePropertySheetPage(&psp[i]);
    997997    i++;
    998998    psp[i].dwSize=sizeof(PROPSHEETPAGE);
    999     psp[i].dwFlags=PSP_DEFAULT;
    1000     psp[i].hInstance=hResInst;
    1001     psp[i].pszTemplate=MAKEINTRESOURCE(IDD_PJ_OPTION4);
    1002     psp[i].pfnDlgProc=(DLGPROC)DlgProjectOption_Debug;
     999    psp[i].dwFlags = PSP_DLGINDIRECT;
     1000    psp[i].hInstance = GetWindowInstance(hwnd);
     1001    psp[i].pResource = static_cast<PROPSHEETPAGE_RESOURCE>(ActiveBasic::Resource::LoadResourceAlt(hResInst, IDD_PJ_OPTION4, RT_DIALOG));
     1002    psp[i].pfnDlgProc = DlgProjectOption_Debug;
    10031003    hpsp[i]=CreatePropertySheetPage(&psp[i]);
    10041004
    … …  
    19551955    return 0;
    19561956}
     1957PROPSHEETPAGE_RESOURCE LoadTest(HINSTANCE hinst, USHORT id, LPCTSTR type)
     1958{
     1959    auto t = ActiveBasic::Resource::LoadResourceAltWithSize(hResInst, id, type);
     1960    auto p = malloc(t.second);
     1961    memcpy(p, t.first, t.second);
     1962    return static_cast<PROPSHEETPAGE_RESOURCE>(p);
     1963}
    19571964void DlgOptionSetting(HWND hwnd){
    1958     PROPSHEETHEADER psh;
     1965    HINSTANCE hinst = GetWindowInstance(hwnd);
     1966    PROPSHEETHEADER psh = {};
    19591967#define MAX_SETDLG 32
    1960     PROPSHEETPAGE psp[MAX_SETDLG];
    1961     HPROPSHEETPAGE hpsp[MAX_SETDLG];
     1968    PROPSHEETPAGE psp[MAX_SETDLG] = {};
     1969    HPROPSHEETPAGE hpsp[MAX_SETDLG] = {};
    19621970    int i;
    19631971
    … …  
    19701978    i=0;
    19711979
     1980
    19721981    //各ページのセッティング
    19731982    psp[i].dwSize=sizeof(PROPSHEETPAGE);
    1974     psp[i].dwFlags=PSP_DEFAULT;
    1975     psp[i].hInstance=hResInst;
    1976     psp[i].pszTemplate=MAKEINTRESOURCE(IDD_OPTION_WHOLE);
    1977     psp[i].pfnDlgProc=(DLGPROC)Dlg_Option_Whole;
     1983    psp[i].dwFlags=PSP_DLGINDIRECT;
     1984    psp[i].hInstance=hinst;
     1985    psp[i].pResource = static_cast<PROPSHEETPAGE_RESOURCE>(LoadTest(hResInst, IDD_OPTION_WHOLE, RT_DIALOG));
     1986    psp[i].pfnDlgProc=Dlg_Option_Whole;
    19781987    hpsp[i]=CreatePropertySheetPage(&psp[i]);
    19791988    i++;
    19801989    psp[i].dwSize=sizeof(PROPSHEETPAGE);
    1981     psp[i].dwFlags=PSP_DEFAULT;
    1982     psp[i].hInstance=hResInst;
    1983     psp[i].pszTemplate=MAKEINTRESOURCE(IDD_OPTION_EDITOR);
    1984     psp[i].pfnDlgProc=(DLGPROC)Dlg_Option_Editor;
     1990    psp[i].dwFlags=PSP_DLGINDIRECT;
     1991    psp[i].hInstance=hinst;
     1992    psp[i].pResource = static_cast<PROPSHEETPAGE_RESOURCE>(LoadTest(hResInst, IDD_OPTION_EDITOR, RT_DIALOG));
     1993    psp[i].pfnDlgProc=Dlg_Option_Editor;
    19851994    hpsp[i]=CreatePropertySheetPage(&psp[i]);
    19861995    i++;
    19871996    psp[i].dwSize=sizeof(PROPSHEETPAGE);
    1988     psp[i].dwFlags=PSP_DEFAULT;
    1989     psp[i].hInstance=hResInst;
    1990     psp[i].pszTemplate=MAKEINTRESOURCE(IDD_OPTION_COLOR);
    1991     psp[i].pfnDlgProc=(DLGPROC)Dlg_Option_Color;
     1997    psp[i].dwFlags=PSP_DLGINDIRECT;
     1998    psp[i].hInstance=hinst;
     1999    psp[i].pResource = static_cast<PROPSHEETPAGE_RESOURCE>(LoadTest(hResInst, IDD_OPTION_COLOR, RT_DIALOG));
     2000    psp[i].pfnDlgProc=Dlg_Option_Color;
    19922001    hpsp[i]=CreatePropertySheetPage(&psp[i]);
    19932002    i++;
    19942003    psp[i].dwSize=sizeof(PROPSHEETPAGE);
    1995     psp[i].dwFlags=PSP_DEFAULT;
    1996     psp[i].hInstance=hResInst;
    1997     psp[i].pszTemplate=MAKEINTRESOURCE(IDD_OPTION_TOOLBAR);
    1998     psp[i].pfnDlgProc=(DLGPROC)Dlg_Option_Toolbar;
     2004    psp[i].dwFlags=PSP_DLGINDIRECT;
     2005    psp[i].hInstance=hinst;
     2006    psp[i].pResource = static_cast<PROPSHEETPAGE_RESOURCE>(LoadTest(hResInst, IDD_OPTION_TOOLBAR, RT_DIALOG));
     2007    psp[i].pfnDlgProc=Dlg_Option_Toolbar;
    19992008    hpsp[i]=CreatePropertySheetPage(&psp[i]);
    20002009
    … …  
    20032012    i++;
    20042013    psp[i].dwSize=sizeof(PROPSHEETPAGE);
    2005     psp[i].dwFlags=PSP_DEFAULT;
    2006     psp[i].hInstance=hResInst;
    2007     psp[i].pszTemplate=MAKEINTRESOURCE(IDD_OPTION_RAD);
    2008     psp[i].pfnDlgProc=(DLGPROC)Dlg_Option_Rad;
     2014    psp[i].dwFlags=PSP_DLGINDIRECT;
     2015    psp[i].hInstance=hinst;
     2016    psp[i].pResource = static_cast<PROPSHEETPAGE_RESOURCE>(LoadTest(hResInst, IDD_OPTION_RAD, RT_DIALOG));
     2017    psp[i].pfnDlgProc=Dlg_Option_Rad;
    20092018    hpsp[i]=CreatePropertySheetPage(&psp[i]);
    20102019#endif
    … …  
    20392048#ifndef THETEXT
    20402049        //ライブラリ開発チーム
    2041         LoadString(hResInst,IDS_DEV_GROUP,temporary,1024);
    2042         SetDlgItemText(hwnd,IDC_DEV_GROUP,temporary);
     2050        boost::optional<std::wstring> devGroup = ActiveBasic::Resource::LoadStringAlt(hResInst, IDS_DEV_GROUP);
     2051        if (devGroup)
     2052        {
     2053            SetDlgItemTextW(hwnd, IDC_DEV_GROUP, devGroup->c_str());
     2054        }
    20432055#endif
    20442056        ApplyDialogTexture(hwnd);

  • trunk/ab5.0/abdev/abdev/DrawBuffer.cpp

    r772 r828  
    222222
    223223                if(bBreakPoint){
    224                     DrawIconEx(memdc,3,i*font_height+(font_height-16)/2,
    225                         (HICON)LoadImage(hIconResInst,MAKEINTRESOURCE(IDI_BREAKPOINT_FLAG),IMAGE_ICON,16,16,LR_SHARED),
    226                         16,16,0,NULL,DI_NORMAL);
     224                    ActiveBasic::Resource::UniqueHIcon hicon(ActiveBasic::Resource::LoadIconAlt(hIconResInst, IDI_BREAKPOINT_FLAG, 16, 16));
     225                    DrawIconEx(memdc,3,i*font_height+(font_height-16)/2,hicon.get(),16,16,0,NULL,DI_NORMAL);
    227226                }
    228227                else{
    … …  
    272271    }
    273272};
     273
     274static bool IsRemoteSession()
     275{
     276    OSVERSIONINFO vi = {sizeof vi};
     277    BOOL ret = ::GetVersionEx(&vi);
     278    if (ret && vi.dwMajorVersion >= 5)
     279    {
     280        const int SM_REMOTESESSION = 0x1000;
     281        return GetSystemMetrics(SM_REMOTESESSION);
     282    }
     283    return false;
     284}
    274285
    275286void TextEdit_DrawBuffer(HDC hdc,int WndNum,bool drawDirectly){
    … …  
    307318        OnePage_CharHeight,
    308319        iLineNumberTextCount,
    309         drawDirectly || GetSystemMetrics(SM_REMOTESESSION));
     320        drawDirectly || IsRemoteSession());
    310321
    311322

  • trunk/ab5.0/abdev/abdev/ExtensionLink.cpp

    r717 r828  
    430430            switch(LOWORD(wParam)){
    431431                case IDC_ADD_BUTTON:
    432                     if(!DialogBoxParam(hResInst,MAKEINTRESOURCE(IDD_EXTENSION_ADD),hwnd,(DLGPROC)DlgFileLinkAdd,0)) return 1;
     432                    if (!ActiveBasic::Resource::DialogBoxAlt(hResInst, IDD_EXTENSION_ADD, hwnd, DlgFileLinkAdd))
     433                    {
     434                        return 1;
     435                    }
    433436
    434437                    pobj_nv->pobj_ExtLink->ResetListView(GetDlgItem(hwnd,IDC_EXTENSION_LIST));
    … …  
    445448                    if(i==ListView_GetItemCount(hListView)) return 1;
    446449
    447                     if(!DialogBoxParam(hResInst,MAKEINTRESOURCE(IDD_EXTENSION_ADD),hwnd,(DLGPROC)DlgFileLinkAdd,(LPARAM)pobj_nv->pobj_ExtLink->ppobj_ExtItems[i])) return 1;
     450                    if (!ActiveBasic::Resource::DialogBoxAlt(hResInst, IDD_EXTENSION_ADD, hwnd, DlgFileLinkAdd,(LPARAM)pobj_nv->pobj_ExtLink->ppobj_ExtItems[i]))
     451                    {
     452                        return 1;
     453                    }
    448454
    449455                    pobj_nv->pobj_ExtLink->ResetListView(GetDlgItem(hwnd,IDC_EXTENSION_LIST));
    … …  
    516522    pobj_nv->save();
    517523
    518     if(DialogBox(hResInst,MAKEINTRESOURCE(IDD_EXTENSION_LINK),hwnd,(DLGPROC)DlgLinkFile)==0) return;
     524    if (ActiveBasic::Resource::DialogBoxAlt(hResInst, IDD_EXTENSION_LINK, hwnd, DlgLinkFile)==0)
     525    {
     526        return;
     527    }
    519528
    520529    char szApplicationPath[MAX_PATH];

  • trunk/ab5.0/abdev/abdev/FileOperation.cpp

    r772 r828  
    190190}
    191191
    192 BOOL GetFilePathDialog(HWND hwnd,char *filename,LPSTR Filter,LPSTR Title,_int8 IsOpen){
     192BOOL GetFilePathDialog(HWND hwnd,char *filename,LPCSTR Filter,LPCSTR Title,BOOL IsOpen){
    193193    OPENFILENAME ofstr;
    194194    filename[0]=0;
    … …  
    345345BOOL SaveDocument(HWND hChild,char *SaveFileName){  //ウィンドウからバッファを読み取り、ファイルに保存
    346346    //SaveFileNameがNULLのときは上書き保存を試みる。
    347     extern LPSTR IconFileFilter;
     347    extern const LPCSTR IconFileFilter;
    348348    extern HWND hClient,hDocCombo;
    349349    int WndNum,i2;
    … …  
    415415get_file_path:
    416416
    417                 LPSTR ff;
    418 
    419                 extern LPSTR DefFileFilter;
    420                 extern LPSTR HtmlFileFilter;
    421                 extern LPSTR TextFileFilter;
     417                LPCSTR ff;
     418
     419                extern const LPCSTR DefFileFilter;
     420                extern const LPCSTR HtmlFileFilter;
     421                extern const LPCSTR TextFileFilter;
    422422                if(MdiInfo[WndNum]->DocType==WNDTYPE_BASIC)
    423423                    ff=DefFileFilter;

  • trunk/ab5.0/abdev/abdev/FileTree.cpp

    r705 r828  
    9898                case IDM_FILETREE_INSERT:
    9999                    //"プロジェクトへ挿入するファイルを指定して下さい"
    100                     extern LPSTR DefFileFilter;
     100                    extern const LPCSTR DefFileFilter;
    101101                    if(!GetFilePathDialog(hOwner,temporary,DefFileFilter,STRING_FILEOPENTITLE_INSERTEDPROJECT,1)) break;
    102102                    Project_File_Insert(temporary);
    … …  
    124124                    break;
    125125                case IDM_FILETREE_PROPERTY:
    126                     DialogBox(hResInst,MAKEINTRESOURCE(IDD_PROJECT_FILEPROPERTY),hOwner,(DLGPROC)DlgProject_FileProperty);
     126                    ActiveBasic::Resource::DialogBoxAlt(hResInst, IDD_PROJECT_FILEPROPERTY, hOwner, DlgProject_FileProperty);
    127127                    break;
    128128            }
    … …  
    160160    //イメージリスト読み込み、設定
    161161    hImageList=ImageList_Create(16,16,ILC_COLOR24|ILC_MASK,3,0);
    162     ImageList_AddIcon(hImageList,LoadIcon(hResInst,MAKEINTRESOURCE(IDI_FOLDER_CLOSE)));
    163     ImageList_AddIcon(hImageList,LoadIcon(hResInst,MAKEINTRESOURCE(IDI_FOLDER_OPEN)));
    164     ImageList_AddIcon(hImageList,LoadIcon(hResInst,MAKEINTRESOURCE(IDI_TEXTDOCUMENT)));
     162    ImageList_AddIcon(hImageList, ActiveBasic::Resource::LoadIconAlt(hResInst, IDI_FOLDER_CLOSE));
     163    ImageList_AddIcon(hImageList, ActiveBasic::Resource::LoadIconAlt(hResInst, IDI_FOLDER_OPEN));
     164    ImageList_AddIcon(hImageList, ActiveBasic::Resource::LoadIconAlt(hResInst, IDI_TEXTDOCUMENT));
    165165    this->SetImageList(hImageList,TVSIL_NORMAL);
    166166}

  • trunk/ab5.0/abdev/abdev/IconEditor.cpp

    r772 r828  
    360360    //ツールダイアログ部分を作成
    361361    HWND hToolDlg;
    362     hToolDlg=CreateDialog(hResInst,MAKEINTRESOURCE(IDD_ICONEDIT_TOOL),hChild,(DLGPROC)DlgIconToolProc);
     362    hToolDlg=ActiveBasic::Resource::CreateDialogAlt(hResInst, IDD_ICONEDIT_TOOL, hChild, DlgIconToolProc);
    363363
    364364    //ツールダイアログのボタン部分を作成
    365365    HWND hButtonsDlg;
    366     hButtonsDlg=CreateDialog(hResInst,MAKEINTRESOURCE(IDD_ICONEDIT_BUTTONS),hToolDlg,(DLGPROC)DlgIconButtons);
     366    hButtonsDlg=ActiveBasic::Resource::CreateDialogAlt(hResInst, IDD_ICONEDIT_BUTTONS, hToolDlg, DlgIconButtons);
    367367
    368368    //カラーテーブルダイアログ部分を作成
    369369    HWND hColorDlg;
    370     hColorDlg=CreateDialog(hResInst,MAKEINTRESOURCE(IDD_ICONEDIT_COLOR),hChild,(DLGPROC)DlgIconColorProc);
     370    hColorDlg=ActiveBasic::Resource::CreateDialogAlt(hResInst, IDD_ICONEDIT_COLOR, hChild, DlgIconColorProc);
    371371
    372372    //ウィンドウのID登録

  • trunk/ab5.0/abdev/abdev/IconEditor_Main.cpp

    r629 r828  
    11991199                InvalidateRect(hwnd,NULL,0);
    12001200
    1201                 SetCursor(LoadCursor(hResInst,MAKEINTRESOURCE(IDC_CURSOR_PEN)));
     1201                SetCursor(ActiveBasic::Resource::LoadCursorAlt(hResInst, IDC_CURSOR_PEN));
    12021202            }
    12031203            else if(MdiInfo[WndNum]->MdiIconEditInfo->NowTool==IDC_TOOL_FILL){
    … …  
    12141214                    InvalidateRect(hwnd,NULL,0);
    12151215                }
    1216                 SetCursor(LoadCursor(hResInst,MAKEINTRESOURCE(IDC_CURSOR_FILL)));
     1216                SetCursor(ActiveBasic::Resource::LoadCursorAlt(hResInst, IDC_CURSOR_FILL));
    12171217            }
    12181218            else if(MdiInfo[WndNum]->MdiIconEditInfo->NowTool==IDC_TOOL_LINE||
    … …  
    14961496                }
    14971497                else if(MdiInfo[WndNum]->MdiIconEditInfo->NowTool==IDC_TOOL_PEN)
    1498                     SetCursor(LoadCursor(hResInst,MAKEINTRESOURCE(IDC_CURSOR_PEN)));
     1498                    SetCursor(ActiveBasic::Resource::LoadCursorAlt(hResInst, IDC_CURSOR_PEN));
    14991499                else if(MdiInfo[WndNum]->MdiIconEditInfo->NowTool==IDC_TOOL_FILL)
    1500                     SetCursor(LoadCursor(hResInst,MAKEINTRESOURCE(IDC_CURSOR_FILL)));
     1500                    SetCursor(ActiveBasic::Resource::LoadCursorAlt(hResInst, IDC_CURSOR_FILL));
    15011501                else if(MdiInfo[WndNum]->MdiIconEditInfo->NowTool==IDC_TOOL_LINE||
    15021502                    MdiInfo[WndNum]->MdiIconEditInfo->NowTool==IDC_TOOL_RECTANGLE||

  • trunk/ab5.0/abdev/abdev/IconEditor_Tool.cpp

    r763 r828  
    5555
    5656            hToolBar=CreateToolbarEx(hwnd,WS_CHILD|WS_VISIBLE|CCS_NODIVIDER|TBSTYLE_FLAT|TBSTYLE_TOOLTIPS,
    57                 NULL,
     57                0,
    5858                BMPNUM_ICONTOOLBAR, /*ビットマップの個数*/
    59                 hResInst,(unsigned int)MAKEINTRESOURCE(IDR_ICONTOOLBAR),IconToolBar,
     59                nullptr,
     60                reinterpret_cast<UINT_PTR>(ActiveBasic::Resource::LoadBitmapAlt(hResInst, IDR_ICONTOOLBAR)),
     61                IconToolBar,
    6062                BMPNUM_ICONTOOLBAR, /*アイテムの個数*/
    6163                0,0,16,15,sizeof(TBBUTTON));
    … …  
    188190            switch(LOWORD(wParam)){
    189191                case IDC_ADD_ICONTYPE:
    190                     i=DialogBox(hResInst,MAKEINTRESOURCE(IDD_ICONEDIT_ICONTYPE),GetParent(hwnd),DlgIconType);
     192                    i = ActiveBasic::Resource::DialogBoxAlt(hResInst, IDD_ICONEDIT_ICONTYPE, GetParent(hwnd), DlgIconType);
    191193                    if(i==-1) return 1;
    192194

  • trunk/ab5.0/abdev/abdev/MenuProc.cpp

    r772 r828  
    7373    MENU_INFO *MenuInfo;
    7474
    75     if(!DialogBoxParam(hResInst,MAKEINTRESOURCE(IDD_INPUTID),hOwner,(DLGPROC)DlgProject_MenuID_Input,0)) return;
     75    if (!ActiveBasic::Resource::DialogBoxAlt(hResInst, IDD_INPUTID, hOwner, DlgProject_MenuID_Input))
     76    {
     77        return;
     78    }
    7679
    7780    //重複チェック
    … …  
    265268
    266269    MdiInfo[i]->MdiMenuInfo->hMenuEdit=hMenuEdit;
    267     MdiInfo[i]->MdiMenuInfo->hEdit_Dlg=CreateDialog(hResInst,MAKEINTRESOURCE(IDD_PROJECT_MENUEDIT),hMenuEdit,(DLGPROC)MenuEditDlg);
     270    MdiInfo[i]->MdiMenuInfo->hEdit_Dlg = ActiveBasic::Resource::CreateDialogAlt(hResInst, IDD_PROJECT_MENUEDIT, hMenuEdit, MenuEditDlg);
    268271
    269272    SCROLLINFO ScrollInfo;
    … …  
    406409                    pMenuInfo=&pMenuInfo->pMenuInfo[i2];
    407410
    408                     if(!DialogBoxParam(hResInst,MAKEINTRESOURCE(IDD_PROJECT_MENURENAME),hOwner,(DLGPROC)DlgMenuProperty_Rename,(long)pMenuInfo)) return 1;
     411                    if (!ActiveBasic::Resource::DialogBoxAlt(hResInst, IDD_PROJECT_MENURENAME, hOwner, DlgMenuProperty_Rename, reinterpret_cast<LPARAM>(pMenuInfo)))
     412                    {
     413                        return 1;
     414                    }
    409415                    GetDlgItemText(hwnd,IDC_IDNAME,temporary,MAX_PATH);
    410416

  • trunk/ab5.0/abdev/abdev/NonVolatile.h

    r480 r828  
    11
    22
    3 class CNonVolatile:public CSettingFile{
     3class CNonVolatile : public CSettingFile, boost::noncopyable
     4{
    45    void InitToDefaultData();
    56

  • trunk/ab5.0/abdev/abdev/ParameterHint.cpp

    r713 r828  
    10961096            HBITMAP hBmp,hOldBmp;
    10971097            HDC memdc;
    1098             hBmp=(HBITMAP)LoadImage(hResInst,MAKEINTRESOURCE(IDB_PARAMHINT_QUESTION),IMAGE_BITMAP,0,0,LR_DEFAULTSIZE);
     1098            hBmp = ActiveBasic::Resource::LoadBitmapAlt(hResInst, IDB_PARAMHINT_QUESTION);
    10991099            memdc=CreateCompatibleDC(hdc);
    11001100            hOldBmp=(HBITMAP)SelectObject(memdc,hBmp);
    … …  
    11191119                hdc=GetDC(hwnd);
    11201120
    1121                 hBmp=(HBITMAP)LoadImage(hResInst,MAKEINTRESOURCE(IDB_PARAMHINT_QUESTION2),IMAGE_BITMAP,0,0,LR_DEFAULTSIZE);
     1121                hBmp = ActiveBasic::Resource::LoadBitmapAlt(hResInst,IDB_PARAMHINT_QUESTION2);
    11221122                memdc=CreateCompatibleDC(hdc);
    11231123                hOldBmp=(HBITMAP)SelectObject(memdc,hBmp);
    … …  
    11371137                hdc=GetDC(hwnd);
    11381138
    1139                 hBmp=(HBITMAP)LoadImage(hResInst,MAKEINTRESOURCE(IDB_PARAMHINT_QUESTION),IMAGE_BITMAP,0,0,LR_DEFAULTSIZE);
     1139                hBmp = ActiveBasic::Resource::LoadBitmapAlt(hResInst, IDB_PARAMHINT_QUESTION);
    11401140                memdc=CreateCompatibleDC(hdc);
    11411141                hOldBmp=(HBITMAP)SelectObject(memdc,hBmp);

  • trunk/ab5.0/abdev/abdev/Print.cpp

    r763 r828  
    421421            //拡大・縮小アイコンを表示
    422422            SendDlgItemMessage(hwnd,IDC_ZOOMOUT,BM_SETIMAGE,IMAGE_ICON ,
    423                 (LPARAM)LoadImage(hResInst,MAKEINTRESOURCE(IDI_ZOOMOUT),IMAGE_ICON,16,16,LR_SHARED));
     423                reinterpret_cast<LPARAM>(ActiveBasic::Resource::LoadIconAlt(hResInst, IDI_ZOOMOUT, 16, 16, LR_SHARED)));
    424424            SendDlgItemMessage(hwnd,IDC_ZOOMIN,BM_SETIMAGE,IMAGE_ICON ,
    425                 (LPARAM)LoadImage(hResInst,MAKEINTRESOURCE(IDI_ZOOMIN),IMAGE_ICON,16,16,LR_SHARED));
     425                reinterpret_cast<LPARAM>(ActiveBasic::Resource::LoadIconAlt(hResInst, IDI_ZOOMIN, 16, 16, LR_SHARED)));
    426426            iZoomNowPage=ZOOM_INIT;
    427427
    … …  
    522522
    523523void Preview(void){
    524     DialogBox(hResInst,MAKEINTRESOURCE(IDD_PREVIEW),hOwner,DlgPreview);
     524    ActiveBasic::Resource::DialogBoxAlt(hResInst, IDD_PREVIEW, hOwner, DlgPreview);
    525525}
    526526

  • trunk/ab5.0/abdev/abdev/ProjectControl.cpp

    r705 r828  
    4242LRESULT CALLBACK TabProc(HWND hwnd,UINT message,WPARAM wParam,LPARAM lParam){
    4343    extern HANDLE hHeap;
    44     extern LPSTR DefFileFilter;
     44    extern const LPCSTR DefFileFilter;
    4545    int i,i2,WndNum;
    4646    char str[MAX_PATH],temporary[MAX_PATH];
    … …  
    281281                    for(i=0;i<projectInfo.NumberOfMenu;i++){
    282282                        if(projectInfo.pMenuInfo[i].hTreeItem==hTreeItem){
    283                             if(!DialogBoxParam(hResInst,MAKEINTRESOURCE(IDD_INPUTID),hOwner,(DLGPROC)DlgProject_MenuID_Input,(long)projectInfo.pMenuInfo[i].IdName)) break;
     283                            if (!ActiveBasic::Resource::DialogBoxAlt(hResInst,IDD_INPUTID, hOwner, DlgProject_MenuID_Input, reinterpret_cast<LPARAM>(projectInfo.pMenuInfo[i].IdName)))
     284                            {
     285                                break;
     286                            }
    284287
    285288                            //重複チェック
    … …  
    466469            //イメージリスト読み込み、設定
    467470            hProcedureTreeViewImageList=ImageList_Create(16,16,ILC_COLOR24|ILC_MASK,8,0);
    468             ImageList_AddIcon(hProcedureTreeViewImageList,LoadIcon(hResInst,MAKEINTRESOURCE(IDI_FOLDER_CLOSE)));
    469             ImageList_AddIcon(hProcedureTreeViewImageList,LoadIcon(hResInst,MAKEINTRESOURCE(IDI_FOLDER_OPEN)));
    470             ImageList_AddIcon(hProcedureTreeViewImageList,LoadIcon(hResInst,MAKEINTRESOURCE(IDI_PROCEDURE)));
    471             ImageList_AddIcon(hProcedureTreeViewImageList,LoadIcon(hResInst,MAKEINTRESOURCE(IDI_PROGRAM_FOLDER)));
    472             ImageList_AddIcon(hProcedureTreeViewImageList,LoadIcon(hResInst,MAKEINTRESOURCE(IDI_MEMBER_PUBLIC_VARIABLE)));
    473             ImageList_AddIcon(hProcedureTreeViewImageList,LoadIcon(hResInst,MAKEINTRESOURCE(IDI_MEMBER_PUBLIC_FUNCTION)));
    474             ImageList_AddIcon(hProcedureTreeViewImageList,LoadIcon(hResInst,MAKEINTRESOURCE(IDI_MEMBER_PRIVATE_VARIABLE)));
    475             ImageList_AddIcon(hProcedureTreeViewImageList,LoadIcon(hResInst,MAKEINTRESOURCE(IDI_MEMBER_PRIVATE_FUNCTION)));
     471            ImageList_AddIcon(hProcedureTreeViewImageList, ActiveBasic::Resource::LoadIconAlt(hResInst, IDI_FOLDER_CLOSE));
     472            ImageList_AddIcon(hProcedureTreeViewImageList, ActiveBasic::Resource::LoadIconAlt(hResInst, IDI_FOLDER_OPEN));
     473            ImageList_AddIcon(hProcedureTreeViewImageList, ActiveBasic::Resource::LoadIconAlt(hResInst, IDI_PROCEDURE));
     474            ImageList_AddIcon(hProcedureTreeViewImageList, ActiveBasic::Resource::LoadIconAlt(hResInst, IDI_PROGRAM_FOLDER));
     475            ImageList_AddIcon(hProcedureTreeViewImageList, ActiveBasic::Resource::LoadIconAlt(hResInst, IDI_MEMBER_PUBLIC_VARIABLE));
     476            ImageList_AddIcon(hProcedureTreeViewImageList, ActiveBasic::Resource::LoadIconAlt(hResInst, IDI_MEMBER_PUBLIC_FUNCTION));
     477            ImageList_AddIcon(hProcedureTreeViewImageList, ActiveBasic::Resource::LoadIconAlt(hResInst, IDI_MEMBER_PRIVATE_VARIABLE));
     478            ImageList_AddIcon(hProcedureTreeViewImageList, ActiveBasic::Resource::LoadIconAlt(hResInst, IDI_MEMBER_PRIVATE_FUNCTION));
    476479            TreeView_SetImageList(hProcedureTreeView,hProcedureTreeViewImageList,TVSIL_NORMAL);
    477480
    … …  
    485488            //イメージリスト読み込み、設定
    486489            hMaterialTreeViewImageList=ImageList_Create(16,16,ILC_COLOR24|ILC_MASK,3,0);
    487             ImageList_AddIcon(hMaterialTreeViewImageList,LoadIcon(hResInst,MAKEINTRESOURCE(IDI_FOLDER_CLOSE)));
    488             ImageList_AddIcon(hMaterialTreeViewImageList,LoadIcon(hResInst,MAKEINTRESOURCE(IDI_FOLDER_OPEN)));
    489             ImageList_AddIcon(hMaterialTreeViewImageList,LoadIcon(hResInst,MAKEINTRESOURCE(IDI_WINDOW)));
    490             ImageList_AddIcon(hMaterialTreeViewImageList,LoadIcon(hResInst,MAKEINTRESOURCE(IDI_MENU)));
    491             ImageList_AddIcon(hMaterialTreeViewImageList,LoadIcon(hResInst,MAKEINTRESOURCE(IDI_FILE_ICON)));
    492             ImageList_AddIcon(hMaterialTreeViewImageList,LoadIcon(hResInst,MAKEINTRESOURCE(IDI_FILE_BMP)));
    493             ImageList_AddIcon(hMaterialTreeViewImageList,LoadIcon(hResInst,MAKEINTRESOURCE(IDI_FILE_CURSOR)));
     490            ImageList_AddIcon(hMaterialTreeViewImageList, ActiveBasic::Resource::LoadIconAlt(hResInst, IDI_FOLDER_CLOSE));
     491            ImageList_AddIcon(hMaterialTreeViewImageList, ActiveBasic::Resource::LoadIconAlt(hResInst, IDI_FOLDER_OPEN));
     492            ImageList_AddIcon(hMaterialTreeViewImageList, ActiveBasic::Resource::LoadIconAlt(hResInst, IDI_WINDOW));
     493            ImageList_AddIcon(hMaterialTreeViewImageList, ActiveBasic::Resource::LoadIconAlt(hResInst, IDI_MENU));
     494            ImageList_AddIcon(hMaterialTreeViewImageList, ActiveBasic::Resource::LoadIconAlt(hResInst, IDI_FILE_ICON));
     495            ImageList_AddIcon(hMaterialTreeViewImageList, ActiveBasic::Resource::LoadIconAlt(hResInst, IDI_FILE_BMP));
     496            ImageList_AddIcon(hMaterialTreeViewImageList, ActiveBasic::Resource::LoadIconAlt(hResInst, IDI_FILE_CURSOR));
    494497            TreeView_SetImageList(hMaterialTreeView,hMaterialTreeViewImageList,TVSIL_NORMAL);
    495498

  • trunk/ab5.0/abdev/abdev/RadProc.cpp

    r772 r828  
    7777    //サポートウィンドウを作成
    7878    HWND hSupport;
    79     hSupport=CreateDialog(hResInst,MAKEINTRESOURCE(IDD_RAD_SUPPORT),hChild,(DLGPROC)DlgRadSupport);
     79    hSupport = ActiveBasic::Resource::CreateDialogAlt(hResInst, IDD_RAD_SUPPORT, hChild, DlgRadSupport);
    8080
    8181    //ウィンドウのID登録
    … …  
    9898    MdiInfo[i]->MdiRadInfo->hTools=hTools;
    9999    MdiInfo[i]->MdiRadInfo->hProperty=hProperty;
    100     MdiInfo[i]->MdiRadInfo->hProp_Dlg=CreateDialog(hResInst,MAKEINTRESOURCE(IDD_RAD_PROP_WINDOW),hProperty,(DLGPROC)RadProperty_WindowProc);
     100    MdiInfo[i]->MdiRadInfo->hProp_Dlg = ActiveBasic::Resource::CreateDialogAlt(hResInst, IDD_RAD_PROP_WINDOW, hProperty, RadProperty_WindowProc);
    101101
    102102    SCROLLINFO ScrollInfo;
    … …  
    288288    //プロパティウィンドウを設定
    289289    DestroyWindow(MdiInfo[WndNum]->MdiRadInfo->hProp_Dlg);
    290     MdiInfo[WndNum]->MdiRadInfo->hProp_Dlg=CreateDialog(hResInst,MAKEINTRESOURCE(IDD_RAD_PROP_WINDOW),MdiInfo[WndNum]->MdiRadInfo->hProperty,(DLGPROC)RadProperty_WindowProc);
     290    MdiInfo[WndNum]->MdiRadInfo->hProp_Dlg = ActiveBasic::Resource::CreateDialogAlt(hResInst, IDD_RAD_PROP_WINDOW, MdiInfo[WndNum]->MdiRadInfo->hProperty, RadProperty_WindowProc);
    291291
    292292    SCROLLINFO ScrollInfo;
    … …  
    538538    DestroyWindow(MdiInfo[WndNum]->MdiRadInfo->hProp_Dlg);
    539539    if(MdiInfo[WndNum]->MdiRadInfo->SelectingItem[0]==SELECT_WINDOW){
    540         MdiInfo[WndNum]->MdiRadInfo->hProp_Dlg=CreateDialog(hResInst,MAKEINTRESOURCE(IDD_RAD_PROP_WINDOW),MdiInfo[WndNum]->MdiRadInfo->hProperty,(DLGPROC)RadProperty_WindowProc);
     540        MdiInfo[WndNum]->MdiRadInfo->hProp_Dlg = ActiveBasic::Resource::CreateDialogAlt(hResInst, IDD_RAD_PROP_WINDOW, MdiInfo[WndNum]->MdiRadInfo->hProperty, RadProperty_WindowProc);
    541541
    542542        ScrollInfo.cbSize=sizeof(SCROLLINFO);
    … …  
    550550    else{
    551551        if(pWindowInfo->childWindowInfos[MdiInfo[WndNum]->MdiRadInfo->SelectingItem[0]]->Control==CT_BUTTON)
    552             MdiInfo[WndNum]->MdiRadInfo->hProp_Dlg=CreateDialog(hResInst,MAKEINTRESOURCE(IDD_RAD_PROP_BUTTON),MdiInfo[WndNum]->MdiRadInfo->hProperty,(DLGPROC)RadProperty_ButtonProc);
     552            MdiInfo[WndNum]->MdiRadInfo->hProp_Dlg=ActiveBasic::Resource::CreateDialogAlt(hResInst, IDD_RAD_PROP_BUTTON, MdiInfo[WndNum]->MdiRadInfo->hProperty, RadProperty_ButtonProc);
    553553        else if(pWindowInfo->childWindowInfos[MdiInfo[WndNum]->MdiRadInfo->SelectingItem[0]]->Control==CT_CHECKBOX)
    554             MdiInfo[WndNum]->MdiRadInfo->hProp_Dlg=CreateDialog(hResInst,MAKEINTRESOURCE(IDD_RAD_PROP_CHECKBOX),MdiInfo[WndNum]->MdiRadInfo->hProperty,(DLGPROC)RadProperty_CheckBoxProc);
     554            MdiInfo[WndNum]->MdiRadInfo->hProp_Dlg=ActiveBasic::Resource::CreateDialogAlt(hResInst, IDD_RAD_PROP_CHECKBOX, MdiInfo[WndNum]->MdiRadInfo->hProperty, RadProperty_CheckBoxProc);
    555555        else if(pWindowInfo->childWindowInfos[MdiInfo[WndNum]->MdiRadInfo->SelectingItem[0]]->Control==CT_COMBOBOX)
    556             MdiInfo[WndNum]->MdiRadInfo->hProp_Dlg=CreateDialog(hResInst,MAKEINTRESOURCE(IDD_RAD_PROP_COMBOBOX),MdiInfo[WndNum]->MdiRadInfo->hProperty,(DLGPROC)RadProperty_ComboBoxProc);
     556            MdiInfo[WndNum]->MdiRadInfo->hProp_Dlg=ActiveBasic::Resource::CreateDialogAlt(hResInst, IDD_RAD_PROP_COMBOBOX, MdiInfo[WndNum]->MdiRadInfo->hProperty, RadProperty_ComboBoxProc);
    557557        else if(pWindowInfo->childWindowInfos[MdiInfo[WndNum]->MdiRadInfo->SelectingItem[0]]->Control==CT_EDIT)
    558             MdiInfo[WndNum]->MdiRadInfo->hProp_Dlg=CreateDialog(hResInst,MAKEINTRESOURCE(IDD_RAD_PROP_EDIT),MdiInfo[WndNum]->MdiRadInfo->hProperty,(DLGPROC)RadProperty_EditProc);
     558            MdiInfo[WndNum]->MdiRadInfo->hProp_Dlg=ActiveBasic::Resource::CreateDialogAlt(hResInst, IDD_RAD_PROP_EDIT, MdiInfo[WndNum]->MdiRadInfo->hProperty, RadProperty_EditProc);
    559559        else if(pWindowInfo->childWindowInfos[MdiInfo[WndNum]->MdiRadInfo->SelectingItem[0]]->Control==CT_GROUPBOX)
    560             MdiInfo[WndNum]->MdiRadInfo->hProp_Dlg=CreateDialog(hResInst,MAKEINTRESOURCE(IDD_RAD_PROP_GROUPBOX),MdiInfo[WndNum]->MdiRadInfo->hProperty,(DLGPROC)RadProperty_GroupBoxProc);
     560            MdiInfo[WndNum]->MdiRadInfo->hProp_Dlg=ActiveBasic::Resource::CreateDialogAlt(hResInst, IDD_RAD_PROP_GROUPBOX, MdiInfo[WndNum]->MdiRadInfo->hProperty, RadProperty_GroupBoxProc);
    561561        else if(pWindowInfo->childWindowInfos[MdiInfo[WndNum]->MdiRadInfo->SelectingItem[0]]->Control==CT_HSCROLLBAR)
    562             MdiInfo[WndNum]->MdiRadInfo->hProp_Dlg=CreateDialog(hResInst,MAKEINTRESOURCE(IDD_RAD_PROP_SCROLLBAR),MdiInfo[WndNum]->MdiRadInfo->hProperty,(DLGPROC)RadProperty_ScrollBarProc);
     562            MdiInfo[WndNum]->MdiRadInfo->hProp_Dlg=ActiveBasic::Resource::CreateDialogAlt(hResInst, IDD_RAD_PROP_SCROLLBAR, MdiInfo[WndNum]->MdiRadInfo->hProperty, RadProperty_ScrollBarProc);
    563563        else if(pWindowInfo->childWindowInfos[MdiInfo[WndNum]->MdiRadInfo->SelectingItem[0]]->Control==CT_IMAGEBOX)
    564             MdiInfo[WndNum]->MdiRadInfo->hProp_Dlg=CreateDialog(hResInst,MAKEINTRESOURCE(IDD_RAD_PROP_IMAGEBOX),MdiInfo[WndNum]->MdiRadInfo->hProperty,(DLGPROC)RadProperty_ImageBoxProc);
     564            MdiInfo[WndNum]->MdiRadInfo->hProp_Dlg=ActiveBasic::Resource::CreateDialogAlt(hResInst, IDD_RAD_PROP_IMAGEBOX, MdiInfo[WndNum]->MdiRadInfo->hProperty, RadProperty_ImageBoxProc);
    565565        else if(pWindowInfo->childWindowInfos[MdiInfo[WndNum]->MdiRadInfo->SelectingItem[0]]->Control==CT_LISTBOX)
    566             MdiInfo[WndNum]->MdiRadInfo->hProp_Dlg=CreateDialog(hResInst,MAKEINTRESOURCE(IDD_RAD_PROP_LISTBOX),MdiInfo[WndNum]->MdiRadInfo->hProperty,(DLGPROC)RadProperty_ListBoxProc);
     566            MdiInfo[WndNum]->MdiRadInfo->hProp_Dlg=ActiveBasic::Resource::CreateDialogAlt(hResInst, IDD_RAD_PROP_LISTBOX, MdiInfo[WndNum]->MdiRadInfo->hProperty, RadProperty_ListBoxProc);
    567567        else if(pWindowInfo->childWindowInfos[MdiInfo[WndNum]->MdiRadInfo->SelectingItem[0]]->Control==CT_LISTVIEW)
    568             MdiInfo[WndNum]->MdiRadInfo->hProp_Dlg=CreateDialog(hResInst,MAKEINTRESOURCE(IDD_RAD_PROP_LISTVIEW),MdiInfo[WndNum]->MdiRadInfo->hProperty,(DLGPROC)RadProperty_ListViewProc);
     568            MdiInfo[WndNum]->MdiRadInfo->hProp_Dlg=ActiveBasic::Resource::CreateDialogAlt(hResInst, IDD_RAD_PROP_LISTVIEW, MdiInfo[WndNum]->MdiRadInfo->hProperty, RadProperty_ListViewProc);
    569569        else if(pWindowInfo->childWindowInfos[MdiInfo[WndNum]->MdiRadInfo->SelectingItem[0]]->Control==CT_PROGRESSBAR)
    570             MdiInfo[WndNum]->MdiRadInfo->hProp_Dlg=CreateDialog(hResInst,MAKEINTRESOURCE(IDD_RAD_PROP_PROGRESSBAR),MdiInfo[WndNum]->MdiRadInfo->hProperty,(DLGPROC)RadProperty_ProgressBarProc);
     570            MdiInfo[WndNum]->MdiRadInfo->hProp_Dlg=ActiveBasic::Resource::CreateDialogAlt(hResInst, IDD_RAD_PROP_PROGRESSBAR, MdiInfo[WndNum]->MdiRadInfo->hProperty, RadProperty_ProgressBarProc);
    571571        else if(pWindowInfo->childWindowInfos[MdiInfo[WndNum]->MdiRadInfo->SelectingItem[0]]->Control==CT_RADIOBUTTON)
    572             MdiInfo[WndNum]->MdiRadInfo->hProp_Dlg=CreateDialog(hResInst,MAKEINTRESOURCE(IDD_RAD_PROP_RADIOBUTTON),MdiInfo[WndNum]->MdiRadInfo->hProperty,(DLGPROC)RadProperty_RadioButtonProc);
     572            MdiInfo[WndNum]->MdiRadInfo->hProp_Dlg=ActiveBasic::Resource::CreateDialogAlt(hResInst, IDD_RAD_PROP_RADIOBUTTON, MdiInfo[WndNum]->MdiRadInfo->hProperty, RadProperty_RadioButtonProc);
    573573        else if(pWindowInfo->childWindowInfos[MdiInfo[WndNum]->MdiRadInfo->SelectingItem[0]]->Control==CT_STATIC)
    574             MdiInfo[WndNum]->MdiRadInfo->hProp_Dlg=CreateDialog(hResInst,MAKEINTRESOURCE(IDD_RAD_PROP_STATIC),MdiInfo[WndNum]->MdiRadInfo->hProperty,(DLGPROC)RadProperty_StaticProc);
     574            MdiInfo[WndNum]->MdiRadInfo->hProp_Dlg=ActiveBasic::Resource::CreateDialogAlt(hResInst, IDD_RAD_PROP_STATIC, MdiInfo[WndNum]->MdiRadInfo->hProperty, RadProperty_StaticProc);
    575575        else if(pWindowInfo->childWindowInfos[MdiInfo[WndNum]->MdiRadInfo->SelectingItem[0]]->Control==CT_TRACKBAR)
    576             MdiInfo[WndNum]->MdiRadInfo->hProp_Dlg=CreateDialog(hResInst,MAKEINTRESOURCE(IDD_RAD_PROP_TRACKBAR),MdiInfo[WndNum]->MdiRadInfo->hProperty,(DLGPROC)RadProperty_TrackBarProc);
     576            MdiInfo[WndNum]->MdiRadInfo->hProp_Dlg=ActiveBasic::Resource::CreateDialogAlt(hResInst, IDD_RAD_PROP_TRACKBAR, MdiInfo[WndNum]->MdiRadInfo->hProperty, RadProperty_TrackBarProc);
    577577        else if(pWindowInfo->childWindowInfos[MdiInfo[WndNum]->MdiRadInfo->SelectingItem[0]]->Control==CT_TREEVIEW)
    578             MdiInfo[WndNum]->MdiRadInfo->hProp_Dlg=CreateDialog(hResInst,MAKEINTRESOURCE(IDD_RAD_PROP_TREEVIEW),MdiInfo[WndNum]->MdiRadInfo->hProperty,(DLGPROC)RadProperty_TreeViewProc);
     578            MdiInfo[WndNum]->MdiRadInfo->hProp_Dlg=ActiveBasic::Resource::CreateDialogAlt(hResInst, IDD_RAD_PROP_TREEVIEW, MdiInfo[WndNum]->MdiRadInfo->hProperty, RadProperty_TreeViewProc);
    579579        else if(pWindowInfo->childWindowInfos[MdiInfo[WndNum]->MdiRadInfo->SelectingItem[0]]->Control==CT_UPDOWN)
    580             MdiInfo[WndNum]->MdiRadInfo->hProp_Dlg=CreateDialog(hResInst,MAKEINTRESOURCE(IDD_RAD_PROP_UPDOWN),MdiInfo[WndNum]->MdiRadInfo->hProperty,(DLGPROC)RadProperty_UpDownProc);
     580            MdiInfo[WndNum]->MdiRadInfo->hProp_Dlg=ActiveBasic::Resource::CreateDialogAlt(hResInst, IDD_RAD_PROP_UPDOWN, MdiInfo[WndNum]->MdiRadInfo->hProperty, RadProperty_UpDownProc);
    581581        else if(pWindowInfo->childWindowInfos[MdiInfo[WndNum]->MdiRadInfo->SelectingItem[0]]->Control==CT_VSCROLLBAR)
    582             MdiInfo[WndNum]->MdiRadInfo->hProp_Dlg=CreateDialog(hResInst,MAKEINTRESOURCE(IDD_RAD_PROP_SCROLLBAR),MdiInfo[WndNum]->MdiRadInfo->hProperty,(DLGPROC)RadProperty_ScrollBarProc);
     582            MdiInfo[WndNum]->MdiRadInfo->hProp_Dlg=ActiveBasic::Resource::CreateDialogAlt(hResInst, IDD_RAD_PROP_SCROLLBAR, MdiInfo[WndNum]->MdiRadInfo->hProperty, RadProperty_ScrollBarProc);
    583583
    584584        ScrollInfo.cbSize=sizeof(SCROLLINFO);
    … …  
    18651865                case IDM_RAD_WINDOW_EVENTCODE:
    18661866                    i=GetWndNum(GetParent(hwnd));
    1867                     DialogBoxParam(hResInst,MAKEINTRESOURCE(IDD_RAD_EVENTCODE),hwnd,(DLGPROC)DlgEventCode,0);
     1867                    ActiveBasic::Resource::DialogBoxAlt(hResInst, IDD_RAD_EVENTCODE, hwnd, DlgEventCode, 0);
    18681868                    break;
    18691869                case IDM_RAD_WINDOW_MENUEVENTCODE:
    18701870                    i=GetWndNum(GetParent(hwnd));
    1871                     DialogBoxParam(hResInst,MAKEINTRESOURCE(IDD_RAD_EVENTCODE),hwnd,(DLGPROC)DlgEventCode,1);
     1871                    ActiveBasic::Resource::DialogBoxAlt(hResInst, IDD_RAD_EVENTCODE, hwnd, DlgEventCode, 1);
    18721872                    break;
    18731873                case IDM_RAD_ITEM_DELETE:

  • trunk/ab5.0/abdev/abdev/RadToolsAndPropertyProc.cpp

    r763 r828  
    135135                NULL,
    136136                BMPNUM_RADTOOLBAR,  /*ビットマップの個数*/
    137                 hResInst,(unsigned int)MAKEINTRESOURCE(IDR_CONTROL),CtrlToolBar,
     137                nullptr,
     138                reinterpret_cast<UINT_PTR>(ActiveBasic::Resource::LoadBitmapAlt(hResInst, IDR_CONTROL)),
     139                CtrlToolBar,
    138140                (BMPNUM_RADTOOLBAR-1)+SEPNUM_RADTOOLBAR,    /*アイテムの個数*/
    139141                0,0,16,15,sizeof(TBBUTTON));
    … …  
    211213    switch(message){
    212214        case WM_CREATE:
    213             CreateDialog(hResInst,MAKEINTRESOURCE(IDD_RAD_CTRLBUTTONS),hwnd,(DLGPROC)RadToolButtonsProc);
     215            ActiveBasic::Resource::CreateDialogAlt(hResInst, IDD_RAD_CTRLBUTTONS, hwnd, RadToolButtonsProc);
    214216            return 0;
    215217        case WM_VSCROLL:
    … …  
    679681                case IDC_RENAMEWINDOW:
    680682                    {
    681                         if(!DialogBox(hResInst,MAKEINTRESOURCE(IDD_RAD_PROP_WINDOW_RENAME),hwnd,DlgRadProperty_Window_Rename)) return 1;
     683                        if (!ActiveBasic::Resource::DialogBoxAlt(hResInst, IDD_RAD_PROP_WINDOW_RENAME, hwnd, DlgRadProperty_Window_Rename))
     684                        {
     685                            return 1;
     686                        }
    682687                        i=GetWndNum(GetParent(GetParent(hwnd)));
    683688                        ActiveBasic::PM::WindowInfo *pWindowInfo = GetWndInfo(MdiInfo[i]->path);
    … …  
    688693                case IDC_RENAMECAPTION:
    689694                    {
    690                         if(!DialogBox(hResInst,MAKEINTRESOURCE(IDD_RAD_PROP_ITEM_RENAMECAPTION),hwnd,DlgRadProperty_Item_RenameCaption)) return 1;
     695                        if (!ActiveBasic::Resource::DialogBoxAlt(hResInst, IDD_RAD_PROP_ITEM_RENAMECAPTION, hwnd, DlgRadProperty_Item_RenameCaption))
     696                        {
     697                            return 1;
     698                        }
    691699                        i=GetWndNum(GetParent(GetParent(hwnd)));
    692700                        ActiveBasic::PM::WindowInfo *pWindowInfo = GetWndInfo(MdiInfo[i]->path);
    … …  
    10731081
    10741082                case IDC_EXSTYLE:
    1075                     if(!DialogBox(hResInst,MAKEINTRESOURCE(IDD_RAD_PROP_WINDOW_EXSTYLE),hwnd,DlgRadProperty_Window_ExStyle)) return 1;
     1083                    if (!ActiveBasic::Resource::DialogBoxAlt(hResInst, IDD_RAD_PROP_WINDOW_EXSTYLE, hwnd, DlgRadProperty_Window_ExStyle))
     1084                    {
     1085                        return 1;
     1086                    }
    10761087                    i=GetWndNum(GetParent(GetParent(hwnd)));
    10771088                    DrawRadWindow(i,GetWndInfo(MdiInfo[i]->path));
    … …  
    13051316    switch(LOWORD(wParam)){
    13061317        case IDC_RENAMEID:
    1307             if(!DialogBox(hResInst,MAKEINTRESOURCE(IDD_RAD_PROP_ITEM_RENAMEID),hwnd,DlgRadProperty_Item_RenameID)) return 1;
     1318            if (!ActiveBasic::Resource::DialogBoxAlt(hResInst, IDD_RAD_PROP_ITEM_RENAMEID, hwnd, DlgRadProperty_Item_RenameID))
     1319            {
     1320                return 1;
     1321            }
    13081322            SetDlgItemText(hwnd,IDC_IDNAME,pWindowInfo->childWindowInfos[MdiInfo[WndNum]->MdiRadInfo->SelectingItem[0]]->GetName().c_str());
    13091323            return 1;
    13101324        case IDC_RENAMECAPTION:
    1311             if(!DialogBox(hResInst,MAKEINTRESOURCE(IDD_RAD_PROP_ITEM_RENAMECAPTION),hwnd,DlgRadProperty_Item_RenameCaption)) return 1;
     1325            if (!ActiveBasic::Resource::DialogBoxAlt(hResInst, IDD_RAD_PROP_ITEM_RENAMECAPTION, hwnd, DlgRadProperty_Item_RenameCaption))
     1326            {
     1327                return 1;
     1328            }
    13121329            SetDlgItemText(hwnd,IDC_CAPTION,pWindowInfo->childWindowInfos[MdiInfo[WndNum]->MdiRadInfo->SelectingItem[0]]->GetCaption().c_str());
    13131330            return 1;
    … …  
    16341651
    16351652                    case IDC_EXSTYLE:
    1636                         if(!DialogBox(hResInst,MAKEINTRESOURCE(IDD_RAD_PROP_ITEM_EXSTYLE),hwnd,DlgRadProperty_Item_ExStyle)) return 1;
     1653                        if (!ActiveBasic::Resource::DialogBoxAlt(hResInst, IDD_RAD_PROP_ITEM_EXSTYLE, hwnd, DlgRadProperty_Item_ExStyle))
     1654                        {
     1655                            return 1;
     1656                        }
    16371657                        DrawRadWindow(i,pWindowInfo);
    16381658                        return 1;
    … …  
    19161936
    19171937                    case IDC_EXSTYLE:
    1918                         if(!DialogBox(hResInst,MAKEINTRESOURCE(IDD_RAD_PROP_ITEM_EXSTYLE),hwnd,DlgRadProperty_Item_ExStyle)) return 1;
     1938                        if (!ActiveBasic::Resource::DialogBoxAlt(hResInst, IDD_RAD_PROP_ITEM_EXSTYLE, hwnd, DlgRadProperty_Item_ExStyle))
     1939                        {
     1940                            return 1;
     1941                        }
    19191942                        DrawRadWindow(i,pWindowInfo);
    19201943                        return 1;
    … …  
    21682191
    21692192                    case IDC_EXSTYLE:
    2170                         if(!DialogBox(hResInst,MAKEINTRESOURCE(IDD_RAD_PROP_ITEM_EXSTYLE),hwnd,DlgRadProperty_Item_ExStyle)) return 1;
     2193                        if (!ActiveBasic::Resource::DialogBoxAlt(hResInst, IDD_RAD_PROP_ITEM_EXSTYLE, hwnd, DlgRadProperty_Item_ExStyle))
     2194                        {
     2195                            return 1;
     2196                        }
    21712197                        DrawRadWindow(i,pWindowInfo);
    21722198                        return 1;
    … …  
    24752501
    24762502                    case IDC_EXSTYLE:
    2477                         if(!DialogBox(hResInst,MAKEINTRESOURCE(IDD_RAD_PROP_ITEM_EXSTYLE),hwnd,DlgRadProperty_Item_ExStyle)) return 1;
     2503                        if (!ActiveBasic::Resource::DialogBoxAlt(hResInst, IDD_RAD_PROP_ITEM_EXSTYLE, hwnd, DlgRadProperty_Item_ExStyle))
     2504                        {
     2505                            return 1;
     2506                        }
    24782507                        DrawRadWindow(i,pWindowInfo);
    24792508                        return 1;
    … …  
    26102639
    26112640                    case IDC_EXSTYLE:
    2612                         if(!DialogBox(hResInst,MAKEINTRESOURCE(IDD_RAD_PROP_ITEM_EXSTYLE),hwnd,DlgRadProperty_Item_ExStyle)) return 1;
     2641                        if (!ActiveBasic::Resource::DialogBoxAlt(hResInst, IDD_RAD_PROP_ITEM_EXSTYLE, hwnd, DlgRadProperty_Item_ExStyle))
     2642                        {
     2643                            return 1;
     2644                        }
    26132645                        DrawRadWindow(i,pWindowInfo);
    26142646                        return 1;
    … …  
    29622994                            if(pWindowInfo->childWindowInfos[MdiInfo[i]->MdiRadInfo->SelectingItem[0]]->image.IsFile()){
    29632995                                if((pWindowInfo->childWindowInfos[MdiInfo[i]->MdiRadInfo->SelectingItem[0]]->GetStyle()&0x000F)==SS_ICON){
    2964                                     extern LPSTR IconFileFilter;
     2996                                    extern const LPCSTR IconFileFilter;
    29652997                                    //"アイコン ファイルを指定して下さい"
    29662998                                    if(!GetFilePathDialog(hwnd,temporary,IconFileFilter,STRING_IMAGEBOXPROP_GETPATH_ICON,1)) return 1;
    29672999                                }
    29683000                                else if((pWindowInfo->childWindowInfos[MdiInfo[i]->MdiRadInfo->SelectingItem[0]]->GetStyle()&0x000F)==SS_BITMAP){
    2969                                     extern LPSTR BitmapFileFilter;
     3001                                    extern const LPCSTR BitmapFileFilter;
    29703002                                    //"ビットマップ ファイルを指定して下さい"
    29713003                                    if(!GetFilePathDialog(hwnd,temporary,BitmapFileFilter,STRING_IMAGEBOXPROP_GETPATH_BITMAP,1)) return 1;
    … …  
    30233055
    30243056                    case IDC_EXSTYLE:
    3025                         if(!DialogBox(hResInst,MAKEINTRESOURCE(IDD_RAD_PROP_ITEM_EXSTYLE),hwnd,DlgRadProperty_Item_ExStyle)) return 1;
     3057                        if (!ActiveBasic::Resource::DialogBoxAlt(hResInst, IDD_RAD_PROP_ITEM_EXSTYLE, hwnd, DlgRadProperty_Item_ExStyle))
     3058                        {
     3059                            return 1;
     3060                        }
    30263061                        DrawRadWindow(i,pWindowInfo);
    30273062                        return 1;
    … …  
    32963331
    32973332                    case IDC_EXSTYLE:
    3298                         if(!DialogBox(hResInst,MAKEINTRESOURCE(IDD_RAD_PROP_ITEM_EXSTYLE),hwnd,DlgRadProperty_Item_ExStyle)) return 1;
     3333                        if (!ActiveBasic::Resource::DialogBoxAlt(hResInst, IDD_RAD_PROP_ITEM_EXSTYLE, hwnd, DlgRadProperty_Item_ExStyle))
     3334                        {
     3335                            return 1;
     3336                        }
    32993337                        DrawRadWindow(i,pWindowInfo);
    33003338                        return 1;
    … …  
    35713609
    35723610                    case IDC_EXSTYLE:
    3573                         if(!DialogBox(hResInst,MAKEINTRESOURCE(IDD_RAD_PROP_ITEM_EXSTYLE),hwnd,DlgRadProperty_Item_ExStyle)) return 1;
     3611                        if (!ActiveBasic::Resource::DialogBoxAlt(hResInst, IDD_RAD_PROP_ITEM_EXSTYLE, hwnd, DlgRadProperty_Item_ExStyle))
     3612                        {
     3613                            return 1;
     3614                        }
    35743615                        DrawRadWindow(i,pWindowInfo);
    35753616                        return 1;
    … …  
    36553696
    36563697                    case IDC_EXSTYLE:
    3657                         if(!DialogBox(hResInst,MAKEINTRESOURCE(IDD_RAD_PROP_ITEM_EXSTYLE),hwnd,DlgRadProperty_Item_ExStyle)) return 1;
     3698                        if (!ActiveBasic::Resource::DialogBoxAlt(hResInst, IDD_RAD_PROP_ITEM_EXSTYLE, hwnd, DlgRadProperty_Item_ExStyle))
     3699                        {
     3700                            return 1;
     3701                        }
    36583702                        DrawRadWindow(i,pWindowInfo);
    36593703                        return 1;
    … …  
    38873931
    38883932                    case IDC_EXSTYLE:
    3889                         if(!DialogBox(hResInst,MAKEINTRESOURCE(IDD_RAD_PROP_ITEM_EXSTYLE),hwnd,DlgRadProperty_Item_ExStyle)) return 1;
     3933                        if (!ActiveBasic::Resource::DialogBoxAlt(hResInst, IDD_RAD_PROP_ITEM_EXSTYLE, hwnd, DlgRadProperty_Item_ExStyle))
     3934                        {
     3935                            return 1;
     3936                        }
    38903937                        DrawRadWindow(i,pWindowInfo);
    38913938                        return 1;
    … …  
    39714018
    39724019                    case IDC_EXSTYLE:
    3973                         if(!DialogBox(hResInst,MAKEINTRESOURCE(IDD_RAD_PROP_ITEM_EXSTYLE),hwnd,DlgRadProperty_Item_ExStyle)) return 1;
     4020                        if (!ActiveBasic::Resource::DialogBoxAlt(hResInst, IDD_RAD_PROP_ITEM_EXSTYLE, hwnd, DlgRadProperty_Item_ExStyle))
     4021                        {
     4022                            return 1;
     4023                        }
    39744024                        DrawRadWindow(i,pWindowInfo);
    39754025                        return 1;
    … …  
    41024152
    41034153                    case IDC_EXSTYLE:
    4104                         if(!DialogBox(hResInst,MAKEINTRESOURCE(IDD_RAD_PROP_ITEM_EXSTYLE),hwnd,DlgRadProperty_Item_ExStyle)) return 1;
     4154                        if (!ActiveBasic::Resource::DialogBoxAlt(hResInst, IDD_RAD_PROP_ITEM_EXSTYLE, hwnd, DlgRadProperty_Item_ExStyle))
     4155                        {
     4156                            return 1;
     4157                        }
    41054158                        DrawRadWindow(i,pWindowInfo);
    41064159                        return 1;
    … …  
    42544307
    42554308                    case IDC_EXSTYLE:
    4256                         if(!DialogBox(hResInst,MAKEINTRESOURCE(IDD_RAD_PROP_ITEM_EXSTYLE),hwnd,DlgRadProperty_Item_ExStyle)) return 1;
     4309                        if (!ActiveBasic::Resource::DialogBoxAlt(hResInst, IDD_RAD_PROP_ITEM_EXSTYLE, hwnd, DlgRadProperty_Item_ExStyle))
     4310                        {
     4311                            return 1;
     4312                        }
    42574313                        DrawRadWindow(i,pWindowInfo);
    42584314                        return 1;
    … …  
    44654521
    44664522                    case IDC_EXSTYLE:
    4467                         if(!DialogBox(hResInst,MAKEINTRESOURCE(IDD_RAD_PROP_ITEM_EXSTYLE),hwnd,DlgRadProperty_Item_ExStyle)) return 1;
     4523                        if (!ActiveBasic::Resource::DialogBoxAlt(hResInst, IDD_RAD_PROP_ITEM_EXSTYLE, hwnd, DlgRadProperty_Item_ExStyle))
     4524                        {
     4525                            return 1;
     4526                        }
    44684527                        DrawRadWindow(i,pWindowInfo);
    44694528                        return 1;
    … …  
    46404699
    46414700                    case IDC_EXSTYLE:
    4642                         if(!DialogBox(hResInst,MAKEINTRESOURCE(IDD_RAD_PROP_ITEM_EXSTYLE),hwnd,DlgRadProperty_Item_ExStyle)) return 1;
     4701                        if (!ActiveBasic::Resource::DialogBoxAlt(hResInst, IDD_RAD_PROP_ITEM_EXSTYLE, hwnd, DlgRadProperty_Item_ExStyle))
     4702                        {
     4703                            return 1;
     4704                        }
    46434705                        DrawRadWindow(i,pWindowInfo);
    46444706                        return 1;

  • trunk/ab5.0/abdev/abdev/Resource.cpp

    r629 r828  
    1414void Project_CursorResInsert(void){
    1515    extern HANDLE hHeap;
    16     extern LPSTR CursorFileFilter;
     16    extern const LPCSTR CursorFileFilter;
    1717    int i3;
    1818    char temporary[MAX_PATH];
    … …  
    7979    TVITEM tvItem;
    8080
    81     if(!DialogBoxParam(hResInst,MAKEINTRESOURCE(IDD_INPUTID),hOwner,(DLGPROC)DlgProject_ResourceID_Input,(long)projectInfo.resourceManager.cursorResources[CursorInfoNum].idName.c_str())) return;
     81    if (!ActiveBasic::Resource::DialogBoxAlt(hResInst, IDD_INPUTID, hOwner, DlgProject_ResourceID_Input, reinterpret_cast<LPARAM>(projectInfo.resourceManager.cursorResources[CursorInfoNum].idName.c_str())))
     82    {
     83        return;
     84    }
    8285
    8386    //重複チェック
    … …  
    111114void Project_BitmapResInsert(void){
    112115    extern HANDLE hHeap;
    113     extern LPSTR BitmapFileFilter;
     116    extern const LPCSTR BitmapFileFilter;
    114117    int i2,i3;
    115118    char temporary[MAX_PATH];
    … …  
    186189    TVITEM tvItem;
    187190
    188     if(!DialogBoxParam(hResInst,MAKEINTRESOURCE(IDD_INPUTID),hOwner,(DLGPROC)DlgProject_ResourceID_Input,(long)projectInfo.resourceManager.bitmapResources[BitmapInfoNum].idName.c_str())) return;
     191    if (!ActiveBasic::Resource::DialogBoxAlt(hResInst, IDD_INPUTID, hOwner, DlgProject_ResourceID_Input, reinterpret_cast<LPARAM>(projectInfo.resourceManager.bitmapResources[BitmapInfoNum].idName.c_str())))
     192    {
     193        return;
     194    }
    189195
    190196    //重複チェック
    … …  
    217223void Project_IconResInsert(void){
    218224    extern HANDLE hHeap;
    219     extern LPSTR IconFileFilter;
     225    extern const LPCSTR IconFileFilter;
    220226    int i2,i3;
    221227    char temporary[MAX_PATH];
    … …  
    317323    TVITEM tvItem;
    318324
    319     if(!DialogBoxParam(hResInst,MAKEINTRESOURCE(IDD_INPUTID),hOwner,(DLGPROC)DlgProject_ResourceID_Input,(long)projectInfo.resourceManager.iconResources[IconInfoNum].idName.c_str())) return;
     325    if (!ActiveBasic::Resource::DialogBoxAlt(hResInst, IDD_INPUTID, hOwner, DlgProject_ResourceID_Input, reinterpret_cast<LPARAM>(projectInfo.resourceManager.iconResources[IconInfoNum].idName.c_str())))
     326    {
     327        return;
     328    }
    320329
    321330    //重複チェック

  • trunk/ab5.0/abdev/abdev/Search.cpp

    r763 r828  
    298298                    else pobj_nv->bRegExp=0;
    299299
    300                     FindAllDlg=CreateDialog(hResInst,MAKEINTRESOURCE(IDD_FINDALL),GetWindow(hwnd,GW_OWNER),(DLGPROC)DlgFindAll);
     300                    FindAllDlg = ActiveBasic::Resource::CreateDialogAlt(hResInst, IDD_FINDALL, GetWindow(hwnd, GW_OWNER), DlgFindAll);
    301301                    ShowWindow(FindAllDlg,SW_SHOW);
    302302

  • trunk/ab5.0/abdev/abdev/SubOperation.cpp

    r772 r828  
    692692    const std::string resDllPath = ActiveBasic::Common::Environment::GetAbdevSystemDirPath() + "\\res.dll";
    693693    hResInst = LoadLibrary( resDllPath.c_str() );
     694    if(!hResInst){
     695        MessageBox(0,"res.dllの読み込みに失敗しました。",APPLICATION_NAME,MB_OK|MB_ICONEXCLAMATION);
     696        return 0;
     697    }
    694698
    695699    //アイコンリソースDLLをマッピング
    696700    const std::string iconResDllPath = ActiveBasic::Common::Environment::GetAbdevSystemDirPath() + "\\icon_res.dll";
    697     hIconResInst = LoadLibrary( iconResDllPath.c_str() );
     701    hIconResInst = LoadLibraryEx( iconResDllPath.c_str(), nullptr, LOAD_LIBRARY_AS_DATAFILE );
     702    if(!hIconResInst){
     703        MessageBox(0,"icon_res.dllの読み込みに失敗しました。",APPLICATION_NAME,MB_OK|MB_ICONEXCLAMATION);
     704        return 0;
     705    }
    698706
    699707    //LuxCtrl.dllをマッピング
    … …  
    830838    extern HICON hOwnerIcon,hBasicProgramIcon,hTextDocumentIcon,hWindowDocumentIcon;
    831839    hOwnerIcon=(HICON)LoadImage(hInst,MAKEINTRESOURCE(IDI_MAIN),IMAGE_ICON,16,16,LR_DEFAULTCOLOR);
    832     hBasicProgramIcon=(HICON)LoadImage(hResInst,MAKEINTRESOURCE(IDI_BASICPROGRAM),IMAGE_ICON,16,16,LR_DEFAULTCOLOR);
    833     hTextDocumentIcon=(HICON)LoadImage(hResInst,MAKEINTRESOURCE(IDI_TEXTDOCUMENT),IMAGE_ICON,16,16,LR_DEFAULTCOLOR);
    834     hWindowDocumentIcon=(HICON)LoadImage(hResInst,MAKEINTRESOURCE(IDI_WINDOW),IMAGE_ICON,16,16,LR_DEFAULTCOLOR);
     840    hBasicProgramIcon = ActiveBasic::Resource::LoadIconAlt(hResInst, IDI_BASICPROGRAM, 16, 16, LR_DEFAULTCOLOR);
     841    hTextDocumentIcon = ActiveBasic::Resource::LoadIconAlt(hResInst, IDI_TEXTDOCUMENT, 16, 16, LR_DEFAULTCOLOR);
     842    hWindowDocumentIcon = ActiveBasic::Resource::LoadIconAlt(hResInst, IDI_WINDOW, 16, 16, LR_DEFAULTCOLOR);
    835843
    836844
    … …  
    838846
    839847    //メインメニュー
    840     pobj_MainMenu=new CMenuEx(LoadMenu(hResInst,MAKEINTRESOURCE(IDR_MAINMENU)));
     848    pobj_MainMenu=new CMenuEx(ActiveBasic::Resource::LoadMenuAlt(hResInst, IDR_MAINMENU));
    841849
    842850    pobj_MainMenu->InitOwnerDraw(1);            //オーナー描画の初期化
    … …  
    872880    }
    873881
    874 #define ICONSET(itemID,iconID) pobj_MainMenu->SetIcon(itemID,(HICON)LoadImage(hIconResInst,MAKEINTRESOURCE(iconID),IMAGE_ICON,16,16,0));
     882#define ICONSET(itemID, iconID) pobj_MainMenu->SetIcon((itemID), ActiveBasic::Resource::LoadIconAlt(hIconResInst, (iconID), 16, 16));
    875883    //メニューアイコンをセット
    876884
    … …  
    946954
    947955    extern HMENU hEditMenuBase,hEditMenu;
    948     hEditMenuBase=LoadMenu(hResInst,MAKEINTRESOURCE(IDR_EDITMENU));
     956    hEditMenuBase = ActiveBasic::Resource::LoadMenuAlt(hResInst, IDR_EDITMENU);
    949957    hEditMenu=GetSubMenu(hEditMenuBase,0);
    950958
    951959    extern HMENU hRebarMenuBase,hRebarMenu;
    952     hRebarMenuBase=LoadMenu(hResInst,MAKEINTRESOURCE(IDR_REBARMENU));
     960    hRebarMenuBase = ActiveBasic::Resource::LoadMenuAlt(hResInst, IDR_REBARMENU);
    953961    hRebarMenu=GetSubMenu(hRebarMenuBase,0);
    954962
    955963    extern HMENU hTabMenuBase,hTabMenu,hTabColorMenu;
    956     hTabMenuBase=LoadMenu(hResInst,MAKEINTRESOURCE(IDR_TABMENU));
     964    hTabMenuBase = ActiveBasic::Resource::LoadMenuAlt(hResInst,IDR_TABMENU);
    957965    hTabMenu=GetSubMenu(hTabMenuBase,0);
    958966    hTabColorMenu=GetSubMenu(hTabMenu,0);
    959967
    960968    extern HMENU hFileTreeMenuBase;
    961     hFileTreeMenuBase=LoadMenu(hResInst,MAKEINTRESOURCE(IDR_PROJECTVIEW_FILETREEMENU));
     969    hFileTreeMenuBase = ActiveBasic::Resource::LoadMenuAlt(hResInst,IDR_PROJECTVIEW_FILETREEMENU);
    962970
    963971    extern HMENU hProcedureTreeMenuBase;
    964     hProcedureTreeMenuBase=LoadMenu(hResInst,MAKEINTRESOURCE(IDR_PROJECTVIEW_PROCEDURETREEMENU));
     972    hProcedureTreeMenuBase = ActiveBasic::Resource::LoadMenuAlt(hResInst,IDR_PROJECTVIEW_PROCEDURETREEMENU);
    965973
    966974    extern HMENU hMaterialTreeMenuBase;
    967     hMaterialTreeMenuBase=LoadMenu(hResInst,MAKEINTRESOURCE(IDR_PROJECTVIEW_MATERIALTREEMENU));
     975    hMaterialTreeMenuBase = ActiveBasic::Resource::LoadMenuAlt(hResInst,IDR_PROJECTVIEW_MATERIALTREEMENU);
    968976
    969977    extern HMENU hRadMenuBase;
    970     hRadMenuBase=LoadMenu(hResInst,MAKEINTRESOURCE(IDR_RADCONTEXTMENU));
     978    hRadMenuBase = ActiveBasic::Resource::LoadMenuAlt(hResInst,IDR_RADCONTEXTMENU);
    971979
    972980    //クリップボードのデータ形式（RAD用）を新規登録
    … …  
    12011209//実行コマンド
    12021210BOOL SetRunning(HWND hChild){
    1203     extern LPSTR DefFileFilter;
     1211    extern const LPCSTR DefFileFilter;
    12041212    int WndNum;
    12051213    char temp2[MAX_PATH];

  • trunk/ab5.0/abdev/abdev/TabCtrl.cpp

    r772 r828  
    357357        // タブ枠を描画
    358358        ////////////////////////////
    359         colorGray=reinterpret_cast<ItemInfo*>( item.lParam )->Color;
     359        colorGray=item.lParam ? reinterpret_cast<ItemInfo*>( item.lParam )->Color : RGB(0xcc, 0xcc, 0xcc);
    360360
    361361        //ブラシを生成
    … …  
    412412        // タブ枠を描画
    413413        ////////////////////////////
    414         colorGray=reinterpret_cast<ItemInfo*>( item.lParam )->Color;
     414        colorGray=item.lParam ? reinterpret_cast<ItemInfo*>( item.lParam )->Color : RGB(0xcc, 0xcc, 0xcc);
    415415
    416416        //ブラシを生成

  • trunk/ab5.0/abdev/abdev/TextEditor_EventProc.cpp

    r772 r828  
    2929int hide_caret_switch;
    3030
     31const UINT WM_IME_REQUEST = 0x0288;
    3132LRESULT CALLBACK TextEditProc(HWND hwnd,UINT message,WPARAM wParam,LPARAM lParam){
    3233    extern HANDLE hHeap;

  • trunk/ab5.0/abdev/abdev/TextEditor_MouseEvent.cpp

    r629 r828  
    6969
    7070        //カーソルを矢印マークにする
    71         SetCursor(LoadCursor(hResInst,MAKEINTRESOURCE(IDC_CURSOR_ARROW_TO_RIGHT)));
     71        SetCursor(ActiveBasic::Resource::LoadCursorAlt(hResInst, IDC_CURSOR_ARROW_TO_RIGHT));
    7272
    7373        GetNaturalCaretPos_Click(WndNum,
    … …  
    129129
    130130        //カーソルを矢印マークにする
    131         SetCursor(LoadCursor(hResInst,MAKEINTRESOURCE(IDC_CURSOR_ARROW_TO_RIGHT)));
     131        SetCursor(ActiveBasic::Resource::LoadCursorAlt(hResInst, IDC_CURSOR_ARROW_TO_RIGHT));
    132132    }
    133133
    … …  
    255255
    256256            //カーソルを矢印マークにする
    257             SetCursor(LoadCursor(hResInst,MAKEINTRESOURCE(IDC_CURSOR_ARROW_TO_RIGHT)));
     257            SetCursor(ActiveBasic::Resource::LoadCursorAlt(hResInst, IDC_CURSOR_ARROW_TO_RIGHT));
    258258
    259259            return;
    … …  
    321321
    322322        //カーソルを矢印マーク（デフォルト）にする
    323         SetCursor(LoadCursor(hResInst,MAKEINTRESOURCE(IDC_CURSOR_ARROW_TO_RIGHT)));
     323        SetCursor(ActiveBasic::Resource::LoadCursorAlt(hResInst, IDC_CURSOR_ARROW_TO_RIGHT));
    324324
    325325        return;

  • trunk/ab5.0/abdev/abdev/WindowControl.cpp

    r700 r828  
    21722172    char temporary[MAX_PATH],temp2[1024];
    21732173
    2174     if(!DialogBox(hResInst,MAKEINTRESOURCE(IDD_PROJECT_NEWWINDOW),hOwner,(DLGPROC)DlgProject_NewWindow)) return;
     2174    if (!ActiveBasic::Resource::DialogBoxAlt(hResInst, IDD_PROJECT_NEWWINDOW, hOwner, DlgProject_NewWindow))
     2175    {
     2176        return;
     2177    }
    21752178
    21762179    //重複チェック

  • trunk/ab5.0/abdev/abdev/abdev.cpp

    r773 r828  
    22
    33#include "abdev.h"
     4
     5#if _ATL_VER == 0x0800
     6#pragma comment(lib, "atlthunk.lib")
     7#endif
    48
    59#ifdef _DEBUG
    … …  
    910914    SHFILEINFO shfi;
    911915    if(filepath)
     916    {
    912917        SHGetFileInfo(filepath, FILE_ATTRIBUTE_ARCHIVE, &shfi, sizeof(SHFILEINFO), SHGFI_ICON | SHGFI_SMALLICON );
    913     else shfi.hIcon=(HICON)LoadImage(hResInst,MAKEINTRESOURCE(IDI_TEXTDOCUMENT),IMAGE_ICON,16,16,LR_DEFAULTCOLOR);;
     918    }
     919    else
     920    {
     921        shfi.hIcon = ActiveBasic::Resource::LoadIconAlt(hResInst, IDI_TEXTDOCUMENT, 16, 16, LR_DEFAULTCOLOR);
     922    }
    914923    mdic.lParam=(LPARAM)shfi.hIcon;
    915924
    … …  
    14891498    return RegisterClassEx(&wcl);
    14901499}
     1500
     1501#ifndef AB_TEST
     1502
    14911503int PASCAL WinMain(HINSTANCE hThisInst,HINSTANCE,LPSTR lpCmdLine,int ShowCmd){
    14921504#ifdef _DEBUG
    … …  
    15401552    //return 0;
    15411553
    1542 
    1543     hAccel=LoadAccelerators(hResInst,MAKEINTRESOURCE(IDR_ACCELERATOR1));
     1554    hAccel = ActiveBasic::Resource::LoadAcceleratorsAlt(hResInst, IDR_ACCELERATOR1);
    15441555
    15451556    //メインウィンドウ
    … …  
    16441655    return static_cast<int>(msg.wParam);
    16451656}
     1657
     1658#endif

  • trunk/ab5.0/abdev/abdev/abdev.h

    r629 r828  
    55
    66#ifdef THETEXT
    7 LPSTR DefFileFilter="テキスト ファイル(*.txt)\0*.txt\0HTMLファイル(*.htm;*html)\0*.htm;*html\0CGIファイル(*.cgi;*.pl)\0*.cgi;*.pl\0PHPファイル(*.php)\0*.php\0テンプレート ファイル(*.tpl)\0*.tpl\0すべてのファイル(*.*)\0*\0\0";
     7extern const LPCSTR DefFileFilter="テキスト ファイル(*.txt)\0*.txt\0HTMLファイル(*.htm;*html)\0*.htm;*html\0CGIファイル(*.cgi;*.pl)\0*.cgi;*.pl\0PHPファイル(*.php)\0*.php\0テンプレート ファイル(*.tpl)\0*.tpl\0すべてのファイル(*.*)\0*\0\0";
    88#else
    9 LPSTR DefFileFilter="プログラム ファイル(*.ab;*.abp;*.bas;*.sbp)\0*.ab;*.abp;*.bas;*sbp\0プロジェクト(*.pj)\0*.pj\0テキスト ファイル(*.txt)\0*.txt\0すべてのファイル(*.*)\0*\0\0";
     9extern const LPCSTR DefFileFilter="プログラム ファイル(*.ab;*.abp;*.bas;*.sbp)\0*.ab;*.abp;*.bas;*sbp\0プロジェクト(*.pj)\0*.pj\0テキスト ファイル(*.txt)\0*.txt\0すべてのファイル(*.*)\0*\0\0";
    1010#endif
    1111
    12 LPSTR HtmlFileFilter="HTMLファイル(*.html;*.htm)\0*.html;*.htm\0すべてのファイル(*.*)\0*\0\0";
    13 LPSTR TextFileFilter="テキスト ファイル(*.txt)\0*.txt\0すべてのファイル(*.*)\0*\0\0";
     12extern const LPCSTR HtmlFileFilter="HTMLファイル(*.html;*.htm)\0*.html;*.htm\0すべてのファイル(*.*)\0*\0\0";
     13extern const LPCSTR TextFileFilter="テキスト ファイル(*.txt)\0*.txt\0すべてのファイル(*.*)\0*\0\0";
    1414
    15 LPSTR ProjectFileFilter="プロジェクト(*.pj)\0*.pj\0\0";
    16 LPSTR BitmapFileFilter="ビットマップ(*.bmp)\0*.bmp\0\0";
    17 LPSTR IconFileFilter="アイコン(*.ico)\0*.ico\0\0";
    18 LPSTR CursorFileFilter="カーソル(*.cur)\0*.cur\0\0";
     15extern const LPCSTR ProjectFileFilter="プロジェクト(*.pj)\0*.pj\0\0";
     16extern const LPCSTR BitmapFileFilter="ビットマップ(*.bmp)\0*.bmp\0\0";
     17extern const LPCSTR IconFileFilter="アイコン(*.ico)\0*.ico\0\0";
     18extern const LPCSTR CursorFileFilter="カーソル(*.cur)\0*.cur\0\0";
    1919
    20 LPSTR ExeFileFilter="実行可能ファイル(*.exe)\0*.exe\0\0";
     20extern const LPCSTR ExeFileFilter="実行可能ファイル(*.exe)\0*.exe\0\0";
    2121
    2222#else
    2323//英語
    24 LPSTR DefFileFilter="Program files (*.ab;*.abp;*.bas;*.sbp)\0*.ab;*.abp;*.bas;*sbp\0Project templates (*.pj)\0*.pj\0Text files (*.txt)\0*.txt\0All files(*.*)\0*\0\0";
    25 LPSTR ProjectFileFilter="Project templates (*.pj)\0*.pj\0\0";
    26 LPSTR BitmapFileFilter="Bitmap files (*.bmp)\0*.bmp\0\0";
    27 LPSTR IconFileFilter="Icon files (*.ico)\0*.ico\0\0";
    28 LPSTR CursorFileFilter="Cursor files (*.cur)\0*.cur\0\0";
     24extern const LPCSTR DefFileFilter="Program files (*.ab;*.abp;*.bas;*.sbp)\0*.ab;*.abp;*.bas;*sbp\0Project templates (*.pj)\0*.pj\0Text files (*.txt)\0*.txt\0All files(*.*)\0*\0\0";
     25extern const LPCSTR ProjectFileFilter="Project templates (*.pj)\0*.pj\0\0";
     26extern const LPCSTR BitmapFileFilter="Bitmap files (*.bmp)\0*.bmp\0\0";
     27extern const LPCSTR IconFileFilter="Icon files (*.ico)\0*.ico\0\0";
     28extern const LPCSTR CursorFileFilter="Cursor files (*.cur)\0*.cur\0\0";
    2929#endif
    3030

  • trunk/ab5.0/abdev/abdev/include/MainFrame.h

    r824 r828  
    2727    WindowAreaManager wam;
    2828    UINT TaskbarButtonCreated;
    29     boost::shared_ptr<TaskbarList> taskbarList;
     29    std::shared_ptr<TaskbarList> taskbarList;
    3030
    3131public:
    … …  
    295295        MSG_WM_DROPFILES( OnDropFiles )
    296296        MSG_WM_PAINT( OnPaint )
    297         MESSAGE_HANDLER( WM_SHOWERROR, OnShowSourceLine )   
     297        MESSAGE_HANDLER( WM_SHOWERROR, OnShowSourceLine )
    298298        MESSAGE_HANDLER_EX( TaskbarButtonCreated, OnTaskbarButtonCreated )
    299299        COMMAND_ID_HANDLER_EX( IDM_NEW, OnCmdNew )

  • trunk/ab5.0/abdev/abdev/manifest.xml

    r3 r828  
    11<?xml version="1.0" encoding="UTF-8" standalone="yes"?>
    2 
    32<assembly xmlns="urn:schemas-microsoft-com:asm.v1" manifestVersion="1.0">
    4     <description>Description</description>
    5     <dependency>
    6         <dependentAssembly>
    7             <assemblyIdentity
    8                 type="win32"
    9                 name="Microsoft.Windows.Common-Controls"
    10                 version="6.0.0.0"
    11                 processorArchitecture="x86"
    12                 publicKeyToken="6595b64144ccf1df"
    13                 language="*" />
    14         </dependentAssembly>
    15     </dependency>
     3    <assemblyIdentity
     4        version="1.0.0.0"
     5        processorArchitecture="x86"
     6        name="Discoversoft.ActiveBasic.ProjectEditor"
     7        type="win32"/>
     8    <description>ActiveBasic IDE</description>
    169</assembly>

  • trunk/ab5.0/abdev/abdev/src/MainFrame.cpp

    r824 r828  
    5555        wndTarget(hwndTarget)
    5656    {
     57        DWORD const WS_EX_NOACTIVATE = 0x08000000;
     58
    5759        HWND hwndDummy = Create( hOwner, CRect( -32000, -32000, 1, 1 ), title,
    5860            WS_BORDER | WS_SYSMENU | WS_CAPTION, WS_EX_NOACTIVATE);
    … …  
    292294        if (taskbarList)
    293295        {
    294         taskbarList->SetTabOrder(*mapAt(hwndChild),
    295             hwndInsertBefore
    296             ? static_cast<HWND>(*mapAt(hwndInsertBefore))
    297             : 0);
     296            taskbarList->SetTabOrder(*mapAt(hwndChild),
     297                hwndInsertBefore
     298                ? static_cast<HWND>(*mapAt(hwndInsertBefore))
     299                : 0);
    298300        }
    299301    }
    … …  
    976978    char temporary[MAX_PATH];
    977979
    978     FileType=DialogBox(hResInst,MAKEINTRESOURCE(IDD_NEWFILE),hOwner,DlgNewFile);
     980    FileType = ActiveBasic::Resource::DialogBoxAlt(hResInst, IDD_NEWFILE, hOwner, DlgNewFile);
    979981    if(FileType==-1) return;
    980982
    … …  
    10231025{
    10241026    //"ファイルを指定してください"
    1025     extern LPSTR DefFileFilter;
     1027    extern const LPCSTR DefFileFilter;
    10261028    char temporary[1024];
    10271029    if(!GetFilePathDialog(m_hWnd,temporary,DefFileFilter,STRING_FILEOPENTITLE_DEFAULT,TRUE)) return;
    … …  
    10391041{
    10401042    //"プロジェクト ファイルを指定して下さい"
    1041     extern LPSTR ProjectFileFilter;
     1043    extern const LPCSTR ProjectFileFilter;
    10421044    char temporary[1024];
    10431045    if(!GetFilePathDialog(m_hWnd,temporary,ProjectFileFilter,STRING_FILEOPENTITLE_PROJECT,TRUE))
    … …  
    10721074{
    10731075    //"保存先のファイルを指定してください"
    1074     extern LPSTR DefFileFilter;
     1076    extern const LPCSTR DefFileFilter;
    10751077    char temporary[1024];
    10761078    if(!GetFilePathDialog(m_hWnd,temporary,DefFileFilter,STRING_FILESAVETITLE_DEFAULT,FALSE)) return;
    … …  
    13671369void MainFrame::OnCmdFind( UINT uNotifyCode, int nID, CWindow wndCtl )
    13681370{
    1369     DialogBox(hResInst,MAKEINTRESOURCE(IDD_FIND),m_hWnd,DlgFind);
     1371    ActiveBasic::Resource::DialogBoxAlt(hResInst, IDD_FIND, m_hWnd, DlgFind);
    13701372}
    13711373
    13721374void MainFrame::OnCmdPermutation( UINT uNotifyCode, int nID, CWindow wndCtl )
    13731375{
    1374     DialogBox(hResInst,MAKEINTRESOURCE(IDD_PERMUTATION),m_hWnd,DlgPermutation);
     1376    ActiveBasic::Resource::DialogBoxAlt(hResInst, IDD_PERMUTATION, m_hWnd, DlgPermutation);
    13751377}
    13761378
    … …  
    16271629    int idProcess;
    16281630    DWORD dwPlatform;
    1629     idProcess=DialogBoxParam(hResInst,MAKEINTRESOURCE(IDD_ATTACH),m_hWnd,DlgAttach,(LPARAM)&dwPlatform);
     1631    idProcess = ActiveBasic::Resource::DialogBoxAlt(hResInst, IDD_ATTACH, m_hWnd, DlgAttach, reinterpret_cast<LPARAM>(&dwPlatform));
    16301632    if(idProcess==0) return;
    16311633
    … …  
    18891891void MainFrame::OnCmdAbout( UINT uNotifyCode, int nID, CWindow wndCtl )
    18901892{
    1891     DialogBox(hResInst,MAKEINTRESOURCE(IDD_ABOUT),m_hWnd,DialogAbout);
     1893    ActiveBasic::Resource::DialogBoxAlt(hResInst, IDD_ABOUT, m_hWnd, DialogAbout);
    18921894}
    18931895

  • trunk/ab5.0/abdev/abdev/stdafx.h

    r772 r828  
    11#pragma once
    2 #define _CRT_SECURE_CPP_OVERLOAD_STANDARD_NAMES 1
    32
    43#include <map>
    … …  
    2625#include <atlcom.h>
    2726#include <atlhost.h>
     27#undef _SECURE_ATL
     28#define _SECURE_ATL 1
     29#pragma warning(push)
     30#pragma warning(disable: 6011 6246 6255 6269 6387)
    2831#include <atlapp.h>
    2932#include <atlframe.h>
    … …  
    3134#include <atlmisc.h>
    3235#include <atlctrls.h>
     36#pragma warning(pop)
    3337
    3438//boost libraries
    … …  
    4044
    4145// tinyxml
     46#pragma warning(push)
     47#pragma warning(disable: 6011)
    4248#include <tinyxml/tinyxml.h>
     49#pragma warning(pop)
    4350
    4451#include <jenga/include/jenga.h>
Note: See TracChangeset for help on using the changeset viewer.