[475] | 1 | #include "stdafx.h"
|
---|
| 2 |
|
---|
[3] | 3 | #include "Common.h"
|
---|
| 4 |
|
---|
[475] | 5 | using namespace ActiveBasic::IDE;
|
---|
| 6 |
|
---|
[3] | 7 | #if defined(JPN)
|
---|
| 8 | //日本語
|
---|
| 9 | #include "pj_msg_jpn.h"
|
---|
| 10 | #else
|
---|
| 11 | //英語
|
---|
| 12 | #include "pj_msg_eng.h"
|
---|
| 13 | #endif
|
---|
| 14 |
|
---|
| 15 | HWND hProjectViewTab;
|
---|
| 16 | HWND hProcedureTreeView,hMaterialTreeView;
|
---|
| 17 | HIMAGELIST hProcedureTreeViewImageList,hMaterialTreeViewImageList;
|
---|
| 18 | WNDPROC OldProcedureTreeViewProc,OldMaterialTreeViewProc;
|
---|
| 19 | WNDPROC OldTabProc;
|
---|
| 20 |
|
---|
| 21 | LRESULT CALLBACK ProcedureTreeViewProc(HWND hwnd,UINT message,WPARAM wParam,LPARAM lParam){
|
---|
| 22 | if(message==WM_CHAR&&wParam==VK_RETURN){
|
---|
| 23 | SendMessage(hProjectViewTab,WM_COMMAND,IDM_PROCEDURETREE_SHOW,0);
|
---|
| 24 | //デフォルトのメッセージ処理をするとビープ音がしてしまうので避ける
|
---|
| 25 | return 0;
|
---|
| 26 | }
|
---|
| 27 | else if(message==WM_LBUTTONDBLCLK){
|
---|
| 28 | SendMessage(hProjectViewTab,WM_COMMAND,IDM_PROCEDURETREE_SHOW,0);
|
---|
| 29 | return 0;
|
---|
| 30 | }
|
---|
| 31 | return CallWindowProc(OldProcedureTreeViewProc,hwnd,message,wParam,lParam);
|
---|
| 32 | }
|
---|
| 33 | LRESULT CALLBACK MaterialTreeViewProc(HWND hwnd,UINT message,WPARAM wParam,LPARAM lParam){
|
---|
| 34 | if(message==WM_CHAR&&wParam==VK_RETURN){
|
---|
| 35 | SendMessage(hProjectViewTab,WM_COMMAND,IDM_MATERIALTREE_OPEN,0);
|
---|
| 36 | //デフォルトのメッセージ処理をするとビープ音がしてしまうので避ける
|
---|
| 37 | return 0;
|
---|
| 38 | }
|
---|
| 39 | if(message==WM_KEYDOWN&&wParam==VK_DELETE) SendMessage(hProjectViewTab,WM_COMMAND,IDM_MATERIALTREE_DELETE,0);
|
---|
| 40 | return CallWindowProc(OldMaterialTreeViewProc,hwnd,message,wParam,lParam);
|
---|
| 41 | }
|
---|
| 42 | LRESULT CALLBACK TabProc(HWND hwnd,UINT message,WPARAM wParam,LPARAM lParam){
|
---|
| 43 | extern HANDLE hHeap;
|
---|
[808] | 44 | extern const LPCSTR DefFileFilter;
|
---|
[3] | 45 | int i,i2,WndNum;
|
---|
| 46 | char str[MAX_PATH],temporary[MAX_PATH];
|
---|
| 47 | HWND hTree,hChild;
|
---|
| 48 | HTREEITEM hTreeItem,hTreeItem2;
|
---|
| 49 | TV_HITTESTINFO tvHitTestInfo;
|
---|
| 50 | TVITEM tvItem;
|
---|
| 51 |
|
---|
| 52 | switch(message){
|
---|
| 53 | case WM_CONTEXTMENU:
|
---|
| 54 | i=TabCtrl_GetCurSel(hwnd);
|
---|
| 55 | if(i==0){
|
---|
| 56 | //ファイルツリー
|
---|
| 57 | POINT pos;
|
---|
| 58 | pos.x=LOWORD(lParam);
|
---|
| 59 | pos.y=HIWORD(lParam);
|
---|
| 60 | pobj_FileTree->ContextMenu(&pos);
|
---|
| 61 | return 0;
|
---|
| 62 | }
|
---|
| 63 | else if(i==1) hTree=hProcedureTreeView;
|
---|
| 64 | else if(i==2) hTree=hMaterialTreeView;
|
---|
| 65 | tvHitTestInfo.pt.x=LOWORD(lParam);
|
---|
| 66 | tvHitTestInfo.pt.y=HIWORD(lParam);
|
---|
| 67 | ScreenToClient(hTree,&tvHitTestInfo.pt);
|
---|
| 68 | hTreeItem=TreeView_HitTest(hTree,&tvHitTestInfo);
|
---|
| 69 | if(hTreeItem){
|
---|
| 70 | TreeView_SelectItem(hTree,hTreeItem);
|
---|
| 71 | if(i==1){
|
---|
| 72 | extern HMENU hProcedureTreeMenuBase;
|
---|
| 73 | if(TreeView_GetRoot(hTree)!=hTreeItem)
|
---|
| 74 | TrackPopupMenu(GetSubMenu(hProcedureTreeMenuBase,1),TPM_LEFTALIGN,LOWORD(lParam),HIWORD(lParam),0,hwnd,0);
|
---|
| 75 | }
|
---|
| 76 | else if(i==2){
|
---|
| 77 | extern HMENU hMaterialTreeMenuBase;
|
---|
| 78 | hTreeItem2=TreeView_GetRoot(hTree);
|
---|
| 79 | for(i2=0;;i2++){
|
---|
| 80 | if(hTreeItem2==hTreeItem) break;
|
---|
| 81 | hTreeItem2=TreeView_GetNextSibling(hTree,hTreeItem2);
|
---|
| 82 | if(!hTreeItem2) break;
|
---|
| 83 | }
|
---|
| 84 | if(hTreeItem2){
|
---|
| 85 | if(i2==0)
|
---|
| 86 | TrackPopupMenu(GetSubMenu(hMaterialTreeMenuBase,0),TPM_LEFTALIGN,LOWORD(lParam),HIWORD(lParam),0,hwnd,0);
|
---|
| 87 | else if(i2==1)
|
---|
| 88 | TrackPopupMenu(GetSubMenu(hMaterialTreeMenuBase,2),TPM_LEFTALIGN,LOWORD(lParam),HIWORD(lParam),0,hwnd,0);
|
---|
| 89 | else if(i2==2)
|
---|
| 90 | TrackPopupMenu(GetSubMenu(hMaterialTreeMenuBase,4),TPM_LEFTALIGN,LOWORD(lParam),HIWORD(lParam),0,hwnd,0);
|
---|
| 91 | else if(i2==3)
|
---|
| 92 | TrackPopupMenu(GetSubMenu(hMaterialTreeMenuBase,6),TPM_LEFTALIGN,LOWORD(lParam),HIWORD(lParam),0,hwnd,0);
|
---|
| 93 | else if(i2==4)
|
---|
| 94 | TrackPopupMenu(GetSubMenu(hMaterialTreeMenuBase,8),TPM_LEFTALIGN,LOWORD(lParam),HIWORD(lParam),0,hwnd,0);
|
---|
| 95 | }
|
---|
| 96 | else{
|
---|
| 97 | hTreeItem=TreeView_GetNextItem(hTree,hTreeItem,TVGN_PARENT);
|
---|
| 98 | hTreeItem2=TreeView_GetRoot(hTree);
|
---|
| 99 | for(i2=0;;i2++){
|
---|
| 100 | if(hTreeItem2==hTreeItem) break;
|
---|
| 101 | hTreeItem2=TreeView_GetNextSibling(hTree,hTreeItem2);
|
---|
| 102 | if(!hTreeItem2) break;
|
---|
| 103 | }
|
---|
| 104 | if(hTreeItem2){
|
---|
| 105 | if(i2==0)
|
---|
| 106 | TrackPopupMenu(GetSubMenu(hMaterialTreeMenuBase,1),TPM_LEFTALIGN,LOWORD(lParam),HIWORD(lParam),0,hwnd,0);
|
---|
| 107 | else if(i2==1)
|
---|
| 108 | TrackPopupMenu(GetSubMenu(hMaterialTreeMenuBase,3),TPM_LEFTALIGN,LOWORD(lParam),HIWORD(lParam),0,hwnd,0);
|
---|
| 109 | else if(i2==2)
|
---|
| 110 | TrackPopupMenu(GetSubMenu(hMaterialTreeMenuBase,5),TPM_LEFTALIGN,LOWORD(lParam),HIWORD(lParam),0,hwnd,0);
|
---|
| 111 | else if(i2==3)
|
---|
| 112 | TrackPopupMenu(GetSubMenu(hMaterialTreeMenuBase,7),TPM_LEFTALIGN,LOWORD(lParam),HIWORD(lParam),0,hwnd,0);
|
---|
| 113 | else if(i2==4)
|
---|
| 114 | TrackPopupMenu(GetSubMenu(hMaterialTreeMenuBase,9),TPM_LEFTALIGN,LOWORD(lParam),HIWORD(lParam),0,hwnd,0);
|
---|
| 115 | }
|
---|
| 116 | }
|
---|
| 117 | }
|
---|
| 118 | }
|
---|
| 119 | break;
|
---|
| 120 | case WM_COMMAND:
|
---|
| 121 | switch(LOWORD(wParam)){
|
---|
| 122 |
|
---|
| 123 | case IDM_PROCEDURETREE_SHOW:
|
---|
| 124 | extern BOOL bSearchingClasses;
|
---|
| 125 | if(bSearchingClasses){
|
---|
| 126 | pobj_ClassTreeView->bShowSwitch=1;
|
---|
| 127 | break;
|
---|
| 128 | }
|
---|
| 129 |
|
---|
| 130 | hTreeItem=TreeView_GetSelection(hProcedureTreeView);
|
---|
| 131 | for(i=0;i<pobj_ClassTreeView->NumberOfProcedures;i++){
|
---|
| 132 | if(pobj_ClassTreeView->pProcInfo[i].hTreeItem==hTreeItem){
|
---|
| 133 |
|
---|
[619] | 134 | if( projectInfo.IsOpened() ){
|
---|
[81] | 135 | // 対象ファイルを開く
|
---|
| 136 | lstrcpy(temporary,
|
---|
[655] | 137 | projectInfo.fileSystem.root.FindFile( pobj_ClassTreeView->pProcInfo[i].hFileTreeItem ).GetRelationalPath().c_str());
|
---|
[620] | 138 | lstrcpy( temporary, projectInfo.GetWorkDir().GetFullPath( temporary ).c_str() );
|
---|
[81] | 139 | hChild=OpenFileWithExtension(temporary);
|
---|
| 140 | }
|
---|
| 141 | else{
|
---|
| 142 | hChild = GetWindow(hClient,GW_CHILD);
|
---|
| 143 | }
|
---|
| 144 |
|
---|
[3] | 145 | //プロシージャの行を選択する
|
---|
| 146 | //ResetScrollbarが再描画時に呼び出されるので、再描画する
|
---|
| 147 | WndNum=GetWndNum(hChild);
|
---|
[629] | 148 | InvalidateRect(MdiInfo[WndNum]->pMdiTextEdit->hEdit,NULL,0);
|
---|
| 149 | UpdateWindow(MdiInfo[WndNum]->pMdiTextEdit->hEdit);
|
---|
[3] | 150 | TextEdit_SelectOneLine(WndNum,pobj_ClassTreeView->pProcInfo[i].code_pos,TRUE);
|
---|
| 151 |
|
---|
| 152 | //タイマーをセット
|
---|
| 153 | // ※フォーカスをエディタにセットするため
|
---|
| 154 | // ※タイミングを遅らせてSetFocusを実行する必要あり
|
---|
| 155 | SetTimer(hwnd,100,10,NULL);
|
---|
| 156 |
|
---|
| 157 | break;
|
---|
| 158 | }
|
---|
| 159 | }
|
---|
[81] | 160 |
|
---|
[3] | 161 | break;
|
---|
| 162 |
|
---|
| 163 | case IDM_MATERIALTREE_INSERTCURSOR:
|
---|
| 164 | Project_CursorResInsert();
|
---|
| 165 | break;
|
---|
| 166 | case IDM_MATERIALTREE_INSERTBITMAP:
|
---|
| 167 | Project_BitmapResInsert();
|
---|
| 168 | break;
|
---|
| 169 | case IDM_MATERIALTREE_INSERTICON:
|
---|
| 170 | Project_IconResInsert();
|
---|
| 171 | break;
|
---|
| 172 | case IDM_MATERIALTREE_INSERTMENU:
|
---|
| 173 | Project_Menu_Insert();
|
---|
| 174 | break;
|
---|
| 175 | case IDM_MATERIALTREE_INSERTWINDOW:
|
---|
| 176 | Project_Window_Insert();
|
---|
| 177 | break;
|
---|
| 178 | case IDM_MATERIALTREE_OPEN:
|
---|
| 179 | hTreeItem=TreeView_GetSelection(hMaterialTreeView);
|
---|
[618] | 180 | for(i=0;i<static_cast<int>(projectInfo.windowInfos.size());i++){
|
---|
| 181 | if(projectInfo.windowInfos[i]->hTreeItem==hTreeItem){
|
---|
| 182 | NewRadWindow( *projectInfo.windowInfos[i] );
|
---|
[3] | 183 | break;
|
---|
| 184 | }
|
---|
| 185 | }
|
---|
[618] | 186 | for(i=0;i<projectInfo.NumberOfMenu;i++){
|
---|
| 187 | if(projectInfo.pMenuInfo[i].hTreeItem==hTreeItem){
|
---|
| 188 | NewMenuWindow(&projectInfo.pMenuInfo[i]);
|
---|
[3] | 189 | break;
|
---|
| 190 | }
|
---|
| 191 | }
|
---|
[624] | 192 | BOOST_FOREACH( const ActiveBasic::Common::ResourceItem &resourceItem, projectInfo.resourceManager.iconResources )
|
---|
| 193 | {
|
---|
| 194 | if( resourceItem.hTreeItem == hTreeItem )
|
---|
| 195 | {
|
---|
[623] | 196 | NewIconEditWindow(
|
---|
[624] | 197 | projectInfo.GetWorkDir().GetFullPath( resourceItem.filepath ).c_str()
|
---|
[623] | 198 | );
|
---|
[3] | 199 | break;
|
---|
| 200 | }
|
---|
| 201 | }
|
---|
| 202 | break;
|
---|
| 203 | case IDM_MATERIALTREE_DELETE:
|
---|
| 204 | hTreeItem=TreeView_GetSelection(hMaterialTreeView);
|
---|
[624] | 205 | for(i=0;i<static_cast<int>(projectInfo.resourceManager.cursorResources.size());i++){
|
---|
[623] | 206 | if(projectInfo.resourceManager.cursorResources[i].hTreeItem==hTreeItem){
|
---|
[3] | 207 |
|
---|
| 208 | //"%s カーソルをプロジェクトから削除します。よろしいですか?"
|
---|
[623] | 209 | sprintf(str,STRING_PJ_CHECK_DELETECURSOR,projectInfo.resourceManager.cursorResources[i].idName.c_str());
|
---|
[3] | 210 | if(IDCANCEL==MessageBox(hOwner,str,APPLICATION_NAME,MB_OKCANCEL|MB_ICONEXCLAMATION)) break;
|
---|
| 211 |
|
---|
| 212 | Project_Cursor_Delete(i);
|
---|
| 213 | break;
|
---|
| 214 | }
|
---|
| 215 | }
|
---|
[624] | 216 | for(i=0;i<static_cast<int>(projectInfo.resourceManager.bitmapResources.size());i++){
|
---|
[623] | 217 | if(projectInfo.resourceManager.bitmapResources[i].hTreeItem==hTreeItem){
|
---|
[3] | 218 |
|
---|
| 219 | //"%s ビットマップをプロジェクトから削除します。よろしいですか?"
|
---|
[623] | 220 | sprintf(str,STRING_PJ_CHECK_DELETEBITMAP,projectInfo.resourceManager.bitmapResources[i].idName.c_str());
|
---|
[3] | 221 | if(IDCANCEL==MessageBox(hOwner,str,APPLICATION_NAME,MB_OKCANCEL|MB_ICONEXCLAMATION)) break;
|
---|
| 222 |
|
---|
| 223 | Project_Bitmap_Delete(i);
|
---|
| 224 | break;
|
---|
| 225 | }
|
---|
| 226 | }
|
---|
[624] | 227 | for(i=0;i<static_cast<int>(projectInfo.resourceManager.iconResources.size());i++){
|
---|
[623] | 228 | if(projectInfo.resourceManager.iconResources[i].hTreeItem==hTreeItem){
|
---|
[3] | 229 |
|
---|
| 230 | //"%s アイコンをプロジェクトから削除します。よろしいですか?"
|
---|
[623] | 231 | sprintf(str,STRING_PJ_CHECK_DELETEICON,projectInfo.resourceManager.iconResources[i].idName.c_str());
|
---|
[3] | 232 | if(IDCANCEL==MessageBox(hOwner,str,APPLICATION_NAME,MB_OKCANCEL|MB_ICONEXCLAMATION)) break;
|
---|
| 233 |
|
---|
| 234 | Project_Icon_Delete(i);
|
---|
| 235 | break;
|
---|
| 236 | }
|
---|
| 237 | }
|
---|
[618] | 238 | for(i=0;i<projectInfo.NumberOfMenu;i++){
|
---|
| 239 | if(projectInfo.pMenuInfo[i].hTreeItem==hTreeItem){
|
---|
[3] | 240 |
|
---|
| 241 | //"%s メニューをプロジェクトから削除します。よろしいですか?"
|
---|
[618] | 242 | sprintf(str,STRING_PJ_CHECK_DELETEMENU,projectInfo.pMenuInfo[i].IdName);
|
---|
[3] | 243 | if(IDCANCEL==MessageBox(hOwner,str,APPLICATION_NAME,MB_OKCANCEL|MB_ICONEXCLAMATION)) break;
|
---|
| 244 |
|
---|
| 245 | Project_Menu_Delete(i);
|
---|
| 246 | break;
|
---|
| 247 | }
|
---|
| 248 | }
|
---|
[618] | 249 | for(i=0;i<static_cast<int>(projectInfo.windowInfos.size());i++){
|
---|
| 250 | if(projectInfo.windowInfos[i]->hTreeItem==hTreeItem){
|
---|
[3] | 251 |
|
---|
| 252 | //"%s ウィンドウをプロジェクトから削除します。よろしいですか?"
|
---|
[618] | 253 | sprintf(str,STRING_PJ_CHECK_DELETEWINDOW,projectInfo.windowInfos[i]->GetName().c_str());
|
---|
[3] | 254 | if(IDCANCEL==MessageBox(hOwner,str,APPLICATION_NAME,MB_OKCANCEL|MB_ICONEXCLAMATION)) break;
|
---|
| 255 |
|
---|
| 256 | Project_Window_Delete(i);
|
---|
| 257 | break;
|
---|
| 258 | }
|
---|
| 259 | }
|
---|
| 260 | break;
|
---|
| 261 | case IDM_MENUTREE_RENAMEID:
|
---|
| 262 | extern char NewIdName[MAX_PATH];
|
---|
| 263 | hTreeItem=TreeView_GetSelection(hMaterialTreeView);
|
---|
[624] | 264 | for(i=0;i<static_cast<int>(projectInfo.resourceManager.cursorResources.size());i++){
|
---|
[623] | 265 | if(projectInfo.resourceManager.cursorResources[i].hTreeItem==hTreeItem){
|
---|
[3] | 266 | Project_Cursor_RenameID(i);
|
---|
| 267 | break;
|
---|
| 268 | }
|
---|
| 269 | }
|
---|
[624] | 270 | for(i=0;i<static_cast<int>(projectInfo.resourceManager.bitmapResources.size());i++){
|
---|
[623] | 271 | if(projectInfo.resourceManager.bitmapResources[i].hTreeItem==hTreeItem){
|
---|
[3] | 272 | Project_Bitmap_RenameID(i);
|
---|
| 273 | break;
|
---|
| 274 | }
|
---|
| 275 | }
|
---|
[624] | 276 | for(i=0;i<static_cast<int>(projectInfo.resourceManager.iconResources.size());i++){
|
---|
[623] | 277 | if(projectInfo.resourceManager.iconResources[i].hTreeItem==hTreeItem){
|
---|
[3] | 278 | Project_Icon_RenameID(i);
|
---|
| 279 | }
|
---|
| 280 | }
|
---|
[618] | 281 | for(i=0;i<projectInfo.NumberOfMenu;i++){
|
---|
| 282 | if(projectInfo.pMenuInfo[i].hTreeItem==hTreeItem){
|
---|
[794] | 283 | if (!ActiveBasic::Resource::DialogBoxAlt(hResInst,IDD_INPUTID, hOwner, DlgProject_MenuID_Input, reinterpret_cast<LPARAM>(projectInfo.pMenuInfo[i].IdName)))
|
---|
| 284 | {
|
---|
| 285 | break;
|
---|
| 286 | }
|
---|
[3] | 287 |
|
---|
| 288 | //重複チェック
|
---|
[618] | 289 | for(i2=0;i2<projectInfo.NumberOfMenu;i2++){
|
---|
[3] | 290 | if(i2==i) continue;
|
---|
[618] | 291 | if(lstrcmp(NewIdName,projectInfo.pMenuInfo[i2].IdName)==0){
|
---|
[3] | 292 | //"ID \"%s\" は既にプロジェクト内に存在します。"
|
---|
| 293 | sprintf(temporary,STRING_DUPLICATIONERROR_ID_IN_PROJECT,NewIdName);
|
---|
| 294 | MessageBox(hOwner,temporary,STRING_ERROR,MB_OK|MB_ICONEXCLAMATION);
|
---|
| 295 | return 0;
|
---|
| 296 | }
|
---|
| 297 | }
|
---|
| 298 |
|
---|
[618] | 299 | HeapDefaultFree(projectInfo.pMenuInfo[i].IdName);
|
---|
| 300 | projectInfo.pMenuInfo[i].IdName=(char *)HeapAlloc(hHeap,0,lstrlen(NewIdName)+1);
|
---|
| 301 | lstrcpy(projectInfo.pMenuInfo[i].IdName,NewIdName);
|
---|
[3] | 302 |
|
---|
| 303 | tvItem.hItem=hTreeItem;
|
---|
| 304 | tvItem.mask=TVIF_TEXT;
|
---|
[618] | 305 | tvItem.pszText=projectInfo.pMenuInfo[i].IdName;
|
---|
| 306 | tvItem.cchTextMax=lstrlen(projectInfo.pMenuInfo[i].IdName)+1;
|
---|
[3] | 307 | TreeView_SetItem(hMaterialTreeView,&tvItem);
|
---|
| 308 |
|
---|
[618] | 309 | projectInfo.ModifyOfMaterial=1;
|
---|
[3] | 310 |
|
---|
| 311 | TreeView_SortChildren(hMaterialTreeView,
|
---|
| 312 | TreeView_GetParent(hMaterialTreeView,hTreeItem),
|
---|
| 313 | 0);
|
---|
| 314 | break;
|
---|
| 315 | }
|
---|
| 316 | }
|
---|
| 317 | break;
|
---|
| 318 | case IDM_MATERIALTREE_ICON_SETMAIN:
|
---|
| 319 | hTreeItem=TreeView_GetSelection(hMaterialTreeView);
|
---|
[624] | 320 | for(i=0;i<static_cast<int>(projectInfo.resourceManager.iconResources.size());i++){
|
---|
[623] | 321 | if(projectInfo.resourceManager.iconResources[i].hTreeItem==hTreeItem){
|
---|
[3] | 322 | if(i==0) break;
|
---|
| 323 |
|
---|
[623] | 324 | ActiveBasic::Common::ResourceItem tempItem = projectInfo.resourceManager.iconResources[i];
|
---|
| 325 | Jenga::Common::EraseVectorItem<ActiveBasic::Common::ResourceItems>( projectInfo.resourceManager.iconResources, i );
|
---|
| 326 | projectInfo.resourceManager.iconResources.insert( projectInfo.resourceManager.iconResources.begin(), tempItem );
|
---|
[3] | 327 |
|
---|
[623] | 328 | tvItem.hItem=projectInfo.resourceManager.iconResources[1].hTreeItem;
|
---|
[3] | 329 | tvItem.mask=TVIF_TEXT;
|
---|
[623] | 330 | lstrcpy( temporary, projectInfo.resourceManager.iconResources[1].idName.c_str() );
|
---|
| 331 | tvItem.pszText = temporary;
|
---|
| 332 | tvItem.cchTextMax=lstrlen(temporary)+1;
|
---|
[3] | 333 | TreeView_SetItem(hMaterialTreeView,&tvItem);
|
---|
| 334 |
|
---|
[623] | 335 | tvItem.hItem=projectInfo.resourceManager.iconResources[0].hTreeItem;
|
---|
[3] | 336 | tvItem.mask=TVIF_TEXT;
|
---|
[623] | 337 | sprintf(temporary,"%s (Main)",projectInfo.resourceManager.iconResources[0].idName.c_str());
|
---|
[3] | 338 | tvItem.pszText=temporary;
|
---|
| 339 | tvItem.cchTextMax=lstrlen(temporary)+1;
|
---|
| 340 | TreeView_SetItem(hMaterialTreeView,&tvItem);
|
---|
| 341 |
|
---|
[618] | 342 | projectInfo.ModifuOfResource=1;
|
---|
[3] | 343 | break;
|
---|
| 344 | }
|
---|
| 345 | }
|
---|
| 346 | break;
|
---|
| 347 | }
|
---|
| 348 | break;
|
---|
| 349 | case WM_TIMER:
|
---|
| 350 | KillTimer(hwnd,wParam);
|
---|
| 351 |
|
---|
| 352 | //フォーカスをエディタにセット
|
---|
| 353 | SetFocus(GetWindow(GetWindow(hClient,GW_CHILD),GW_CHILD));
|
---|
| 354 | break;
|
---|
| 355 | case WM_NOTIFY:
|
---|
| 356 | NMHDR *hdr;
|
---|
| 357 | hdr=(NMHDR *)lParam;
|
---|
| 358 | if(hdr->code==NM_DBLCLK){
|
---|
| 359 | if(hdr->hwndFrom==hProcedureTreeView) SendMessage(hwnd,WM_COMMAND,IDM_PROCEDURETREE_SHOW,0);
|
---|
| 360 | else if(hdr->hwndFrom==hMaterialTreeView) SendMessage(hwnd,WM_COMMAND,IDM_MATERIALTREE_OPEN,0);
|
---|
| 361 | }
|
---|
| 362 | if(hdr->code==TVN_ITEMEXPANDEDW||hdr->code==TVN_ITEMEXPANDED){
|
---|
| 363 | NMTREEVIEW *nmTreeView;
|
---|
| 364 | TVITEM tvItem;
|
---|
| 365 | nmTreeView=(NMTREEVIEW *)lParam;
|
---|
| 366 | tvItem.mask=TVIF_HANDLE|TVIF_IMAGE|TVIF_SELECTEDIMAGE;
|
---|
| 367 | tvItem.hItem=nmTreeView->itemNew.hItem;
|
---|
| 368 | TreeView_GetItem(nmTreeView->hdr.hwndFrom,&tvItem);
|
---|
| 369 | if(tvItem.iImage==0||tvItem.iImage==1){
|
---|
| 370 | if(nmTreeView->action==TVE_EXPAND){
|
---|
| 371 | tvItem.iImage=1;
|
---|
| 372 | tvItem.iSelectedImage=1;
|
---|
| 373 | }
|
---|
| 374 | else if(nmTreeView->action==TVE_COLLAPSE){
|
---|
| 375 | tvItem.iImage=0;
|
---|
| 376 | tvItem.iSelectedImage=0;
|
---|
| 377 | }
|
---|
| 378 | tvItem.hItem=nmTreeView->itemNew.hItem;
|
---|
| 379 | TreeView_SetItem(nmTreeView->hdr.hwndFrom,&tvItem);
|
---|
| 380 | }
|
---|
| 381 | }
|
---|
| 382 | break;
|
---|
| 383 | }
|
---|
| 384 | return CallWindowProc(OldTabProc,hwnd,message,wParam,lParam);
|
---|
| 385 | }
|
---|
| 386 | void ResizeProjectView_ToolWindow(void){
|
---|
| 387 | extern HWND hProjectView_ToolWindow;
|
---|
| 388 | RECT rect;
|
---|
| 389 | GetClientRect(hProjectView_ToolWindow,&rect);
|
---|
| 390 | SendMessage(hProjectView_ToolWindow,WM_SIZE,0,MAKELONG(rect.right,rect.bottom));
|
---|
| 391 | }
|
---|
| 392 | LRESULT CALLBACK ProjectView_ToolWindowProc(HWND hwnd,UINT message,WPARAM wParam,LPARAM lParam){
|
---|
| 393 | extern HWND hProjectView;
|
---|
| 394 | switch(message){
|
---|
| 395 | case WM_SIZE:
|
---|
| 396 | MoveWindow(hProjectView,0,0,
|
---|
| 397 | LOWORD(lParam),
|
---|
| 398 | HIWORD(lParam),1);
|
---|
| 399 | return 0;
|
---|
| 400 | case WM_CLOSE:
|
---|
| 401 | SendMessage(hOwner,WM_COMMAND,IDM_PROJECTVIEW,0);
|
---|
| 402 | return 0;
|
---|
| 403 | }
|
---|
| 404 | return DefWindowProc(hwnd,message,wParam,lParam);
|
---|
| 405 | }
|
---|
[84] | 406 | void ShowFileView(){
|
---|
| 407 | TabCtrl_SetCurSel(hProjectViewTab,0);
|
---|
[651] | 408 | pobj_FileTree->ShowWindow( SW_SHOW );
|
---|
[84] | 409 | ShowWindow(hProcedureTreeView,SW_HIDE);
|
---|
| 410 | ShowWindow(hMaterialTreeView,SW_HIDE);
|
---|
| 411 | }
|
---|
| 412 | void ShowClassView(){
|
---|
| 413 | TabCtrl_SetCurSel(hProjectViewTab,1);
|
---|
[651] | 414 | pobj_FileTree->ShowWindow( SW_HIDE );
|
---|
[84] | 415 | ShowWindow(hMaterialTreeView,SW_HIDE);
|
---|
| 416 | ShowWindow(hProcedureTreeView,SW_SHOW);
|
---|
| 417 | }
|
---|
| 418 | void ShowMaterialView(){
|
---|
| 419 | TabCtrl_SetCurSel(hProjectViewTab,2);
|
---|
[651] | 420 | pobj_FileTree->ShowWindow( SW_HIDE );
|
---|
[84] | 421 | ShowWindow(hProcedureTreeView,SW_HIDE);
|
---|
| 422 | ShowWindow(hMaterialTreeView,SW_SHOW);
|
---|
| 423 | }
|
---|
[3] | 424 | LRESULT CALLBACK ProjectViewProc(HWND hwnd,UINT message,WPARAM wParam,LPARAM lParam){
|
---|
| 425 | extern HINSTANCE hInst,hResInst;
|
---|
| 426 | extern HWND hTabOfProjectView;
|
---|
| 427 | extern HFONT hStatusFont;
|
---|
| 428 | extern HWND hProjectView_ToolWindow;
|
---|
| 429 | RECT rect;
|
---|
| 430 | HWND hButton;
|
---|
| 431 |
|
---|
| 432 | switch(message){
|
---|
| 433 | case WM_CREATE:
|
---|
| 434 | hProjectViewTab=CreateWindow(WC_TABCONTROL,NULL,
|
---|
| 435 | WS_CHILD | WS_CLIPCHILDREN | WS_VISIBLE,
|
---|
| 436 | 0,0,0,0,hwnd,0,hInst,0);
|
---|
| 437 | SendMessage(hProjectViewTab,WM_SETFONT,(long)hStatusFont,0);
|
---|
| 438 |
|
---|
| 439 | hButton=CreateWindow("BUTTON","↓",WS_CHILD|WS_VISIBLE,
|
---|
| 440 | 0,0,30,13,
|
---|
| 441 | hwnd,(HMENU)IDC_CLIP,hInst,0);
|
---|
| 442 | SendMessage(hButton,WM_SETFONT,(long)hStatusFont,0);
|
---|
| 443 |
|
---|
[302] | 444 | OldTabProc=(WNDPROC)GetWindowLongPtr(hProjectViewTab,GWLP_WNDPROC);
|
---|
| 445 | SetWindowLongPtr(hProjectViewTab,GWLP_WNDPROC,(long)TabProc);
|
---|
[3] | 446 |
|
---|
| 447 | //タブを設定
|
---|
| 448 | TC_ITEM tcItem;
|
---|
| 449 | tcItem.mask=TCIF_TEXT;
|
---|
| 450 | tcItem.pszText="File";
|
---|
| 451 | TabCtrl_InsertItem(hProjectViewTab,0,&tcItem);
|
---|
| 452 | tcItem.mask=TCIF_TEXT;
|
---|
| 453 | tcItem.pszText="Class";
|
---|
| 454 | TabCtrl_InsertItem(hProjectViewTab,1,&tcItem);
|
---|
| 455 | tcItem.mask=TCIF_TEXT;
|
---|
| 456 | tcItem.pszText="Material";
|
---|
| 457 | TabCtrl_InsertItem(hProjectViewTab,2,&tcItem);
|
---|
| 458 |
|
---|
| 459 | //ファイルツリービューを作成
|
---|
[651] | 460 | pobj_FileTree = new FileListTreeViewCtrl( hProjectViewTab );
|
---|
[3] | 461 |
|
---|
| 462 | //クラスツリービューを作成
|
---|
| 463 | hProcedureTreeView=CreateWindowEx(WS_EX_CLIENTEDGE,WC_TREEVIEW,"",
|
---|
| 464 | WS_CHILD|TVS_HASLINES|TVS_HASBUTTONS|TVS_LINESATROOT|TVS_SHOWSELALWAYS,
|
---|
| 465 | 0,0,0,0,
|
---|
| 466 | hProjectViewTab,0,hInst,0);
|
---|
[302] | 467 | OldProcedureTreeViewProc=(WNDPROC)GetWindowLongPtr(hProcedureTreeView,GWLP_WNDPROC);
|
---|
| 468 | SetWindowLongPtr(hProcedureTreeView,GWLP_WNDPROC,(long)ProcedureTreeViewProc);
|
---|
[3] | 469 | //イメージリスト読み込み、設定
|
---|
| 470 | hProcedureTreeViewImageList=ImageList_Create(16,16,ILC_COLOR24|ILC_MASK,8,0);
|
---|
[793] | 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));
|
---|
[3] | 479 | TreeView_SetImageList(hProcedureTreeView,hProcedureTreeViewImageList,TVSIL_NORMAL);
|
---|
| 480 |
|
---|
| 481 | //マテリアルツリービューを作成
|
---|
| 482 | hMaterialTreeView=CreateWindowEx(WS_EX_CLIENTEDGE,WC_TREEVIEW,"",
|
---|
| 483 | WS_CHILD|TVS_HASLINES|TVS_HASBUTTONS|TVS_LINESATROOT|TVS_SHOWSELALWAYS,
|
---|
| 484 | 0,0,0,0,
|
---|
| 485 | hProjectViewTab,0,hInst,0);
|
---|
[302] | 486 | OldMaterialTreeViewProc=(WNDPROC)GetWindowLongPtr(hMaterialTreeView,GWLP_WNDPROC);
|
---|
| 487 | SetWindowLongPtr(hMaterialTreeView,GWLP_WNDPROC,(long)MaterialTreeViewProc);
|
---|
[3] | 488 | //イメージリスト読み込み、設定
|
---|
| 489 | hMaterialTreeViewImageList=ImageList_Create(16,16,ILC_COLOR24|ILC_MASK,3,0);
|
---|
[793] | 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));
|
---|
[3] | 497 | TreeView_SetImageList(hMaterialTreeView,hMaterialTreeViewImageList,TVSIL_NORMAL);
|
---|
| 498 |
|
---|
[651] | 499 | pobj_FileTree->ShowWindow( SW_SHOW );
|
---|
[3] | 500 | GetClientRect(hwnd,&rect);
|
---|
| 501 | SendMessage(hwnd,WM_SIZE,0,MAKELONG(rect.right,rect.bottom));
|
---|
| 502 | return 0;
|
---|
| 503 | case WM_COMMAND:
|
---|
| 504 | switch(LOWORD(wParam)){
|
---|
| 505 | case IDC_CLIP:
|
---|
| 506 | if(pobj_nv->bClipProjectView==0){
|
---|
| 507 | pobj_nv->bClipProjectView=1;
|
---|
| 508 |
|
---|
[302] | 509 | SetWindowLongPtr(hwnd,GWL_EXSTYLE,WS_EX_STATICEDGE);
|
---|
[3] | 510 | SetParent(hwnd,hOwner);
|
---|
[629] | 511 | ActiveBasic::IDE::Program::mainFrame.Resized();
|
---|
[3] | 512 |
|
---|
| 513 | ShowWindow(hProjectView_ToolWindow,SW_HIDE);
|
---|
| 514 | }
|
---|
| 515 | else{
|
---|
| 516 | pobj_nv->bClipProjectView=0;
|
---|
| 517 |
|
---|
[302] | 518 | SetWindowLongPtr(hwnd,GWL_EXSTYLE,0);
|
---|
[3] | 519 |
|
---|
| 520 | SetParent(hwnd,hProjectView_ToolWindow);
|
---|
| 521 |
|
---|
[629] | 522 | ActiveBasic::IDE::Program::mainFrame.Resized();
|
---|
[3] | 523 | ResizeProjectView_ToolWindow();
|
---|
| 524 |
|
---|
| 525 | ShowWindow(hProjectView_ToolWindow,SW_SHOW);
|
---|
| 526 | }
|
---|
| 527 | return 0;
|
---|
| 528 | }
|
---|
| 529 | break;
|
---|
| 530 | case WM_NOTIFY:
|
---|
| 531 | NMHDR *hdr;
|
---|
| 532 | hdr=(NMHDR *)lParam;
|
---|
| 533 | if(hdr->hwndFrom==hProjectViewTab&&hdr->code==TCN_SELCHANGE){
|
---|
[84] | 534 | switch( TabCtrl_GetCurSel(hProjectViewTab) ){
|
---|
| 535 | case 0:
|
---|
| 536 | ShowFileView();
|
---|
| 537 | break;
|
---|
| 538 | case 1:
|
---|
| 539 | ShowClassView();
|
---|
| 540 | break;
|
---|
| 541 | case 2:
|
---|
| 542 | ShowMaterialView();
|
---|
| 543 | break;
|
---|
[3] | 544 | }
|
---|
| 545 | }
|
---|
| 546 | return 0;
|
---|
| 547 | case WM_PAINT:
|
---|
| 548 | PAINTSTRUCT ps;
|
---|
| 549 | HDC hdc;
|
---|
| 550 | HFONT hOldFont;
|
---|
| 551 | SIZE size;
|
---|
| 552 | HBRUSH hBrush,hOldBrush;
|
---|
| 553 | HPEN hPen,hOldPen;
|
---|
| 554 | char temporary[MAX_PATH];
|
---|
| 555 |
|
---|
| 556 | if(pobj_nv->bClipProjectView==0) break;
|
---|
| 557 |
|
---|
| 558 | hBrush=CreateSolidBrush(GetSysColor(COLOR_3DSHADOW));
|
---|
| 559 | hPen=CreatePen(PS_SOLID,0,GetSysColor(COLOR_3DSHADOW));
|
---|
| 560 |
|
---|
| 561 | hdc=BeginPaint(hwnd,&ps);
|
---|
| 562 |
|
---|
| 563 | hOldFont=(HFONT)SelectObject(hdc,hStatusFont);
|
---|
[619] | 564 | if( projectInfo.IsOpened() ){
|
---|
| 565 | sprintf(temporary,"%s \'%s\'",STRING_PROJECT,projectInfo.GetName().c_str());
|
---|
[81] | 566 | }
|
---|
| 567 | else{
|
---|
| 568 | lstrcpy( temporary, "現在のドキュメント" );
|
---|
| 569 | }
|
---|
[3] | 570 |
|
---|
| 571 | GetTextExtentPoint32(hdc,temporary,lstrlen(temporary),&size);
|
---|
| 572 | GetClientRect(hwnd,&rect);
|
---|
| 573 | rect.left++;
|
---|
| 574 | rect.top++;
|
---|
| 575 | rect.right--;
|
---|
| 576 | rect.bottom=size.cy+2;
|
---|
| 577 |
|
---|
| 578 | hOldBrush=(HBRUSH)SelectObject(hdc,hBrush);
|
---|
| 579 | hOldPen=(HPEN)SelectObject(hdc,hPen);
|
---|
| 580 | Rectangle(hdc,rect.left,rect.top,rect.right,rect.bottom);
|
---|
| 581 | SelectObject(hdc,hOldBrush);
|
---|
| 582 | SelectObject(hdc,hPen);
|
---|
| 583 |
|
---|
| 584 | rect.top++;
|
---|
| 585 | rect.bottom--;
|
---|
| 586 | SetBkMode(hdc,OPAQUE);
|
---|
| 587 | SetBkColor(hdc,GetSysColor(COLOR_3DSHADOW));
|
---|
| 588 | SetTextColor(hdc,GetSysColor(COLOR_3DHILIGHT));
|
---|
| 589 | DrawText(hdc,temporary,lstrlen(temporary),&rect,DT_CENTER|DT_VCENTER|DT_SINGLELINE);
|
---|
| 590 |
|
---|
| 591 | EndPaint(hwnd,&ps);
|
---|
| 592 |
|
---|
| 593 | DeleteObject(hBrush);
|
---|
| 594 | DeleteObject(hPen);
|
---|
| 595 | return 0;
|
---|
| 596 | case WM_SIZE:
|
---|
| 597 | if(pobj_nv->bClipProjectView){
|
---|
| 598 | MoveWindow(hProjectViewTab,
|
---|
| 599 | LEVER_THICK,
|
---|
| 600 | LEVER_THICK+11,
|
---|
| 601 | LOWORD(lParam)-LEVER_THICK*2,
|
---|
| 602 | HIWORD(lParam)-LEVER_THICK*2-21,1);
|
---|
| 603 |
|
---|
| 604 | GetClientRect(hProjectViewTab,&rect);
|
---|
| 605 | TabCtrl_AdjustRect(hProjectViewTab,FALSE,&rect);
|
---|
| 606 | rect.left-=2;
|
---|
| 607 | rect.right++;
|
---|
| 608 | rect.bottom++;
|
---|
| 609 |
|
---|
[651] | 610 | pobj_FileTree->MoveWindow(rect.left,rect.top,rect.right-rect.left,rect.bottom-rect.top);
|
---|
[3] | 611 | MoveWindow(hProcedureTreeView,
|
---|
| 612 | rect.left,rect.top,rect.right-rect.left,rect.bottom-rect.top,1);
|
---|
| 613 | MoveWindow(hMaterialTreeView,
|
---|
| 614 | rect.left,rect.top,rect.right-rect.left,rect.bottom-rect.top,1);
|
---|
| 615 |
|
---|
| 616 | GetClientRect(GetDlgItem(hwnd,IDC_CLIP),&rect);
|
---|
| 617 | MoveWindow(GetDlgItem(hwnd,IDC_CLIP),LOWORD(lParam)-rect.right,HIWORD(lParam)-rect.bottom,rect.right,rect.bottom,1);
|
---|
| 618 | InvalidateRect(GetDlgItem(hwnd,IDC_CLIP),NULL,0);
|
---|
| 619 | }
|
---|
| 620 | else{
|
---|
| 621 | MoveWindow(hProjectViewTab,0,0,
|
---|
| 622 | LOWORD(lParam),
|
---|
| 623 | HIWORD(lParam)-15,1);
|
---|
| 624 |
|
---|
| 625 | GetClientRect(hProjectViewTab,&rect);
|
---|
| 626 | TabCtrl_AdjustRect(hProjectViewTab,FALSE,&rect);
|
---|
| 627 |
|
---|
[651] | 628 | pobj_FileTree->MoveWindow(rect.left,rect.top,rect.right-rect.left,rect.bottom-rect.top);
|
---|
[3] | 629 | MoveWindow(hProcedureTreeView,
|
---|
| 630 | rect.left,rect.top,rect.right-rect.left,rect.bottom-rect.top,1);
|
---|
| 631 | MoveWindow(hMaterialTreeView,
|
---|
| 632 | rect.left,rect.top,rect.right-rect.left,rect.bottom-rect.top,1);
|
---|
| 633 |
|
---|
| 634 | GetClientRect(GetDlgItem(hwnd,IDC_CLIP),&rect);
|
---|
| 635 | MoveWindow(GetDlgItem(hwnd,IDC_CLIP),LOWORD(lParam)-rect.right,HIWORD(lParam)-rect.bottom,rect.right,rect.bottom,1);
|
---|
| 636 | }
|
---|
| 637 | return 0;
|
---|
| 638 | case WM_CLOSE:
|
---|
| 639 | SendMessage(hOwner,WM_COMMAND,IDM_PROJECTVIEW,0);
|
---|
| 640 | return 0;
|
---|
| 641 | case WM_DESTROY:
|
---|
| 642 | delete pobj_FileTree;
|
---|
| 643 | ImageList_Destroy(hProcedureTreeViewImageList);
|
---|
| 644 | ImageList_Destroy(hMaterialTreeViewImageList);
|
---|
| 645 | return 0;
|
---|
| 646 | }
|
---|
| 647 | return DefWindowProc(hwnd,message,wParam,lParam);
|
---|
| 648 | }
|
---|
| 649 |
|
---|
| 650 | void Project_File_Insert(char *path){
|
---|
| 651 | extern HANDLE hHeap;
|
---|
| 652 | char temporary[MAX_PATH],temp2[MAX_PATH];
|
---|
| 653 |
|
---|
[620] | 654 | lstrcpy( path, projectInfo.GetWorkDir().GetRelationalPath( path ).c_str() );
|
---|
[3] | 655 |
|
---|
| 656 | //重複チェック
|
---|
[655] | 657 | if( projectInfo.fileSystem.root.IsExistFile( path ) )
|
---|
| 658 | {
|
---|
[3] | 659 | //"\"%s\" ファイルは既にプロジェクト内に存在します。"
|
---|
| 660 | sprintf(temporary,STRING_DUPLICATIONERROR_FILE_IN_PROJECT,path);
|
---|
| 661 | MessageBox(hOwner,temporary,APPLICATION_NAME,MB_OK|MB_ICONEXCLAMATION);
|
---|
| 662 | return;
|
---|
| 663 | }
|
---|
| 664 |
|
---|
| 665 |
|
---|
| 666 | //////////////////////
|
---|
| 667 | //ツリービューに追加
|
---|
| 668 | HTREEITEM hTreeItem;
|
---|
| 669 | _splitpath(path,0,0,temporary,temp2);
|
---|
| 670 | lstrcat(temporary,temp2);
|
---|
[653] | 671 | hTreeItem=pobj_FileTree->Insert( temporary );
|
---|
[3] | 672 |
|
---|
| 673 |
|
---|
[618] | 674 | //projectInfo.ppobj_DBFileInfoオブジェクトに追加
|
---|
[655] | 675 | projectInfo.fileSystem.root.files.push_back( ActiveBasic::PM::FM::File( path, hTreeItem ) );
|
---|
[3] | 676 |
|
---|
| 677 |
|
---|
[618] | 678 | projectInfo.modify=1;
|
---|
[3] | 679 |
|
---|
| 680 | //ファイル操作によるクラスビューの再表示
|
---|
[655] | 681 | ResetClassTree((HTREEITEM)-1);
|
---|
[3] | 682 | }
|
---|
| 683 | void Project_File_Delete(HTREEITEM hTreeItem){
|
---|
| 684 | extern HANDLE hHeap;
|
---|
| 685 |
|
---|
[655] | 686 | /*if(projectInfo.pobj_DBFileInfo->IsMainFile(hTreeItem)){
|
---|
[3] | 687 | //"このファイルはプロジェクトのメイン ファイルです。プロジェクト内から削除することはできません。"
|
---|
| 688 | MessageBox(hOwner,STRING_ERROR_CANT_MAINFILE,STRING_ERROR,MB_OK|MB_ICONEXCLAMATION);
|
---|
| 689 | return;
|
---|
[655] | 690 | }*/
|
---|
[3] | 691 |
|
---|
| 692 | //ツリービューから削除
|
---|
[651] | 693 | pobj_FileTree->DeleteItem( hTreeItem );
|
---|
[3] | 694 |
|
---|
[655] | 695 | // オブジェクトから削除
|
---|
| 696 | projectInfo.fileSystem.root.Remove( hTreeItem );
|
---|
[3] | 697 |
|
---|
[618] | 698 | projectInfo.modify=1;
|
---|
[3] | 699 |
|
---|
| 700 | //ファイル操作によるクラスビューの再表示
|
---|
[655] | 701 | ResetClassTree((HTREEITEM)-1);
|
---|
[3] | 702 | }
|
---|
| 703 |
|
---|
| 704 | void MakeNewProject(){
|
---|
| 705 | extern HANDLE hHeap;
|
---|
| 706 | extern NEWPROJECTINFO NewProjectInfo;
|
---|
| 707 | int i;
|
---|
| 708 | char buffer[GENERAL_SIZE],dir[MAX_PATH],temporary[MAX_PATH],*pTemp;
|
---|
| 709 | HANDLE hFind;
|
---|
| 710 | WIN32_FIND_DATA wfd;
|
---|
| 711 |
|
---|
| 712 | //既にプロジェクトが開かれている場合は閉じる
|
---|
[619] | 713 | if( projectInfo.IsOpened() ){
|
---|
| 714 | if(!projectInfo.Close()) return;
|
---|
[3] | 715 | }
|
---|
| 716 |
|
---|
| 717 | //ワークディレクトリを作成
|
---|
| 718 | i=lstrlen(pobj_nv->ProjectSaveDir);
|
---|
| 719 | if(pobj_nv->ProjectSaveDir[i-1]=='\\'&&pobj_nv->ProjectSaveDir[i-2]!=':') pobj_nv->ProjectSaveDir[i-1]=0;
|
---|
| 720 | sprintf(dir,"%s\\%s\\",pobj_nv->ProjectSaveDir,NewProjectInfo.name);
|
---|
| 721 | i=0;
|
---|
| 722 | while(!(dir[i]==':'||(dir[i-1]=='\\'&&dir[i]=='\\'))) i++;
|
---|
| 723 | if(dir[i]==':') i++;
|
---|
| 724 | else{
|
---|
| 725 | i++;
|
---|
| 726 | while(dir[i]!='\\') i++;
|
---|
| 727 | }
|
---|
| 728 | for(i++;;i++){
|
---|
| 729 | if(dir[i]=='\\'){
|
---|
| 730 | lstrcpy(temporary,dir);
|
---|
| 731 | temporary[i]=0;
|
---|
| 732 | hFind=FindFirstFile(temporary,&wfd);
|
---|
| 733 | if(hFind==INVALID_HANDLE_VALUE){
|
---|
| 734 | if(!CreateDirectory(temporary,NULL)){
|
---|
| 735 | MessageBox(hOwner,"ディレクトリを作成できませんでした",APPLICATION_NAME,MB_OK|MB_ICONEXCLAMATION);
|
---|
| 736 | return;
|
---|
| 737 | }
|
---|
| 738 | }
|
---|
| 739 | else FindClose(hFind);
|
---|
| 740 | }
|
---|
| 741 | if(dir[i]=='\0') break;
|
---|
| 742 | }
|
---|
| 743 |
|
---|
| 744 |
|
---|
| 745 | //////////////////////////////////////
|
---|
| 746 | // プロジェクトファイル(*.pj)を作成
|
---|
| 747 | //////////////////////////////////////
|
---|
| 748 |
|
---|
[608] | 749 | // 出力先拡張子
|
---|
| 750 | const std::string outputFileExt
|
---|
| 751 | = ( NewProjectInfo.dwTypeID == IDC_DLL ) ? ".dll"
|
---|
| 752 | : ( NewProjectInfo.dwTypeID == IDC_SLL ) ? ".lib"
|
---|
| 753 | : ".exe";
|
---|
| 754 |
|
---|
[3] | 755 | //先頭の注釈
|
---|
| 756 | lstrcpy(buffer,"\' ActiveBasic Project file.\r\n\r\n");
|
---|
| 757 | i=lstrlen(buffer);
|
---|
| 758 |
|
---|
| 759 | //プロジェクトのフォーマットバージョン
|
---|
| 760 | sprintf(buffer+i,"#VERSION=%d\r\n\r\n",PROJECT_VERSION);
|
---|
| 761 | i+=lstrlen(buffer+i);
|
---|
| 762 |
|
---|
| 763 | //モジュールタイプ(EXEならば0、DLLならば1)
|
---|
[608] | 764 | ActiveBasic::Common::TargetModuleType::EnumType moduleType
|
---|
| 765 | = ( NewProjectInfo.dwTypeID == IDC_DLL ) ? ActiveBasic::Common::TargetModuleType::Dll
|
---|
| 766 | : ( NewProjectInfo.dwTypeID == IDC_SLL ) ? ActiveBasic::Common::TargetModuleType::Sll
|
---|
| 767 | : ActiveBasic::Common::TargetModuleType::Exe;
|
---|
| 768 | lstrcpy(buffer+i,( (std::string)"#MODULETYPE=" + Jenga::Common::ToString( static_cast<int>(moduleType) ) + "\r\n\r\n" ).c_str());
|
---|
[3] | 769 | i+=lstrlen(buffer+i);
|
---|
| 770 |
|
---|
| 771 | //プロジェクト名
|
---|
| 772 | sprintf(buffer+i,"#NAME=%s\r\n\r\n",NewProjectInfo.name);
|
---|
| 773 | i+=lstrlen(buffer+i);
|
---|
| 774 |
|
---|
| 775 | lstrcpy(buffer+i,"#PLATFORM=32\r\n\r\n");
|
---|
| 776 | i+=lstrlen(buffer+i);
|
---|
| 777 |
|
---|
| 778 | //RADウィンドウの数
|
---|
| 779 | if(NewProjectInfo.dwTypeID==IDC_EXE_WINDOWBASE||
|
---|
| 780 | NewProjectInfo.dwTypeID==IDC_EXE_DIRECTX)
|
---|
| 781 | lstrcpy(buffer+i,"#USEWINDOW=1\r\n\r\n");
|
---|
| 782 | else lstrcpy(buffer+i,"#USEWINDOW=0\r\n\r\n");
|
---|
| 783 | i+=lstrlen(buffer+i);
|
---|
| 784 |
|
---|
| 785 | //プロジェクトオプション
|
---|
| 786 | sprintf(buffer+i,"#OPTION=&H%08x\r\n\r\n",NewProjectInfo.dwOption);
|
---|
| 787 | i+=lstrlen(buffer+i);
|
---|
| 788 |
|
---|
| 789 | //出力先(Release)
|
---|
[608] | 790 | sprintf(buffer+i,"#OUTPUT_RELEASE=.\\%s%s\r\n\r\n",NewProjectInfo.name, outputFileExt.c_str());
|
---|
[3] | 791 | i+=lstrlen(buffer+i);
|
---|
| 792 |
|
---|
| 793 | //出力先(Debug)
|
---|
[608] | 794 | sprintf(buffer+i,"#OUTPUT_DEBUG=.\\%s_debug%s\r\n\r\n",NewProjectInfo.name, outputFileExt.c_str());
|
---|
[3] | 795 | i+=lstrlen(buffer+i);
|
---|
| 796 |
|
---|
| 797 | //マニフェスト
|
---|
| 798 | sprintf(buffer+i,"#MANIFEST=%s.manifest.xml\r\n\r\n",NewProjectInfo.name);
|
---|
| 799 | i+=lstrlen(buffer+i);
|
---|
| 800 |
|
---|
| 801 | //デバッグ用(コマンドライン)
|
---|
| 802 | lstrcpy(buffer+i,"#DEBUG_CMD_LINE=\r\n\r\n");
|
---|
| 803 | i+=lstrlen(buffer+i);
|
---|
| 804 |
|
---|
| 805 | //デバッグ用(DLL用の実行ファイル)
|
---|
| 806 | lstrcpy(buffer+i,"#DEBUG_EXE_PATH=\r\n\r\n");
|
---|
| 807 | i+=lstrlen(buffer+i);
|
---|
| 808 |
|
---|
| 809 | //リソースファイル
|
---|
| 810 | lstrcpy(buffer+i,"#RESOURCE=0\r\n\r\n");
|
---|
| 811 | i+=lstrlen(buffer+i);
|
---|
| 812 |
|
---|
| 813 | //ソースファイル
|
---|
| 814 | sprintf(buffer+i,"#SOURCE\r\n%s.ab\r\n",NewProjectInfo.name);
|
---|
| 815 | i+=lstrlen(buffer+i);
|
---|
| 816 | if(NewProjectInfo.dwTypeID==IDC_EXE_WINDOWBASE||
|
---|
| 817 | NewProjectInfo.dwTypeID==IDC_EXE_DIRECTX){
|
---|
| 818 | lstrcpy(buffer+i,"MainWnd.ab\r\n");
|
---|
| 819 | i+=lstrlen(buffer+i);
|
---|
| 820 | }
|
---|
| 821 | if(NewProjectInfo.dwTypeID==IDC_EXE_DIRECTX){
|
---|
| 822 | lstrcpy(buffer+i,"dx_graphics.sbp\r\n");
|
---|
| 823 | i+=lstrlen(buffer+i);
|
---|
| 824 | lstrcpy(buffer+i,"dx_input.sbp\r\n");
|
---|
| 825 | i+=lstrlen(buffer+i);
|
---|
| 826 | lstrcpy(buffer+i,"dx_music.sbp\r\n");
|
---|
| 827 | i+=lstrlen(buffer+i);
|
---|
| 828 | }
|
---|
| 829 |
|
---|
| 830 | //保存
|
---|
| 831 | sprintf(temporary,"%s%s.pj",dir,NewProjectInfo.name);
|
---|
[705] | 832 | hFind=FindFirstFile(temporary,&wfd);
|
---|
| 833 | if(hFind!=INVALID_HANDLE_VALUE){
|
---|
| 834 | FindClose(hFind);
|
---|
[3] | 835 |
|
---|
[705] | 836 | //"指定したディレクトリにはすでにプロジェクトが存在します。上書きしますか?"
|
---|
| 837 | if(MessageBox(hOwner,STRING_ERROR_PROJECT_OVERWRITE,APPLICATION_NAME,MB_YESNO|MB_ICONEXCLAMATION)==IDNO) return;
|
---|
[3] | 838 | }
|
---|
| 839 | if(!WriteBuffer(temporary,buffer,i)) return;
|
---|
| 840 |
|
---|
| 841 |
|
---|
| 842 | ///////////////////////////////////////////
|
---|
| 843 | //メインプログラムファイル(*.ab)を作成
|
---|
| 844 | if(NewProjectInfo.dwTypeID==IDC_EXE_WINDOWBASE){
|
---|
| 845 | sprintf(buffer,"#include \"%s.idx\"\r\n\r\n",NewProjectInfo.name);
|
---|
| 846 | i=lstrlen(buffer);
|
---|
| 847 | lstrcpy(buffer+i,"'---------------------------\r\n");
|
---|
| 848 | i+=lstrlen(buffer+i);
|
---|
| 849 | lstrcpy(buffer+i,"' Window Message Loop\r\n");
|
---|
| 850 | i+=lstrlen(buffer+i);
|
---|
| 851 | lstrcpy(buffer+i,"'---------------------------\r\n");
|
---|
| 852 | i+=lstrlen(buffer+i);
|
---|
| 853 | lstrcpy(buffer+i,"Dim msgMain As MSG, iResult As Long\r\n");
|
---|
| 854 | i+=lstrlen(buffer+i);
|
---|
| 855 | lstrcpy(buffer+i,"Do\r\n");
|
---|
| 856 | i+=lstrlen(buffer+i);
|
---|
| 857 | lstrcpy(buffer+i,"\tiResult=GetMessage(msgMain,0,0,0)\r\n");
|
---|
| 858 | i+=lstrlen(buffer+i);
|
---|
| 859 | lstrcpy(buffer+i,"\tIf iResult=0 or iResult=-1 Then Exit Do\r\n");
|
---|
| 860 | i+=lstrlen(buffer+i);
|
---|
| 861 | lstrcpy(buffer+i,"\tTranslateMessage(msgMain)\r\n");
|
---|
| 862 | i+=lstrlen(buffer+i);
|
---|
| 863 | lstrcpy(buffer+i,"\tDispatchMessage(msgMain)\r\n");
|
---|
| 864 | i+=lstrlen(buffer+i);
|
---|
| 865 | lstrcpy(buffer+i,"Loop\r\n\r\n");
|
---|
| 866 | i+=lstrlen(buffer+i);
|
---|
| 867 | lstrcpy(buffer+i,"' Call destructores and exit process\r\n");
|
---|
| 868 | i+=lstrlen(buffer+i);
|
---|
| 869 | lstrcpy(buffer+i,"End\r\n");
|
---|
| 870 | i+=lstrlen(buffer+i);
|
---|
| 871 | }
|
---|
| 872 | else if(NewProjectInfo.dwTypeID==IDC_EXE_PROMPTBASE){
|
---|
| 873 | sprintf(buffer,"#include \"%s.idx\"\r\n\r\n",NewProjectInfo.name);
|
---|
| 874 | i=lstrlen(buffer);
|
---|
| 875 | lstrcpy(buffer+i,"#N88BASIC\r\n\r\n");
|
---|
| 876 | i+=lstrlen(buffer+i);
|
---|
| 877 | lstrcpy(buffer+i,"' ↓ ここからプログラムが実行されます\r\n\r\n");
|
---|
| 878 | i+=lstrlen(buffer+i);
|
---|
| 879 | if(NewProjectInfo.ShowHelloWorld){
|
---|
| 880 | lstrcpy(buffer+i,"Print \"Hello World!\"\r\n");
|
---|
| 881 | i+=lstrlen(buffer+i);
|
---|
| 882 | }
|
---|
| 883 | }
|
---|
| 884 | else if(NewProjectInfo.dwTypeID==IDC_EXE_DOSPROMPTBASE){
|
---|
| 885 | sprintf(buffer,"#include \"%s.idx\"\r\n\r\n",NewProjectInfo.name);
|
---|
| 886 | i=lstrlen(buffer);
|
---|
| 887 | lstrcpy(buffer+i,"#console\r\n\r\n");
|
---|
| 888 | i+=lstrlen(buffer+i);
|
---|
| 889 | lstrcpy(buffer+i,"' ↓ ここからプログラムが実行されます\r\n\r\n");
|
---|
| 890 | i+=lstrlen(buffer+i);
|
---|
| 891 | if(NewProjectInfo.ShowHelloWorld){
|
---|
| 892 | lstrcpy(buffer+i,"Print \"Hello World!\"\r\n");
|
---|
| 893 | i+=lstrlen(buffer+i);
|
---|
| 894 | }
|
---|
| 895 | }
|
---|
| 896 | else if(NewProjectInfo.dwTypeID==IDC_EXE_NOBASE){
|
---|
| 897 | sprintf(buffer,"#include \"%s.idx\"\r\n\r\n",NewProjectInfo.name);
|
---|
| 898 | i=lstrlen(buffer);
|
---|
| 899 | lstrcpy(buffer+i,"' ↓ ここからプログラムが実行されます\r\n\r\n");
|
---|
| 900 | i+=lstrlen(buffer+i);
|
---|
| 901 | }
|
---|
| 902 | else if(NewProjectInfo.dwTypeID==IDC_EXE_DIRECTX){
|
---|
[477] | 903 | const std::string mainExeDirectXAbpPath = ActiveBasic::Common::Environment::GetAbdevSystemDirPath() + "\\dx\\main_exe_directx.abp";
|
---|
[475] | 904 | pTemp = ReadBuffer( mainExeDirectXAbpPath );
|
---|
[3] | 905 |
|
---|
| 906 | //#name#をプロジェクト名に置換
|
---|
| 907 | pTemp=PermutationWndPgmTemplate(pTemp,NewProjectInfo.name,0,0,0);
|
---|
| 908 | }
|
---|
| 909 | else if(NewProjectInfo.dwTypeID==IDC_DLL){
|
---|
| 910 | sprintf(buffer,"#include \"%s.idx\"\r\n\r\n",NewProjectInfo.name);
|
---|
| 911 | i=lstrlen(buffer);
|
---|
| 912 | lstrcpy(buffer+i,"'-------------------------------------------------------------------\r\n");
|
---|
| 913 | i+=lstrlen(buffer+i);
|
---|
| 914 | lstrcpy(buffer+i,"' メモ - このファイルには、DLLの構成要素を記述します。\r\n");
|
---|
| 915 | i+=lstrlen(buffer+i);
|
---|
| 916 | lstrcpy(buffer+i,"' (例:関数定義、グローバル変数、定数定義など)\r\n");
|
---|
| 917 | i+=lstrlen(buffer+i);
|
---|
| 918 | lstrcpy(buffer+i,"'\r\n");
|
---|
| 919 | i+=lstrlen(buffer+i);
|
---|
| 920 | lstrcpy(buffer+i,"' エクスポートが必要な関数には、\"Export\" 修飾子を指定します。\r\n");
|
---|
| 921 | i+=lstrlen(buffer+i);
|
---|
| 922 | lstrcpy(buffer+i,"' (例:Function Export FuncName() As Long)\r\n");
|
---|
| 923 | i+=lstrlen(buffer+i);
|
---|
| 924 | lstrcpy(buffer+i,"'-------------------------------------------------------------------\r\n");
|
---|
| 925 | i+=lstrlen(buffer+i);
|
---|
| 926 | lstrcpy(buffer+i,"\r\n");
|
---|
| 927 | i+=lstrlen(buffer+i);
|
---|
| 928 | lstrcpy(buffer+i,"Function Export DllMain(hinstDLL As HINSTANCE, fdwReason As DWord, lpvReserved As VoidPtr) As Long\r\n");
|
---|
| 929 | i+=lstrlen(buffer+i);
|
---|
| 930 | lstrcpy(buffer+i,"\t'DLLエントリポイント\r\n");
|
---|
| 931 | i+=lstrlen(buffer+i);
|
---|
| 932 | lstrcpy(buffer+i,"\tSelect Case fdwReason\r\n");
|
---|
| 933 | i+=lstrlen(buffer+i);
|
---|
| 934 | lstrcpy(buffer+i,"\t\tCase DLL_PROCESS_ATTACH\r\n");
|
---|
| 935 | i+=lstrlen(buffer+i);
|
---|
| 936 | lstrcpy(buffer+i,"\t\t\t'DLLがプロセス空間にロードされた時に実行されます。\r\n");
|
---|
| 937 | i+=lstrlen(buffer+i);
|
---|
| 938 | lstrcpy(buffer+i,"\t\t\t_System_StartupProgram()\r\n");
|
---|
| 939 | i+=lstrlen(buffer+i);
|
---|
| 940 | lstrcpy(buffer+i,"\t\t\tDllMain=1\r\n");
|
---|
| 941 | i+=lstrlen(buffer+i);
|
---|
| 942 | lstrcpy(buffer+i,"\t\tCase DLL_PROCESS_DETACH\r\n");
|
---|
| 943 | i+=lstrlen(buffer+i);
|
---|
| 944 | lstrcpy(buffer+i,"\t\t\t_System_Call_Destructor_of_GlobalObject()\r\n");
|
---|
| 945 | i+=lstrlen(buffer+i);
|
---|
| 946 | lstrcpy(buffer+i,"\tEnd Select\r\n");
|
---|
| 947 | i+=lstrlen(buffer+i);
|
---|
| 948 | lstrcpy(buffer+i,"End Function\r\n");
|
---|
| 949 | i+=lstrlen(buffer+i);
|
---|
| 950 | lstrcpy(buffer+i,"\r\n");
|
---|
| 951 | i+=lstrlen(buffer+i);
|
---|
| 952 | }
|
---|
[608] | 953 | else if( NewProjectInfo.dwTypeID == IDC_SLL )
|
---|
| 954 | {
|
---|
| 955 | buffer[0] = 0;
|
---|
| 956 | }
|
---|
[3] | 957 |
|
---|
| 958 | //保存
|
---|
| 959 | if(NewProjectInfo.dwTypeID==IDC_EXE_DIRECTX){
|
---|
| 960 | sprintf(temporary,"%s%s.ab",dir,NewProjectInfo.name);
|
---|
| 961 | WriteBuffer(temporary,pTemp,lstrlen(pTemp));
|
---|
| 962 |
|
---|
| 963 | HeapDefaultFree(pTemp);
|
---|
| 964 | }
|
---|
| 965 | else{
|
---|
| 966 | sprintf(temporary,"%s%s.ab",dir,NewProjectInfo.name);
|
---|
[608] | 967 | if(!WriteBuffer(temporary,buffer,lstrlen(buffer))) return;
|
---|
[3] | 968 | }
|
---|
| 969 |
|
---|
| 970 |
|
---|
| 971 | /////////////////////
|
---|
| 972 | // MainWnd.abを作成
|
---|
| 973 | /////////////////////
|
---|
| 974 |
|
---|
[475] | 975 | std::string mainWndSbpPath = "";
|
---|
| 976 | if(NewProjectInfo.dwTypeID==IDC_EXE_WINDOWBASE)
|
---|
| 977 | {
|
---|
[477] | 978 | mainWndSbpPath = ActiveBasic::Common::Environment::GetAbdevSystemDirPath() + "\\MainWnd_exe_windowbase.sbp";
|
---|
[3] | 979 | }
|
---|
| 980 | else if(NewProjectInfo.dwTypeID==IDC_EXE_DIRECTX)
|
---|
[475] | 981 | {
|
---|
[477] | 982 | mainWndSbpPath = ActiveBasic::Common::Environment::GetAbdevSystemDirPath() + "\\MainWnd_exe_directx.sbp";
|
---|
[475] | 983 | }
|
---|
[3] | 984 |
|
---|
[475] | 985 | if( !mainWndSbpPath.empty() ){
|
---|
| 986 | pTemp = ReadBuffer( mainWndSbpPath );
|
---|
[3] | 987 |
|
---|
| 988 | //#name#をプロジェクト名に置換
|
---|
| 989 | pTemp=PermutationWndPgmTemplate(pTemp,
|
---|
| 990 | NewProjectInfo.name,
|
---|
| 991 | "MainWnd",
|
---|
| 992 | "hMainWnd",
|
---|
| 993 | "MainWndProc");
|
---|
| 994 |
|
---|
| 995 | if(NewProjectInfo.ShowHelloWorld){
|
---|
| 996 | //Hello World!表示
|
---|
| 997 | i=0;
|
---|
| 998 | lstrcpy(buffer+i,"\r\nSub MainWnd_Paint(hDC As HDC)\r\n");
|
---|
| 999 | i+=lstrlen(buffer+i);
|
---|
| 1000 | lstrcpy(buffer+i,"\tDim rect As RECT\r\n");
|
---|
| 1001 | i+=lstrlen(buffer+i);
|
---|
| 1002 | lstrcpy(buffer+i,"\tGetClientRect(hMainWnd,rect)\r\n");
|
---|
| 1003 | i+=lstrlen(buffer+i);
|
---|
| 1004 | lstrcpy(buffer+i,"\tDrawText(hDC,\"Hello World!\",-1,rect,DT_CENTER or DT_VCENTER or DT_SINGLELINE)\r\n");
|
---|
| 1005 | i+=lstrlen(buffer+i);
|
---|
| 1006 | lstrcpy(buffer+i,"End Sub\r\n");
|
---|
| 1007 | i+=lstrlen(buffer+i);
|
---|
| 1008 |
|
---|
| 1009 | pTemp=(char *)HeapReAlloc(hHeap,0,pTemp,lstrlen(pTemp)+lstrlen(buffer)+1);
|
---|
| 1010 | lstrcat(pTemp,buffer);
|
---|
| 1011 | }
|
---|
| 1012 |
|
---|
| 1013 | sprintf(temporary,"%sMainWnd.ab",dir,NewProjectInfo.name);
|
---|
| 1014 | WriteBuffer(temporary,pTemp,lstrlen(pTemp));
|
---|
| 1015 |
|
---|
| 1016 | HeapDefaultFree(pTemp);
|
---|
| 1017 | }
|
---|
| 1018 |
|
---|
| 1019 |
|
---|
| 1020 | if(NewProjectInfo.dwTypeID==IDC_EXE_DIRECTX){
|
---|
| 1021 | ///////////////////////////
|
---|
| 1022 | // DirextX対応アプリのとき
|
---|
| 1023 | ///////////////////////////
|
---|
| 1024 |
|
---|
| 1025 | //dx_graphics.sbpをコピー
|
---|
[477] | 1026 | const std::string dxGraphicsSbpPath = ActiveBasic::Common::Environment::GetAbdevSystemDirPath() + "\\dx\\dx_graphics.sbp";
|
---|
[475] | 1027 | pTemp = ReadBuffer( dxGraphicsSbpPath );
|
---|
[3] | 1028 | sprintf(temporary,"%sdx_graphics.sbp",dir,NewProjectInfo.name);
|
---|
| 1029 | WriteBuffer(temporary,pTemp,lstrlen(pTemp));
|
---|
| 1030 | HeapDefaultFree(pTemp);
|
---|
| 1031 |
|
---|
| 1032 | //dx_input.sbpをコピー
|
---|
[477] | 1033 | const std::string dxInputSbpPath = ActiveBasic::Common::Environment::GetAbdevSystemDirPath() + "\\dx\\dx_input.sbp";
|
---|
[475] | 1034 | pTemp = ReadBuffer( dxInputSbpPath );
|
---|
[3] | 1035 | sprintf(temporary,"%sdx_input.sbp",dir,NewProjectInfo.name);
|
---|
| 1036 | WriteBuffer(temporary,pTemp,lstrlen(pTemp));
|
---|
| 1037 | HeapDefaultFree(pTemp);
|
---|
| 1038 |
|
---|
| 1039 | //dx_music.sbpをコピー
|
---|
[477] | 1040 | const std::string dxMusicSbpPath = ActiveBasic::Common::Environment::GetAbdevSystemDirPath() + "\\dx\\dx_music.sbp";
|
---|
[475] | 1041 | pTemp = ReadBuffer( dxMusicSbpPath );
|
---|
[3] | 1042 | sprintf(temporary,"%sdx_music.sbp",dir,NewProjectInfo.name);
|
---|
| 1043 | WriteBuffer(temporary,pTemp,lstrlen(pTemp));
|
---|
| 1044 | HeapDefaultFree(pTemp);
|
---|
| 1045 |
|
---|
| 1046 | //dx9abm.dllをコピー
|
---|
| 1047 | sprintf(temporary,"%sRuntime\\dx9abm.dll",pj_editor_Dir);
|
---|
| 1048 | sprintf(buffer,"%sdx9abm.dll",dir,NewProjectInfo.name);
|
---|
| 1049 | CopyFile(temporary,buffer,0);
|
---|
| 1050 | }
|
---|
| 1051 |
|
---|
| 1052 |
|
---|
| 1053 | if(NewProjectInfo.dwTypeID==IDC_EXE_WINDOWBASE||
|
---|
| 1054 | NewProjectInfo.dwTypeID==IDC_EXE_DIRECTX){
|
---|
| 1055 | /////////////////////////////////////////
|
---|
| 1056 | // ウィンドウ定義ファイル(*.wnd)を作成
|
---|
| 1057 | /////////////////////////////////////////
|
---|
[624] | 1058 | ActiveBasic::PM::WindowInfos windowInfos;
|
---|
| 1059 | windowInfos.push_back( new ActiveBasic::PM::WindowInfo() );
|
---|
[617] | 1060 | windowInfos.back()->SetName( "MainWnd" );
|
---|
[615] | 1061 | windowInfos.back()->pos.x=CW_USEDEFAULT;
|
---|
| 1062 | windowInfos.back()->pos.y=CW_USEDEFAULT;
|
---|
| 1063 | windowInfos.back()->size.cx=480;
|
---|
| 1064 | windowInfos.back()->size.cy=360;
|
---|
[624] | 1065 | windowInfos.back()->SetCaption( NewProjectInfo.name );
|
---|
[3] | 1066 | if(NewProjectInfo.dwTypeID==IDC_EXE_WINDOWBASE)
|
---|
[624] | 1067 | {
|
---|
| 1068 | windowInfos.back()->SetStyle( WS_OVERLAPPED|WS_CAPTION|WS_SYSMENU|WS_THICKFRAME|WS_MINIMIZEBOX|WS_MAXIMIZEBOX|WS_VISIBLE );
|
---|
| 1069 | }
|
---|
[3] | 1070 | else if(NewProjectInfo.dwTypeID==IDC_EXE_DIRECTX)
|
---|
[624] | 1071 | {
|
---|
| 1072 | windowInfos.back()->SetStyle( WS_OVERLAPPED|WS_THICKFRAME|WS_SYSMENU );
|
---|
| 1073 | }
|
---|
| 1074 | windowInfos.back()->SetExStyle( 0 );
|
---|
| 1075 | windowInfos.back()->SetMenuIdName( "" );
|
---|
| 1076 | windowInfos.back()->SetBackgroundColor( COLOR_3DFACE );
|
---|
[615] | 1077 | GetDefaultWindowFont(&windowInfos.back()->LogFont);
|
---|
[624] | 1078 | windowInfos.back()->SetIconResourceName( "" );
|
---|
| 1079 | windowInfos.back()->SetClassName( "NORMAL" );
|
---|
[625] | 1080 | windowInfos.back()->SetType( ActiveBasic::PM::WindowType::Default );
|
---|
[3] | 1081 | sprintf(temporary,"%s%s.wnd",dir,NewProjectInfo.name);
|
---|
| 1082 |
|
---|
[618] | 1083 | projectInfo.NumberOfMenu=0;
|
---|
[609] | 1084 | SaveWindowFile( temporary, windowInfos );
|
---|
[617] | 1085 |
|
---|
| 1086 | windowInfos.Clear();
|
---|
[3] | 1087 | }
|
---|
| 1088 |
|
---|
| 1089 |
|
---|
| 1090 | ////////////////////////
|
---|
| 1091 | // ワークファイルを作成
|
---|
| 1092 | ////////////////////////
|
---|
| 1093 | lstrcpy(buffer,"case4\r\n\r\n");
|
---|
| 1094 | if(NewProjectInfo.dwTypeID==IDC_EXE_WINDOWBASE){
|
---|
| 1095 | lstrcat(buffer,"rad,MainWnd\r\n\r\n");
|
---|
| 1096 | }
|
---|
| 1097 | else{
|
---|
| 1098 | sprintf(buffer+lstrlen(buffer),"text,\"%s.ab\",0,0,0,0\r\n\r\n",NewProjectInfo.name);
|
---|
| 1099 | }
|
---|
| 1100 | lstrcat(buffer,"0\r\n0\r\n0\r\n0,0");
|
---|
| 1101 | //保存
|
---|
| 1102 | sprintf(temporary,"%s%s.wrk",dir,NewProjectInfo.name);
|
---|
| 1103 | if(!WriteBuffer(temporary,buffer,lstrlen(buffer))) return;
|
---|
| 1104 |
|
---|
| 1105 |
|
---|
| 1106 | //マニフェストを作成
|
---|
| 1107 | char temp2[MAX_PATH];
|
---|
[477] | 1108 | const std::string manifestTempXmlPath = ActiveBasic::Common::Environment::GetAbdevSystemDirPath() + "\\manifest_temp.xml";
|
---|
[3] | 1109 | sprintf(temp2,"%s%s.manifest.xml",dir,NewProjectInfo.name);
|
---|
[475] | 1110 | CopyFile( manifestTempXmlPath.c_str(), temp2, 0 );
|
---|
[3] | 1111 |
|
---|
| 1112 |
|
---|
| 1113 | sprintf(temporary,"%s%s.pj",dir,NewProjectInfo.name);
|
---|
[621] | 1114 | projectInfo.Load(temporary);
|
---|
| 1115 | projectInfo.Save();
|
---|
[3] | 1116 | }
|
---|
| 1117 | void SetTreeViewForProjectInfo(){
|
---|
| 1118 | extern HANDLE hHeap;
|
---|
| 1119 | extern HWND hProjectView;
|
---|
| 1120 | int i;
|
---|
| 1121 | char temporary[MAX_PATH];
|
---|
| 1122 | TV_INSERTSTRUCT tv;
|
---|
| 1123 |
|
---|
[619] | 1124 | sprintf(temporary,"%s ",projectInfo.GetName().c_str());
|
---|
[3] | 1125 | lstrcat(temporary,STRING_PROJECT);
|
---|
| 1126 | SetWindowText(hProjectView,temporary);
|
---|
| 1127 |
|
---|
| 1128 | tv.hInsertAfter=TVI_SORT;
|
---|
| 1129 | tv.item.mask=TVIF_TEXT|TVIF_IMAGE|TVIF_SELECTEDIMAGE;
|
---|
| 1130 |
|
---|
| 1131 | //ファイル ツリー
|
---|
[655] | 1132 | pobj_FileTree->Reset( projectInfo.fileSystem );
|
---|
[3] | 1133 |
|
---|
| 1134 | //関数ツリー
|
---|
[655] | 1135 | ResetClassTree((HTREEITEM)-1);
|
---|
[3] | 1136 |
|
---|
| 1137 | /////////////////////
|
---|
| 1138 | // マテリアル ツリー
|
---|
| 1139 |
|
---|
| 1140 | //Cursorリソース フォルダ
|
---|
| 1141 | sprintf(temporary,"Cursor %s",STRING_RESOURCE);
|
---|
| 1142 | tv.hParent=TVI_ROOT;
|
---|
| 1143 | tv.item.iImage=0;
|
---|
| 1144 | tv.item.iSelectedImage=0;
|
---|
| 1145 | tv.item.pszText=temporary;
|
---|
| 1146 | tv.hParent=TreeView_InsertItem(hMaterialTreeView,&tv);
|
---|
[623] | 1147 | hCursorTreeItemForProjectView = tv.hParent;
|
---|
[624] | 1148 | BOOST_FOREACH( ActiveBasic::Common::ResourceItem &resourceItem, projectInfo.resourceManager.cursorResources )
|
---|
| 1149 | {
|
---|
[3] | 1150 | tv.item.iImage=6;
|
---|
| 1151 | tv.item.iSelectedImage=6;
|
---|
[624] | 1152 | lstrcpy( temporary, resourceItem.idName.c_str() );
|
---|
[623] | 1153 | tv.item.pszText=temporary;
|
---|
[624] | 1154 | resourceItem.hTreeItem = TreeView_InsertItem(hMaterialTreeView,&tv);
|
---|
[3] | 1155 | }
|
---|
| 1156 |
|
---|
| 1157 | //Bitmapリソース フォルダ
|
---|
| 1158 | sprintf(temporary,"Bitmap %s",STRING_RESOURCE);
|
---|
| 1159 | tv.hParent=TVI_ROOT;
|
---|
| 1160 | tv.item.iImage=0;
|
---|
| 1161 | tv.item.iSelectedImage=0;
|
---|
| 1162 | tv.item.pszText=temporary;
|
---|
| 1163 | tv.hParent=TreeView_InsertItem(hMaterialTreeView,&tv);
|
---|
[623] | 1164 | hBitmapTreeItemForProjectView = tv.hParent;
|
---|
[624] | 1165 | BOOST_FOREACH( ActiveBasic::Common::ResourceItem &resourceItem, projectInfo.resourceManager.bitmapResources )
|
---|
| 1166 | {
|
---|
[3] | 1167 | tv.item.iImage=5;
|
---|
| 1168 | tv.item.iSelectedImage=5;
|
---|
[624] | 1169 | lstrcpy( temporary, resourceItem.idName.c_str() );
|
---|
[623] | 1170 | tv.item.pszText=temporary;
|
---|
[624] | 1171 | resourceItem.hTreeItem = TreeView_InsertItem(hMaterialTreeView,&tv);
|
---|
[3] | 1172 | }
|
---|
| 1173 |
|
---|
| 1174 | //Iconリソース フォルダ
|
---|
| 1175 | sprintf(temporary,"Icon %s",STRING_RESOURCE);
|
---|
| 1176 | tv.hParent=TVI_ROOT;
|
---|
| 1177 | tv.item.iImage=0;
|
---|
| 1178 | tv.item.iSelectedImage=0;
|
---|
| 1179 | tv.item.pszText=temporary;
|
---|
| 1180 | tv.hParent=TreeView_InsertItem(hMaterialTreeView,&tv);
|
---|
[623] | 1181 | hIconTreeItemForProjectView = tv.hParent;
|
---|
[624] | 1182 | for(i=0;i<static_cast<int>(projectInfo.resourceManager.iconResources.size());i++){
|
---|
[3] | 1183 | tv.item.iImage=4;
|
---|
| 1184 | tv.item.iSelectedImage=4;
|
---|
| 1185 | if(i==0){
|
---|
[623] | 1186 | sprintf(temporary,"%s (Main)",projectInfo.resourceManager.iconResources[i].idName.c_str());
|
---|
[3] | 1187 | }
|
---|
[623] | 1188 | else
|
---|
| 1189 | {
|
---|
| 1190 | sprintf(temporary,"%s",projectInfo.resourceManager.iconResources[i].idName.c_str());
|
---|
| 1191 | }
|
---|
| 1192 | tv.item.pszText=temporary;
|
---|
| 1193 | projectInfo.resourceManager.iconResources[i].hTreeItem=TreeView_InsertItem(hMaterialTreeView,&tv);
|
---|
[3] | 1194 | }
|
---|
| 1195 |
|
---|
| 1196 | //Menuフォルダ
|
---|
| 1197 | tv.hParent=TVI_ROOT;
|
---|
| 1198 | tv.item.iImage=0;
|
---|
| 1199 | tv.item.iSelectedImage=0;
|
---|
| 1200 | tv.item.pszText="Menu";
|
---|
| 1201 | tv.hParent=TreeView_InsertItem(hMaterialTreeView,&tv);
|
---|
[618] | 1202 | projectInfo.hMenuTreeItem=tv.hParent;
|
---|
| 1203 | for(i=0;i<projectInfo.NumberOfMenu;i++){
|
---|
[3] | 1204 | tv.item.iImage=3;
|
---|
| 1205 | tv.item.iSelectedImage=3;
|
---|
[618] | 1206 | tv.item.pszText=projectInfo.pMenuInfo[i].IdName;
|
---|
| 1207 | projectInfo.pMenuInfo[i].hTreeItem=TreeView_InsertItem(hMaterialTreeView,&tv);
|
---|
[3] | 1208 | }
|
---|
| 1209 |
|
---|
| 1210 | //Windowフォルダ
|
---|
| 1211 | tv.hParent=TVI_ROOT;
|
---|
| 1212 | tv.item.iImage=0;
|
---|
| 1213 | tv.item.iSelectedImage=0;
|
---|
| 1214 | tv.item.pszText="Window";
|
---|
| 1215 | tv.hParent=TreeView_InsertItem(hMaterialTreeView,&tv);
|
---|
[618] | 1216 | projectInfo.hWindowTreeItem=tv.hParent;
|
---|
[624] | 1217 | BOOST_FOREACH( ActiveBasic::PM::WindowInfo *pWindowInfo, projectInfo.windowInfos )
|
---|
[609] | 1218 | {
|
---|
[3] | 1219 | tv.item.iImage=2;
|
---|
| 1220 | tv.item.iSelectedImage=2;
|
---|
[617] | 1221 | char temporary[1024];
|
---|
| 1222 | lstrcpy( temporary, pWindowInfo->GetName().c_str() );
|
---|
| 1223 | tv.item.pszText = temporary;
|
---|
[615] | 1224 | pWindowInfo->hTreeItem=TreeView_InsertItem(hMaterialTreeView,&tv);
|
---|
[3] | 1225 | }
|
---|
| 1226 | }
|
---|
[619] | 1227 | void OpenWorkfile( const std::string &path )
|
---|
| 1228 | {
|
---|
[3] | 1229 | extern HANDLE hHeap;
|
---|
| 1230 | int i,i2,i3;
|
---|
| 1231 | char *buffer,temporary[MAX_PATH],temp2[MAX_PATH];
|
---|
| 1232 |
|
---|
| 1233 | //プロジェクト ビューを設定、表示
|
---|
| 1234 | extern HWND hProjectView;
|
---|
| 1235 | SetTreeViewForProjectInfo();
|
---|
| 1236 | if(!IsWindowVisible(hProjectView)) SendMessage(hOwner,WM_COMMAND,IDM_PROJECTVIEW,0);
|
---|
| 1237 |
|
---|
| 1238 |
|
---|
| 1239 | //メニュー状態を設定
|
---|
| 1240 | ResetState_DocMenu();
|
---|
| 1241 |
|
---|
| 1242 |
|
---|
| 1243 | //////////////////////////////////////////
|
---|
| 1244 | //ワークファイル(*.wrk)をオープン
|
---|
| 1245 | HTREEITEM hTreeItem;
|
---|
| 1246 | HANDLE hFind;
|
---|
| 1247 | WIN32_FIND_DATA wfd;
|
---|
| 1248 | HWND hChild;
|
---|
| 1249 | int WndNum;
|
---|
[619] | 1250 | hFind=FindFirstFile(path.c_str(),&wfd);
|
---|
[3] | 1251 | if(hFind!=INVALID_HANDLE_VALUE){
|
---|
| 1252 | FindClose(hFind);
|
---|
[619] | 1253 | buffer=ReadBuffer(path);
|
---|
[3] | 1254 | if(!buffer) return;
|
---|
| 1255 |
|
---|
| 1256 | //解析、反映
|
---|
| 1257 | memcpy(temporary,buffer,5);
|
---|
| 1258 | temporary[5]=0;
|
---|
| 1259 | if(lstrcmp(temporary,"case4")==0){
|
---|
| 1260 |
|
---|
| 1261 | LockWindowUpdate(hOwner);
|
---|
| 1262 | for(i=9,i2=0;;i++,i2++){
|
---|
| 1263 | if((buffer[i]=='\r'&&buffer[i+1]=='\n')||buffer[i]=='\0'){
|
---|
| 1264 | if(i2!=0){
|
---|
| 1265 | temporary[i2]=0;
|
---|
| 1266 | for(i3=0;;i3++){
|
---|
| 1267 | if(temporary[i3]==','||temporary[i3]=='\0') break;
|
---|
| 1268 | }
|
---|
| 1269 | if(temporary[i3]=='\0') goto EndToSetWorkFile;
|
---|
| 1270 | lstrcpy(temp2,temporary+i3+1);
|
---|
| 1271 | temporary[i3]=0;
|
---|
| 1272 | if(lstrcmpi(temporary,"text")==0){
|
---|
| 1273 | if(temp2[0]!='\"') goto EndToSetWorkFile;
|
---|
| 1274 |
|
---|
| 1275 | //ファイルを開く
|
---|
| 1276 | i2=1;
|
---|
| 1277 | for(i3=0;;i2++,i3++){
|
---|
| 1278 | if(temp2[i2]=='\"'||temp2[i2]=='\0'){
|
---|
| 1279 | temporary[i3]=0;
|
---|
| 1280 | break;
|
---|
| 1281 | }
|
---|
| 1282 | temporary[i3]=temp2[i2];
|
---|
| 1283 | }
|
---|
[620] | 1284 | lstrcpy( temporary, projectInfo.GetWorkDir().GetFullPath( temporary ).c_str() );
|
---|
[3] | 1285 | hChild=OpenFileWithExtension(temporary);
|
---|
| 1286 | WndNum=GetWndNum(hChild);
|
---|
| 1287 | if(WndNum==-1){
|
---|
| 1288 | goto EndToSetWorkFile;
|
---|
| 1289 | }
|
---|
| 1290 |
|
---|
| 1291 | //ResetScrollbarが再描画時に呼び出されるので、再描画する
|
---|
[629] | 1292 | InvalidateRect(MdiInfo[WndNum]->pMdiTextEdit->hEdit,NULL,0);
|
---|
| 1293 | UpdateWindow(MdiInfo[WndNum]->pMdiTextEdit->hEdit);
|
---|
[3] | 1294 |
|
---|
| 1295 | if(temp2[i2]=='\0') goto EndToSetWorkFile;
|
---|
| 1296 | if(temp2[i2+1]!=',') goto EndToSetWorkFile;
|
---|
| 1297 |
|
---|
| 1298 | //以前のスクロール位置を復元
|
---|
| 1299 | SCROLLINFO si;
|
---|
| 1300 | POINT pos;
|
---|
| 1301 | for(i2+=2,i3=0;;i2++,i3++){
|
---|
| 1302 | if(temp2[i2]==','||temp2[i2]=='\0'){
|
---|
| 1303 | temporary[i3]=0;
|
---|
| 1304 | break;
|
---|
| 1305 | }
|
---|
| 1306 | temporary[i3]=temp2[i2];
|
---|
| 1307 | }
|
---|
| 1308 | sscanf(temporary,"%d",&pos.x);
|
---|
| 1309 | if(temp2[i2]=='\0') goto EndToSetWorkFile;
|
---|
| 1310 | for(i2++,i3=0;;i2++,i3++){
|
---|
| 1311 | if(temp2[i2]==','||temp2[i2]=='\0'){
|
---|
| 1312 | temporary[i3]=0;
|
---|
| 1313 | break;
|
---|
| 1314 | }
|
---|
| 1315 | temporary[i3]=temp2[i2];
|
---|
| 1316 | }
|
---|
| 1317 | sscanf(temporary,"%d",&pos.y);
|
---|
| 1318 | si.cbSize=sizeof(SCROLLINFO);
|
---|
| 1319 | si.fMask=SIF_POS;
|
---|
| 1320 | si.nPos=pos.x;
|
---|
[629] | 1321 | SetScrollInfo(MdiInfo[WndNum]->pMdiTextEdit->hEdit,SB_HORZ,&si,1);
|
---|
[3] | 1322 | si.nPos=pos.y;
|
---|
[629] | 1323 | SetScrollInfo(MdiInfo[WndNum]->pMdiTextEdit->hEdit,SB_VERT,&si,1);
|
---|
[3] | 1324 |
|
---|
| 1325 | if(temp2[i2]=='\0') goto EndToSetWorkFile;
|
---|
| 1326 |
|
---|
| 1327 | //キャレット位置をセット
|
---|
| 1328 | for(i2++,i3=0;;i2++,i3++){
|
---|
| 1329 | if(temp2[i2]==','||temp2[i2]=='\0'){
|
---|
| 1330 | temporary[i3]=0;
|
---|
| 1331 | break;
|
---|
| 1332 | }
|
---|
| 1333 | temporary[i3]=temp2[i2];
|
---|
| 1334 | }
|
---|
| 1335 | sscanf(temporary,"%d",&pos.x);
|
---|
| 1336 | if(temp2[i2]=='\0') goto EndToSetWorkFile;
|
---|
| 1337 | for(i2++,i3=0;;i2++,i3++){
|
---|
| 1338 | if(temp2[i2]==','||temp2[i2]=='\0'){
|
---|
| 1339 | temporary[i3]=0;
|
---|
| 1340 | break;
|
---|
| 1341 | }
|
---|
| 1342 | temporary[i3]=temp2[i2];
|
---|
| 1343 | }
|
---|
| 1344 | sscanf(temporary,"%d",&pos.y);
|
---|
| 1345 | TextEdit_SetSel(WndNum,pos.x,pos.y);
|
---|
| 1346 | }
|
---|
| 1347 | else if(lstrcmpi(temporary,"rad")==0){
|
---|
[618] | 1348 | for(i3=0;i3<static_cast<int>(projectInfo.windowInfos.size());i3++){
|
---|
| 1349 | if(lstrcmpi(projectInfo.windowInfos[i3]->GetName().c_str(),temp2)==0){
|
---|
| 1350 | NewRadWindow( *projectInfo.windowInfos[i3] );
|
---|
[3] | 1351 | break;
|
---|
| 1352 | }
|
---|
| 1353 | }
|
---|
| 1354 | }
|
---|
| 1355 | else if(lstrcmpi(temporary,"menu")==0){
|
---|
[618] | 1356 | for(i3=0;i3<projectInfo.NumberOfMenu;i3++){
|
---|
| 1357 | if(lstrcmpi(projectInfo.pMenuInfo[i3].IdName,temp2)==0){
|
---|
| 1358 | NewMenuWindow(&projectInfo.pMenuInfo[i3]);
|
---|
[3] | 1359 | break;
|
---|
| 1360 | }
|
---|
| 1361 | }
|
---|
| 1362 | }
|
---|
[624] | 1363 | else if(lstrcmpi(temporary,"icon")==0)
|
---|
| 1364 | {
|
---|
| 1365 | BOOST_FOREACH( const ActiveBasic::Common::ResourceItem &resourceItem, projectInfo.resourceManager.iconResources )
|
---|
| 1366 | {
|
---|
| 1367 | if(lstrcmpi(resourceItem.filepath.c_str(),temp2)==0){
|
---|
[620] | 1368 | NewIconEditWindow( projectInfo.GetWorkDir().GetFullPath( temp2 ).c_str() );
|
---|
[3] | 1369 | break;
|
---|
| 1370 | }
|
---|
| 1371 | }
|
---|
| 1372 | }
|
---|
| 1373 | i++;
|
---|
| 1374 | i2=-1;
|
---|
| 1375 | continue;
|
---|
| 1376 | }
|
---|
| 1377 | else break;
|
---|
| 1378 | }
|
---|
| 1379 | temporary[i2]=buffer[i];
|
---|
| 1380 | }
|
---|
| 1381 |
|
---|
| 1382 | for(i+=2,i2=0;;i++,i2++){
|
---|
| 1383 | if((buffer[i]=='\r'&&buffer[i+1]=='\n')||buffer[i]=='\0'){
|
---|
| 1384 | temporary[i2]=0;
|
---|
| 1385 | break;
|
---|
| 1386 | }
|
---|
| 1387 | temporary[i2]=buffer[i];
|
---|
| 1388 | }
|
---|
| 1389 | sscanf(temporary,"%d",&i2);
|
---|
[84] | 1390 |
|
---|
| 1391 | switch( i2 ){
|
---|
| 1392 | case 0:
|
---|
| 1393 | ShowFileView();
|
---|
| 1394 | break;
|
---|
| 1395 | case 1:
|
---|
| 1396 | ShowClassView();
|
---|
| 1397 | break;
|
---|
| 1398 | case 2:
|
---|
| 1399 | ShowMaterialView();
|
---|
| 1400 | break;
|
---|
[3] | 1401 | }
|
---|
[84] | 1402 |
|
---|
[3] | 1403 | if(buffer[i]=='\0') goto EndToSetWorkFile;
|
---|
| 1404 |
|
---|
| 1405 | for(i+=2,i2=0;;i++,i2++){
|
---|
| 1406 | if((buffer[i]=='\r'&&buffer[i+1]=='\n')||buffer[i]=='\0'){
|
---|
| 1407 | temporary[i2]=0;
|
---|
| 1408 | break;
|
---|
| 1409 | }
|
---|
| 1410 | temporary[i2]=buffer[i];
|
---|
| 1411 | }
|
---|
[651] | 1412 | if(temporary[0]=='1')
|
---|
| 1413 | {
|
---|
| 1414 | pobj_FileTree->Expand( pobj_FileTree->GetRootItem(), TVE_EXPAND );
|
---|
| 1415 | }
|
---|
[3] | 1416 |
|
---|
| 1417 | for(i+=2,i2=0;;i++,i2++){
|
---|
| 1418 | if((buffer[i]=='\r'&&buffer[i+1]=='\n')||buffer[i]=='\0'){
|
---|
| 1419 | temporary[i2]=0;
|
---|
| 1420 | break;
|
---|
| 1421 | }
|
---|
| 1422 | temporary[i2]=buffer[i];
|
---|
| 1423 | }
|
---|
| 1424 | if(temporary[0]=='1') TreeView_Expand(hProcedureTreeView,TreeView_GetRoot(hProcedureTreeView),TVE_EXPAND);
|
---|
| 1425 |
|
---|
| 1426 | for(i+=2,i2=0;;i++,i2++){
|
---|
| 1427 | if((buffer[i]=='\r'&&buffer[i+1]=='\n')||buffer[i]=='\0'){
|
---|
| 1428 | temporary[i2]=0;
|
---|
| 1429 | break;
|
---|
| 1430 | }
|
---|
| 1431 | temporary[i2]=buffer[i];
|
---|
| 1432 | }
|
---|
| 1433 | hTreeItem=TreeView_GetRoot(hMaterialTreeView);
|
---|
| 1434 | i2=0;
|
---|
| 1435 | while(hTreeItem){
|
---|
| 1436 | i2=GetOneParameter(temporary,i2,temp2);
|
---|
| 1437 | if(GetValue(temp2)) TreeView_Expand(hMaterialTreeView,hTreeItem,TVE_EXPAND);
|
---|
| 1438 | hTreeItem=TreeView_GetNextSibling(hMaterialTreeView,hTreeItem);
|
---|
| 1439 | }
|
---|
| 1440 | }
|
---|
| 1441 | else if(lstrcmp(temporary,"case3")==0){
|
---|
| 1442 | ////////////////////////////////////////
|
---|
| 1443 | // 古いフォーマットのワークファイル
|
---|
| 1444 |
|
---|
| 1445 | LockWindowUpdate(hOwner);
|
---|
| 1446 | for(i=9,i2=0;;i++,i2++){
|
---|
| 1447 | if((buffer[i]=='\r'&&buffer[i+1]=='\n')||buffer[i]=='\0'){
|
---|
| 1448 | if(i2!=0){
|
---|
| 1449 | temporary[i2]=0;
|
---|
| 1450 | for(i3=0;;i3++){
|
---|
| 1451 | if(temporary[i3]==','||temporary[i3]=='\0') break;
|
---|
| 1452 | }
|
---|
| 1453 | if(temporary[i3]=='\0') goto EndToSetWorkFile;
|
---|
| 1454 | lstrcpy(temp2,temporary+i3+1);
|
---|
| 1455 | temporary[i3]=0;
|
---|
| 1456 | if(lstrcmpi(temporary,"text")==0){
|
---|
| 1457 | for(i3=0;;i3++){
|
---|
| 1458 | if(temp2[i3]==','||temp2[i3]=='\0') break;
|
---|
| 1459 | }
|
---|
| 1460 | if(temp2[i3]=='\0') goto EndToSetWorkFile;
|
---|
| 1461 | lstrcpy(temporary,temp2+i3+1);
|
---|
| 1462 | temp2[i3]=0;
|
---|
[620] | 1463 | lstrcpy( temporary, projectInfo.GetWorkDir().GetFullPath( temporary ).c_str() );
|
---|
[3] | 1464 | sscanf(temp2,"%d",&i3);
|
---|
| 1465 |
|
---|
| 1466 | //ファイルを開く
|
---|
| 1467 | hChild=OpenFileWithExtension(temporary);
|
---|
| 1468 | WndNum=GetWndNum(hChild);
|
---|
| 1469 |
|
---|
| 1470 | //キャレット位置をセット
|
---|
| 1471 | TextEdit_SetSel(WndNum,i3,i3);
|
---|
| 1472 | }
|
---|
| 1473 | else if(lstrcmpi(temporary,"rad")==0){
|
---|
[618] | 1474 | for(i3=0;i3<static_cast<int>(projectInfo.windowInfos.size());i3++){
|
---|
| 1475 | if(lstrcmpi(projectInfo.windowInfos[i3]->GetName().c_str(),temp2)==0){
|
---|
| 1476 | NewRadWindow( *projectInfo.windowInfos[i3] );
|
---|
[3] | 1477 | break;
|
---|
| 1478 | }
|
---|
| 1479 | }
|
---|
| 1480 | }
|
---|
| 1481 | else if(lstrcmpi(temporary,"menu")==0){
|
---|
[618] | 1482 | for(i3=0;i3<projectInfo.NumberOfMenu;i3++){
|
---|
| 1483 | if(lstrcmpi(projectInfo.pMenuInfo[i3].IdName,temp2)==0){
|
---|
| 1484 | NewMenuWindow(&projectInfo.pMenuInfo[i3]);
|
---|
[3] | 1485 | break;
|
---|
| 1486 | }
|
---|
| 1487 | }
|
---|
| 1488 | }
|
---|
| 1489 | else if(lstrcmpi(temporary,"icon")==0){
|
---|
[624] | 1490 | BOOST_FOREACH( const ActiveBasic::Common::ResourceItem &resourceItem, projectInfo.resourceManager.iconResources )
|
---|
| 1491 | {
|
---|
| 1492 | if(lstrcmpi(resourceItem.filepath.c_str(),temp2)==0){
|
---|
[620] | 1493 | NewIconEditWindow( projectInfo.GetWorkDir().GetFullPath( temp2 ).c_str() );
|
---|
[3] | 1494 | break;
|
---|
| 1495 | }
|
---|
| 1496 | }
|
---|
| 1497 | }
|
---|
| 1498 | i++;
|
---|
| 1499 | i2=-1;
|
---|
| 1500 | continue;
|
---|
| 1501 | }
|
---|
| 1502 | else break;
|
---|
| 1503 | }
|
---|
| 1504 | temporary[i2]=buffer[i];
|
---|
| 1505 | }
|
---|
| 1506 |
|
---|
| 1507 | for(i+=2,i2=0;;i++,i2++){
|
---|
| 1508 | if((buffer[i]=='\r'&&buffer[i+1]=='\n')||buffer[i]=='\0'){
|
---|
| 1509 | temporary[i2]=0;
|
---|
| 1510 | break;
|
---|
| 1511 | }
|
---|
| 1512 | temporary[i2]=buffer[i];
|
---|
| 1513 | }
|
---|
| 1514 | sscanf(temporary,"%d",&i2);
|
---|
[84] | 1515 |
|
---|
| 1516 | switch( i2 ){
|
---|
| 1517 | case 0:
|
---|
| 1518 | ShowFileView();
|
---|
| 1519 | break;
|
---|
| 1520 | case 1:
|
---|
| 1521 | ShowClassView();
|
---|
| 1522 | break;
|
---|
| 1523 | case 2:
|
---|
| 1524 | ShowMaterialView();
|
---|
| 1525 | break;
|
---|
[3] | 1526 | }
|
---|
[84] | 1527 |
|
---|
[3] | 1528 | if(buffer[i]=='\0') goto EndToSetWorkFile;
|
---|
| 1529 |
|
---|
| 1530 | for(i+=2,i2=0;;i++,i2++){
|
---|
| 1531 | if((buffer[i]=='\r'&&buffer[i+1]=='\n')||buffer[i]=='\0'){
|
---|
| 1532 | temporary[i2]=0;
|
---|
| 1533 | break;
|
---|
| 1534 | }
|
---|
| 1535 | temporary[i2]=buffer[i];
|
---|
| 1536 | }
|
---|
[651] | 1537 | if(temporary[0]=='1')
|
---|
| 1538 | {
|
---|
| 1539 | pobj_FileTree->Expand( pobj_FileTree->GetRootItem(), TVE_EXPAND );
|
---|
| 1540 | }
|
---|
[3] | 1541 |
|
---|
| 1542 | for(i+=2,i2=0;;i++,i2++){
|
---|
| 1543 | if((buffer[i]=='\r'&&buffer[i+1]=='\n')||buffer[i]=='\0'){
|
---|
| 1544 | temporary[i2]=0;
|
---|
| 1545 | break;
|
---|
| 1546 | }
|
---|
| 1547 | temporary[i2]=buffer[i];
|
---|
| 1548 | }
|
---|
| 1549 | if(temporary[0]=='1') TreeView_Expand(hProcedureTreeView,TreeView_GetRoot(hProcedureTreeView),TVE_EXPAND);
|
---|
| 1550 |
|
---|
| 1551 | for(i+=2,i2=0;;i++,i2++){
|
---|
| 1552 | if((buffer[i]=='\r'&&buffer[i+1]=='\n')||buffer[i]=='\0'){
|
---|
| 1553 | temporary[i2]=0;
|
---|
| 1554 | break;
|
---|
| 1555 | }
|
---|
| 1556 | temporary[i2]=buffer[i];
|
---|
| 1557 | }
|
---|
| 1558 | hTreeItem=TreeView_GetRoot(hMaterialTreeView);
|
---|
| 1559 | i2=0;
|
---|
| 1560 | while(hTreeItem){
|
---|
| 1561 | i2=GetOneParameter(temporary,i2,temp2);
|
---|
| 1562 | if(GetValue(temp2)) TreeView_Expand(hMaterialTreeView,hTreeItem,TVE_EXPAND);
|
---|
| 1563 | hTreeItem=TreeView_GetNextSibling(hMaterialTreeView,hTreeItem);
|
---|
| 1564 | }
|
---|
| 1565 | }
|
---|
| 1566 | EndToSetWorkFile:
|
---|
| 1567 | LockWindowUpdate(NULL);
|
---|
| 1568 | HeapDefaultFree(buffer);
|
---|
| 1569 | }
|
---|
| 1570 |
|
---|
| 1571 |
|
---|
| 1572 | //ウィンドウ タイトルを変更
|
---|
[619] | 1573 | sprintf(temporary,"%s - %s",projectInfo.GetName().c_str(),APPLICATION_NAME);
|
---|
[3] | 1574 | SetWindowText(hOwner,temporary);
|
---|
| 1575 | }
|
---|
| 1576 | BOOL ProjectModifyCheck(BOOL bRun){
|
---|
| 1577 | int i,WndNum,sw;
|
---|
| 1578 | HWND hChild;
|
---|
| 1579 | char temporary[MAX_PATH];
|
---|
[618] | 1580 | if(projectInfo.modify||projectInfo.ModifyOfMaterial||projectInfo.ModifuOfResource){
|
---|
[3] | 1581 | if(bRun==0||pobj_nv->bSaveCheckProject){
|
---|
| 1582 | //"\"%s\" プロジェクトは変更されています。保存しますか?"
|
---|
[619] | 1583 | sprintf(temporary,STRING_MODIFYCHECK_PROJECT,projectInfo.GetName().c_str());
|
---|
[3] | 1584 | i=MessageBox(hOwner,temporary,APPLICATION_NAME,MB_YESNOCANCEL|MB_ICONEXCLAMATION);
|
---|
| 1585 |
|
---|
| 1586 | if(i==IDCANCEL) return 0;
|
---|
[621] | 1587 | if(i==IDYES)
|
---|
| 1588 | {
|
---|
| 1589 | projectInfo.Save();
|
---|
| 1590 | }
|
---|
[3] | 1591 | }
|
---|
[621] | 1592 | else
|
---|
| 1593 | {
|
---|
| 1594 | projectInfo.Save();
|
---|
| 1595 | }
|
---|
[3] | 1596 | return 1;
|
---|
| 1597 | }
|
---|
| 1598 | hChild=GetWindow(hClient,GW_CHILD);
|
---|
| 1599 | while(hChild){
|
---|
| 1600 | WndNum=GetWndNum(hChild);
|
---|
| 1601 | sw=0;
|
---|
[629] | 1602 | if(IS_DOCUMENT_TEXT(MdiInfo[WndNum]->DocType)){
|
---|
| 1603 | if( MdiInfo[WndNum]->pMdiTextEdit->IsModified() ){
|
---|
[655] | 1604 | sw = projectInfo.fileSystem.root.IsExistFile( MdiInfo[WndNum]->path );
|
---|
[3] | 1605 | }
|
---|
| 1606 | }
|
---|
[629] | 1607 | else if(MdiInfo[WndNum]->DocType==WNDTYPE_ICONEDIT){
|
---|
| 1608 | if(MdiInfo[WndNum]->MdiIconEditInfo->bModify){
|
---|
[624] | 1609 | BOOST_FOREACH( const ActiveBasic::Common::ResourceItem &resourceItem, projectInfo.resourceManager.iconResources )
|
---|
| 1610 | {
|
---|
| 1611 | lstrcpy(temporary,resourceItem.filepath.c_str());
|
---|
[620] | 1612 | lstrcpy( temporary, projectInfo.GetWorkDir().GetFullPath( temporary ).c_str() );
|
---|
[629] | 1613 | if(lstrcmpi(MdiInfo[WndNum]->path.c_str(),temporary)==0) sw=1;
|
---|
[3] | 1614 | }
|
---|
| 1615 | }
|
---|
| 1616 | }
|
---|
| 1617 |
|
---|
| 1618 | if(sw){
|
---|
| 1619 | if(bRun==0||pobj_nv->bSaveCheckProject){
|
---|
| 1620 | //"\"%s\" プロジェクトは変更されています。保存しますか?"
|
---|
[619] | 1621 | sprintf(temporary,STRING_MODIFYCHECK_PROJECT,projectInfo.GetName().c_str());
|
---|
[3] | 1622 | i=MessageBox(hOwner,temporary,APPLICATION_NAME,MB_YESNOCANCEL|MB_ICONEXCLAMATION);
|
---|
| 1623 |
|
---|
| 1624 | if(i==IDCANCEL) return 0;
|
---|
[621] | 1625 | if(i==IDYES)
|
---|
| 1626 | {
|
---|
| 1627 | projectInfo.Save();
|
---|
| 1628 | }
|
---|
[3] | 1629 | }
|
---|
[621] | 1630 | else
|
---|
| 1631 | {
|
---|
| 1632 | projectInfo.Save();
|
---|
| 1633 | }
|
---|
[3] | 1634 | return 1;
|
---|
| 1635 | }
|
---|
| 1636 | hChild=GetNextWindow(hChild,GW_HWNDNEXT);
|
---|
| 1637 | }
|
---|
| 1638 | return 2;
|
---|
| 1639 | }
|
---|
[655] | 1640 |
|
---|
| 1641 | void MakeTextMdiWindowBuffer( ActiveBasic::PM::FM::Folder &folder, int WndNum, char *buffer )
|
---|
| 1642 | {
|
---|
| 1643 | BOOST_FOREACH( ActiveBasic::PM::FM::Folder &childFolder, folder.folders )
|
---|
| 1644 | {
|
---|
| 1645 | MakeTextMdiWindowBuffer( childFolder, WndNum, buffer );
|
---|
| 1646 | }
|
---|
| 1647 |
|
---|
| 1648 | BOOST_FOREACH( ActiveBasic::PM::FM::File &file, folder.files )
|
---|
| 1649 | {
|
---|
| 1650 | if(lstrcmpi(MdiInfo[WndNum]->path.c_str(),file.GetFullPath().c_str())==0){
|
---|
| 1651 | CHARRANGE CharRange;
|
---|
| 1652 | TextEdit_GetSel(WndNum,&CharRange);
|
---|
| 1653 |
|
---|
| 1654 | SCROLLINFO si;
|
---|
| 1655 | POINT pos;
|
---|
| 1656 | si.cbSize=sizeof(SCROLLINFO);
|
---|
| 1657 | si.fMask=SIF_POS;
|
---|
| 1658 | GetScrollInfo(MdiInfo[WndNum]->pMdiTextEdit->hEdit,SB_HORZ,&si);
|
---|
| 1659 | pos.x=si.nPos;
|
---|
| 1660 | GetScrollInfo(MdiInfo[WndNum]->pMdiTextEdit->hEdit,SB_VERT,&si);
|
---|
| 1661 | pos.y=si.nPos;
|
---|
| 1662 |
|
---|
| 1663 | char temporary[1024];
|
---|
| 1664 | sprintf(temporary,"text,\"%s\",%d,%d,%d,%d\r\n",
|
---|
| 1665 | file.GetRelationalPath().c_str(),
|
---|
| 1666 | pos.x,
|
---|
| 1667 | pos.y,
|
---|
| 1668 | CharRange.cpMin,
|
---|
| 1669 | CharRange.cpMax);
|
---|
| 1670 |
|
---|
| 1671 | lstrcat( buffer, temporary );
|
---|
| 1672 | break;
|
---|
| 1673 | }
|
---|
| 1674 | }
|
---|
| 1675 | }
|
---|
| 1676 |
|
---|
[3] | 1677 | void MakeWorkFile(void){
|
---|
| 1678 | int i,i2,WndNum;
|
---|
| 1679 | char temporary[MAX_PATH],buffer[32767];
|
---|
| 1680 | HWND hChild;
|
---|
| 1681 |
|
---|
| 1682 | //ワークファイル(*.wrk)を作成
|
---|
| 1683 | lstrcpy(buffer,"case4\r\n\r\n");
|
---|
| 1684 | i2=lstrlen(buffer);
|
---|
| 1685 |
|
---|
| 1686 |
|
---|
| 1687 | ///////////////////////
|
---|
| 1688 | //MDIウィンドウの並び
|
---|
| 1689 | hChild=GetWindow(GetWindow(hClient,GW_CHILD),GW_HWNDLAST);
|
---|
| 1690 | while(hChild){
|
---|
| 1691 | WndNum=GetWndNum(hChild);
|
---|
[629] | 1692 | if(IS_DOCUMENT_TEXT(MdiInfo[WndNum]->DocType)){
|
---|
[655] | 1693 | MakeTextMdiWindowBuffer( projectInfo.fileSystem.root, WndNum, buffer );
|
---|
| 1694 | i2 = lstrlen( buffer );
|
---|
[3] | 1695 | }
|
---|
[629] | 1696 | else if(MdiInfo[WndNum]->DocType==WNDTYPE_RAD){
|
---|
[624] | 1697 | BOOST_FOREACH( ActiveBasic::PM::WindowInfo *pWindowInfo, projectInfo.windowInfos )
|
---|
[609] | 1698 | {
|
---|
[629] | 1699 | if(lstrcmpi(MdiInfo[WndNum]->path.c_str(),pWindowInfo->GetName().c_str())==0){
|
---|
| 1700 | sprintf(buffer+i2,"rad,%s\r\n",MdiInfo[WndNum]->path.c_str());
|
---|
[3] | 1701 | i2+=lstrlen(buffer+i2);
|
---|
| 1702 | break;
|
---|
| 1703 | }
|
---|
| 1704 | }
|
---|
| 1705 | }
|
---|
[629] | 1706 | else if(MdiInfo[WndNum]->DocType==WNDTYPE_MENU){
|
---|
[618] | 1707 | for(i=0;i<projectInfo.NumberOfMenu;i++){
|
---|
[629] | 1708 | if(lstrcmpi(MdiInfo[WndNum]->path.c_str(),projectInfo.pMenuInfo[i].IdName)==0){
|
---|
| 1709 | sprintf(buffer+i2,"menu,%s\r\n",MdiInfo[WndNum]->path.c_str());
|
---|
[3] | 1710 | i2+=lstrlen(buffer+i2);
|
---|
| 1711 | break;
|
---|
| 1712 | }
|
---|
| 1713 | }
|
---|
| 1714 | }
|
---|
[629] | 1715 | else if(MdiInfo[WndNum]->DocType==WNDTYPE_ICONEDIT){
|
---|
[624] | 1716 | BOOST_FOREACH( const ActiveBasic::Common::ResourceItem &resourceItem, projectInfo.resourceManager.iconResources )
|
---|
| 1717 | {
|
---|
| 1718 | lstrcpy(temporary,resourceItem.filepath.c_str());
|
---|
[620] | 1719 | lstrcpy( temporary, projectInfo.GetWorkDir().GetFullPath( temporary ).c_str() );
|
---|
[629] | 1720 | if(lstrcmpi(MdiInfo[WndNum]->path.c_str(),temporary)==0){
|
---|
[624] | 1721 | sprintf(buffer+i2,"icon,%s\r\n",resourceItem.filepath.c_str());
|
---|
[3] | 1722 | i2+=lstrlen(buffer+i2);
|
---|
| 1723 | break;
|
---|
| 1724 | }
|
---|
| 1725 | }
|
---|
| 1726 | }
|
---|
| 1727 | hChild=GetNextWindow(hChild,GW_HWNDPREV);
|
---|
| 1728 | }
|
---|
| 1729 | lstrcpy(buffer+i2,"\r\n");
|
---|
| 1730 | i2+=2;
|
---|
| 1731 |
|
---|
| 1732 |
|
---|
| 1733 | //////////////////////////
|
---|
| 1734 | //ツリービューの展開状況
|
---|
| 1735 | sprintf(buffer+i2,"%d\r\n",TabCtrl_GetCurSel(hProjectViewTab));
|
---|
| 1736 | i2+=lstrlen(buffer+i2);
|
---|
| 1737 | TVITEM tvItem;
|
---|
| 1738 | memset(&tvItem,0,sizeof(TVITEM));
|
---|
| 1739 | tvItem.mask=TVIF_HANDLE|TVIF_STATE;
|
---|
[651] | 1740 | tvItem.hItem = pobj_FileTree->GetRootItem();
|
---|
| 1741 | pobj_FileTree->GetItem( &tvItem );
|
---|
[3] | 1742 | if(tvItem.state&TVIS_EXPANDED) i=1;
|
---|
| 1743 | else i=0;
|
---|
| 1744 | sprintf(buffer+i2,"%d\r\n",i);
|
---|
| 1745 | i2+=lstrlen(buffer+i2);
|
---|
| 1746 |
|
---|
| 1747 | tvItem.hItem=TreeView_GetRoot(hProcedureTreeView);
|
---|
| 1748 | TreeView_GetItem(hProcedureTreeView,&tvItem);
|
---|
| 1749 | if(tvItem.state&TVIS_EXPANDED) i=1;
|
---|
| 1750 | else i=0;
|
---|
| 1751 | sprintf(buffer+i2,"%d\r\n",i);
|
---|
| 1752 | i2+=lstrlen(buffer+i2);
|
---|
| 1753 |
|
---|
| 1754 | tvItem.hItem=TreeView_GetRoot(hMaterialTreeView);
|
---|
| 1755 | while(tvItem.hItem){
|
---|
| 1756 | TreeView_GetItem(hMaterialTreeView,&tvItem);
|
---|
| 1757 | if(tvItem.state&TVIS_EXPANDED) i=1;
|
---|
| 1758 | else i=0;
|
---|
| 1759 | sprintf(buffer+i2,"%d",i);
|
---|
| 1760 | i2+=lstrlen(buffer+i2);
|
---|
| 1761 |
|
---|
| 1762 | tvItem.hItem=TreeView_GetNextSibling(hMaterialTreeView,tvItem.hItem);
|
---|
| 1763 | if(tvItem.hItem){
|
---|
| 1764 | lstrcpy(buffer+i2,",");
|
---|
| 1765 | i2+=lstrlen(buffer+i2);
|
---|
| 1766 | }
|
---|
| 1767 | }
|
---|
| 1768 |
|
---|
| 1769 |
|
---|
| 1770 | //保存
|
---|
[620] | 1771 | sprintf(temporary,"%s%s.wrk",projectInfo.GetWorkDir().GetPath().c_str(),projectInfo.GetName().c_str());
|
---|
[3] | 1772 | WriteBuffer(temporary,buffer,i2);
|
---|
| 1773 | }
|
---|
| 1774 |
|
---|
| 1775 | BOOL SetProjectToRun(void){
|
---|
| 1776 | HANDLE hFind;
|
---|
| 1777 | WIN32_FIND_DATA wfd;
|
---|
| 1778 |
|
---|
[655] | 1779 | if( projectInfo.fileSystem.root.IsEmpty() )
|
---|
| 1780 | {
|
---|
[3] | 1781 | //"プログラム ファイルがプロジェクトに存在しません。"
|
---|
| 1782 | MessageBox(hOwner,STRING_ERROR_NOFILE,STRING_ERROR,MB_OK|MB_ICONEXCLAMATION);
|
---|
| 1783 | return 0;
|
---|
| 1784 | }
|
---|
| 1785 |
|
---|
[477] | 1786 | extern ActiveBasic::Common::Platform::EnumType selectingPlatform;
|
---|
| 1787 | hFind=FindFirstFile( ActiveBasic::Common::Environment::GetCompilerExePath( selectingPlatform ).c_str(), &wfd );
|
---|
[3] | 1788 | if(hFind==INVALID_HANDLE_VALUE){
|
---|
| 1789 | //"BasicCompiler.exe が見つかりません"
|
---|
| 1790 | MessageBox(hOwner,STRING_ERROR_NOBASICCOMPILER,STRING_ERROR,MB_OK|MB_ICONEXCLAMATION);
|
---|
| 1791 | return 0;
|
---|
| 1792 | }
|
---|
| 1793 | FindClose(hFind);
|
---|
| 1794 |
|
---|
| 1795 | //プロジェクト構造のバージョンが違う時は、再保存する
|
---|
[618] | 1796 | if(projectInfo.dwVersion<PROJECT_VERSION)
|
---|
| 1797 | projectInfo.ModifyOfMaterial=1;
|
---|
[3] | 1798 |
|
---|
| 1799 | //保存確認
|
---|
| 1800 | if(!ProjectModifyCheck(1)) return 0;
|
---|
| 1801 |
|
---|
| 1802 | return 1;
|
---|
| 1803 | }
|
---|
[655] | 1804 | bool IsNeedCompileForProject( const ActiveBasic::PM::FM::Folder &folder, const FILETIME &exeTime )
|
---|
| 1805 | {
|
---|
| 1806 | BOOST_FOREACH( const ActiveBasic::PM::FM::Folder &childFolder, folder.folders )
|
---|
| 1807 | {
|
---|
| 1808 | if( IsNeedCompileForProject( childFolder, exeTime ) )
|
---|
| 1809 | {
|
---|
| 1810 | return true;
|
---|
| 1811 | }
|
---|
| 1812 | }
|
---|
| 1813 |
|
---|
| 1814 | BOOST_FOREACH( const ActiveBasic::PM::FM::File &file, folder.files )
|
---|
| 1815 | {
|
---|
| 1816 | FILETIME sourceTime;
|
---|
[705] | 1817 | {
|
---|
| 1818 | ATL::CHandle hFile(CreateFile(file.GetFullPath().c_str(),GENERIC_READ,FILE_SHARE_READ|FILE_SHARE_WRITE,NULL,OPEN_EXISTING,FILE_ATTRIBUTE_NORMAL,NULL));
|
---|
| 1819 | GetFileTime(hFile,NULL,NULL,&sourceTime);
|
---|
| 1820 | }
|
---|
[655] | 1821 |
|
---|
| 1822 | if(sourceTime.dwHighDateTime>exeTime.dwHighDateTime||
|
---|
| 1823 | sourceTime.dwHighDateTime==exeTime.dwHighDateTime&&
|
---|
| 1824 | sourceTime.dwLowDateTime>exeTime.dwLowDateTime) return true;
|
---|
| 1825 | }
|
---|
| 1826 |
|
---|
| 1827 | return false;
|
---|
| 1828 | }
|
---|
| 1829 |
|
---|
[3] | 1830 | BOOL IsNeedCompileForProject(BOOL bDebug){
|
---|
| 1831 | char temporary[MAX_PATH];
|
---|
[705] | 1832 | HANDLE hFind;
|
---|
[3] | 1833 | WIN32_FIND_DATA wfd;
|
---|
| 1834 | FILETIME SourceTime,ExeTime;
|
---|
| 1835 |
|
---|
[618] | 1836 | if(bDebug) lstrcpy(temporary,projectInfo.lpszOutput_Debug);
|
---|
| 1837 | else lstrcpy(temporary,projectInfo.lpszOutput_Release);
|
---|
[620] | 1838 | lstrcpy( temporary, projectInfo.GetWorkDir().GetFullPath( temporary ).c_str() );
|
---|
[3] | 1839 |
|
---|
| 1840 | hFind=FindFirstFile(temporary,&wfd);
|
---|
| 1841 | if(hFind==INVALID_HANDLE_VALUE) return 1;
|
---|
| 1842 | FindClose(hFind);
|
---|
| 1843 |
|
---|
[705] | 1844 | {
|
---|
| 1845 | ATL::CHandle hFile(CreateFile(temporary,GENERIC_READ,FILE_SHARE_READ|FILE_SHARE_WRITE,NULL,OPEN_EXISTING,FILE_ATTRIBUTE_NORMAL,NULL));
|
---|
| 1846 | GetFileTime(hFile,NULL,NULL,&ExeTime);
|
---|
| 1847 | }
|
---|
[3] | 1848 |
|
---|
[655] | 1849 | if( IsNeedCompileForProject( projectInfo.fileSystem.root, ExeTime ) )
|
---|
| 1850 | {
|
---|
| 1851 | return 1;
|
---|
[3] | 1852 | }
|
---|
[618] | 1853 | if( !projectInfo.windowInfos.empty() )
|
---|
[609] | 1854 | {
|
---|
[3] | 1855 | //CallBack.wbp
|
---|
| 1856 | lstrcpy(temporary,"CallBack.wbp");
|
---|
[620] | 1857 | lstrcpy( temporary, projectInfo.GetWorkDir().GetFullPath( temporary ).c_str() );
|
---|
[705] | 1858 | {
|
---|
| 1859 | ATL::CHandle hFile(CreateFile(temporary,GENERIC_READ,FILE_SHARE_READ|FILE_SHARE_WRITE,NULL,OPEN_EXISTING,FILE_ATTRIBUTE_NORMAL,NULL));
|
---|
| 1860 | GetFileTime(hFile,NULL,NULL,&SourceTime);
|
---|
| 1861 | }
|
---|
[3] | 1862 | if(SourceTime.dwHighDateTime>ExeTime.dwHighDateTime||
|
---|
| 1863 | SourceTime.dwHighDateTime==ExeTime.dwHighDateTime&&
|
---|
| 1864 | SourceTime.dwLowDateTime>ExeTime.dwLowDateTime) return 1;
|
---|
| 1865 |
|
---|
| 1866 | //MakeWindow.wbp
|
---|
| 1867 | lstrcpy(temporary,"MakeWindow.wbp");
|
---|
[620] | 1868 | lstrcpy( temporary, projectInfo.GetWorkDir().GetFullPath( temporary ).c_str() );
|
---|
[705] | 1869 | {
|
---|
| 1870 | ATL::CHandle hFile(CreateFile(temporary,GENERIC_READ,FILE_SHARE_READ|FILE_SHARE_WRITE,NULL,OPEN_EXISTING,FILE_ATTRIBUTE_NORMAL,NULL));
|
---|
| 1871 | GetFileTime(hFile,NULL,NULL,&SourceTime);
|
---|
| 1872 | }
|
---|
[3] | 1873 | if(SourceTime.dwHighDateTime>ExeTime.dwHighDateTime||
|
---|
| 1874 | SourceTime.dwHighDateTime==ExeTime.dwHighDateTime&&
|
---|
| 1875 | SourceTime.dwLowDateTime>ExeTime.dwLowDateTime) return 1;
|
---|
| 1876 | }
|
---|
| 1877 | return 0;
|
---|
| 1878 | }
|
---|