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