source: dev/trunk/ab5.0/abdev/abdev/ProjectControl.cpp@ 616

Last change on this file since 616 was 616, checked in by dai_9181, 16 years ago

CHILDINFOの管理方法をstd::vectorに変更。

File size: 78.9 KB
Line 
1#include "stdafx.h"
2
3#include "Common.h"
4
5using namespace ActiveBasic::IDE;
6
7#if defined(JPN)
8//日本語
9#include "pj_msg_jpn.h"
10#else
11//英語
12#include "pj_msg_eng.h"
13#endif
14
15HWND hProjectViewTab;
16HWND hProcedureTreeView,hMaterialTreeView;
17HIMAGELIST hProcedureTreeViewImageList,hMaterialTreeViewImageList;
18WNDPROC OldProcedureTreeViewProc,OldMaterialTreeViewProc;
19WNDPROC OldTabProc;
20
21LRESULT 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}
33LRESULT 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}
42LRESULT CALLBACK TabProc(HWND hwnd,UINT message,WPARAM wParam,LPARAM lParam){
43 extern HANDLE hHeap;
44 extern MDIINFO MdiInfo[MAX_WNDNUM];
45 extern LPSTR DefFileFilter;
46 int i,i2,WndNum;
47 char str[MAX_PATH],temporary[MAX_PATH];
48 HWND hTree,hChild;
49 HTREEITEM hTreeItem,hTreeItem2;
50 TV_HITTESTINFO tvHitTestInfo;
51 TVITEM tvItem;
52
53 switch(message){
54 case WM_CONTEXTMENU:
55 i=TabCtrl_GetCurSel(hwnd);
56 if(i==0){
57 //ファイルツリー
58 POINT pos;
59 pos.x=LOWORD(lParam);
60 pos.y=HIWORD(lParam);
61 pobj_FileTree->ContextMenu(&pos);
62 return 0;
63 }
64 else if(i==1) hTree=hProcedureTreeView;
65 else if(i==2) hTree=hMaterialTreeView;
66 tvHitTestInfo.pt.x=LOWORD(lParam);
67 tvHitTestInfo.pt.y=HIWORD(lParam);
68 ScreenToClient(hTree,&tvHitTestInfo.pt);
69 hTreeItem=TreeView_HitTest(hTree,&tvHitTestInfo);
70 if(hTreeItem){
71 TreeView_SelectItem(hTree,hTreeItem);
72 if(i==1){
73 extern HMENU hProcedureTreeMenuBase;
74 if(TreeView_GetRoot(hTree)!=hTreeItem)
75 TrackPopupMenu(GetSubMenu(hProcedureTreeMenuBase,1),TPM_LEFTALIGN,LOWORD(lParam),HIWORD(lParam),0,hwnd,0);
76 }
77 else if(i==2){
78 extern HMENU hMaterialTreeMenuBase;
79 hTreeItem2=TreeView_GetRoot(hTree);
80 for(i2=0;;i2++){
81 if(hTreeItem2==hTreeItem) break;
82 hTreeItem2=TreeView_GetNextSibling(hTree,hTreeItem2);
83 if(!hTreeItem2) break;
84 }
85 if(hTreeItem2){
86 if(i2==0)
87 TrackPopupMenu(GetSubMenu(hMaterialTreeMenuBase,0),TPM_LEFTALIGN,LOWORD(lParam),HIWORD(lParam),0,hwnd,0);
88 else if(i2==1)
89 TrackPopupMenu(GetSubMenu(hMaterialTreeMenuBase,2),TPM_LEFTALIGN,LOWORD(lParam),HIWORD(lParam),0,hwnd,0);
90 else if(i2==2)
91 TrackPopupMenu(GetSubMenu(hMaterialTreeMenuBase,4),TPM_LEFTALIGN,LOWORD(lParam),HIWORD(lParam),0,hwnd,0);
92 else if(i2==3)
93 TrackPopupMenu(GetSubMenu(hMaterialTreeMenuBase,6),TPM_LEFTALIGN,LOWORD(lParam),HIWORD(lParam),0,hwnd,0);
94 else if(i2==4)
95 TrackPopupMenu(GetSubMenu(hMaterialTreeMenuBase,8),TPM_LEFTALIGN,LOWORD(lParam),HIWORD(lParam),0,hwnd,0);
96 }
97 else{
98 hTreeItem=TreeView_GetNextItem(hTree,hTreeItem,TVGN_PARENT);
99 hTreeItem2=TreeView_GetRoot(hTree);
100 for(i2=0;;i2++){
101 if(hTreeItem2==hTreeItem) break;
102 hTreeItem2=TreeView_GetNextSibling(hTree,hTreeItem2);
103 if(!hTreeItem2) break;
104 }
105 if(hTreeItem2){
106 if(i2==0)
107 TrackPopupMenu(GetSubMenu(hMaterialTreeMenuBase,1),TPM_LEFTALIGN,LOWORD(lParam),HIWORD(lParam),0,hwnd,0);
108 else if(i2==1)
109 TrackPopupMenu(GetSubMenu(hMaterialTreeMenuBase,3),TPM_LEFTALIGN,LOWORD(lParam),HIWORD(lParam),0,hwnd,0);
110 else if(i2==2)
111 TrackPopupMenu(GetSubMenu(hMaterialTreeMenuBase,5),TPM_LEFTALIGN,LOWORD(lParam),HIWORD(lParam),0,hwnd,0);
112 else if(i2==3)
113 TrackPopupMenu(GetSubMenu(hMaterialTreeMenuBase,7),TPM_LEFTALIGN,LOWORD(lParam),HIWORD(lParam),0,hwnd,0);
114 else if(i2==4)
115 TrackPopupMenu(GetSubMenu(hMaterialTreeMenuBase,9),TPM_LEFTALIGN,LOWORD(lParam),HIWORD(lParam),0,hwnd,0);
116 }
117 }
118 }
119 }
120 break;
121 case WM_COMMAND:
122 switch(LOWORD(wParam)){
123
124 case IDM_PROCEDURETREE_SHOW:
125 extern BOOL bSearchingClasses;
126 if(bSearchingClasses){
127 pobj_ClassTreeView->bShowSwitch=1;
128 break;
129 }
130
131 hTreeItem=TreeView_GetSelection(hProcedureTreeView);
132 for(i=0;i<pobj_ClassTreeView->NumberOfProcedures;i++){
133 if(pobj_ClassTreeView->pProcInfo[i].hTreeItem==hTreeItem){
134
135 if( ProjectInfo.name[0] ){
136 // 対象ファイルを開く
137 lstrcpy(temporary,
138 ProjectInfo.pobj_DBFileInfo->ppobj_FileInfo[pobj_ClassTreeView->pProcInfo[i].FileNum]->m_path);
139 GetFullPath(temporary,ProjectInfo.dir);
140 hChild=OpenFileWithExtension(temporary);
141 }
142 else{
143 hChild = GetWindow(hClient,GW_CHILD);
144 }
145
146 //プロシージャの行を選択する
147 //ResetScrollbarが再描画時に呼び出されるので、再描画する
148 WndNum=GetWndNum(hChild);
149 InvalidateRect(MdiInfo[WndNum].pMdiTextEdit->hEdit,NULL,0);
150 UpdateWindow(MdiInfo[WndNum].pMdiTextEdit->hEdit);
151 TextEdit_SelectOneLine(WndNum,pobj_ClassTreeView->pProcInfo[i].code_pos,TRUE);
152
153 //タイマーをセット
154 // ※フォーカスをエディタにセットするため
155 // ※タイミングを遅らせてSetFocusを実行する必要あり
156 SetTimer(hwnd,100,10,NULL);
157
158 break;
159 }
160 }
161
162 break;
163
164 case IDM_MATERIALTREE_INSERTCURSOR:
165 Project_CursorResInsert();
166 break;
167 case IDM_MATERIALTREE_INSERTBITMAP:
168 Project_BitmapResInsert();
169 break;
170 case IDM_MATERIALTREE_INSERTICON:
171 Project_IconResInsert();
172 break;
173 case IDM_MATERIALTREE_INSERTMENU:
174 Project_Menu_Insert();
175 break;
176 case IDM_MATERIALTREE_INSERTWINDOW:
177 Project_Window_Insert();
178 break;
179 case IDM_MATERIALTREE_OPEN:
180 hTreeItem=TreeView_GetSelection(hMaterialTreeView);
181 for(i=0;i<static_cast<int>(ProjectInfo.windowInfos.size());i++){
182 if(ProjectInfo.windowInfos[i]->hTreeItem==hTreeItem){
183 NewRadWindow( *ProjectInfo.windowInfos[i] );
184 break;
185 }
186 }
187 for(i=0;i<ProjectInfo.NumberOfMenu;i++){
188 if(ProjectInfo.pMenuInfo[i].hTreeItem==hTreeItem){
189 NewMenuWindow(&ProjectInfo.pMenuInfo[i]);
190 break;
191 }
192 }
193 for(i=0;i<ProjectInfo.res.NumberOfIconRes;i++){
194 if(ProjectInfo.res.pIconResInfo[i].hTreeItem==hTreeItem){
195 lstrcpy(temporary,ProjectInfo.res.pIconResInfo[i].path);
196 GetFullPath(temporary,ProjectInfo.dir);
197 NewIconEditWindow(temporary);
198 break;
199 }
200 }
201 break;
202 case IDM_MATERIALTREE_DELETE:
203 hTreeItem=TreeView_GetSelection(hMaterialTreeView);
204 for(i=0;i<ProjectInfo.res.NumberOfCursorRes;i++){
205 if(ProjectInfo.res.pCursorResInfo[i].hTreeItem==hTreeItem){
206
207 //"%s カーソルをプロジェクトから削除します。よろしいですか?"
208 sprintf(str,STRING_PJ_CHECK_DELETECURSOR,ProjectInfo.res.pCursorResInfo[i].IdName);
209 if(IDCANCEL==MessageBox(hOwner,str,APPLICATION_NAME,MB_OKCANCEL|MB_ICONEXCLAMATION)) break;
210
211 Project_Cursor_Delete(i);
212 break;
213 }
214 }
215 for(i=0;i<ProjectInfo.res.NumberOfBitmapRes;i++){
216 if(ProjectInfo.res.pBitmapResInfo[i].hTreeItem==hTreeItem){
217
218 //"%s ビットマップをプロジェクトから削除します。よろしいですか?"
219 sprintf(str,STRING_PJ_CHECK_DELETEBITMAP,ProjectInfo.res.pBitmapResInfo[i].IdName);
220 if(IDCANCEL==MessageBox(hOwner,str,APPLICATION_NAME,MB_OKCANCEL|MB_ICONEXCLAMATION)) break;
221
222 Project_Bitmap_Delete(i);
223 break;
224 }
225 }
226 for(i=0;i<ProjectInfo.res.NumberOfIconRes;i++){
227 if(ProjectInfo.res.pIconResInfo[i].hTreeItem==hTreeItem){
228
229 //"%s アイコンをプロジェクトから削除します。よろしいですか?"
230 sprintf(str,STRING_PJ_CHECK_DELETEICON,ProjectInfo.res.pIconResInfo[i].IdName);
231 if(IDCANCEL==MessageBox(hOwner,str,APPLICATION_NAME,MB_OKCANCEL|MB_ICONEXCLAMATION)) break;
232
233 Project_Icon_Delete(i);
234 break;
235 }
236 }
237 for(i=0;i<ProjectInfo.NumberOfMenu;i++){
238 if(ProjectInfo.pMenuInfo[i].hTreeItem==hTreeItem){
239
240 //"%s メニューをプロジェクトから削除します。よろしいですか?"
241 sprintf(str,STRING_PJ_CHECK_DELETEMENU,ProjectInfo.pMenuInfo[i].IdName);
242 if(IDCANCEL==MessageBox(hOwner,str,APPLICATION_NAME,MB_OKCANCEL|MB_ICONEXCLAMATION)) break;
243
244 Project_Menu_Delete(i);
245 break;
246 }
247 }
248 for(i=0;i<static_cast<int>(ProjectInfo.windowInfos.size());i++){
249 if(ProjectInfo.windowInfos[i]->hTreeItem==hTreeItem){
250
251 //"%s ウィンドウをプロジェクトから削除します。よろしいですか?"
252 sprintf(str,STRING_PJ_CHECK_DELETEWINDOW,ProjectInfo.windowInfos[i]->name);
253 if(IDCANCEL==MessageBox(hOwner,str,APPLICATION_NAME,MB_OKCANCEL|MB_ICONEXCLAMATION)) break;
254
255 Project_Window_Delete(i);
256 break;
257 }
258 }
259 break;
260 case IDM_MENUTREE_RENAMEID:
261 extern char NewIdName[MAX_PATH];
262 hTreeItem=TreeView_GetSelection(hMaterialTreeView);
263 for(i=0;i<ProjectInfo.res.NumberOfCursorRes;i++){
264 if(ProjectInfo.res.pCursorResInfo[i].hTreeItem==hTreeItem){
265 Project_Cursor_RenameID(i);
266 break;
267 }
268 }
269 for(i=0;i<ProjectInfo.res.NumberOfBitmapRes;i++){
270 if(ProjectInfo.res.pBitmapResInfo[i].hTreeItem==hTreeItem){
271 Project_Bitmap_RenameID(i);
272 break;
273 }
274 }
275 for(i=0;i<ProjectInfo.res.NumberOfIconRes;i++){
276 if(ProjectInfo.res.pIconResInfo[i].hTreeItem==hTreeItem){
277 Project_Icon_RenameID(i);
278 }
279 }
280 for(i=0;i<ProjectInfo.NumberOfMenu;i++){
281 if(ProjectInfo.pMenuInfo[i].hTreeItem==hTreeItem){
282 if(!DialogBoxParam(hResInst,MAKEINTRESOURCE(IDD_INPUTID),hOwner,(DLGPROC)DlgProject_MenuID_Input,(long)ProjectInfo.pMenuInfo[i].IdName)) break;
283
284 //重複チェック
285 for(i2=0;i2<ProjectInfo.NumberOfMenu;i2++){
286 if(i2==i) continue;
287 if(lstrcmp(NewIdName,ProjectInfo.pMenuInfo[i2].IdName)==0){
288 //"ID \"%s\" は既にプロジェクト内に存在します。"
289 sprintf(temporary,STRING_DUPLICATIONERROR_ID_IN_PROJECT,NewIdName);
290 MessageBox(hOwner,temporary,STRING_ERROR,MB_OK|MB_ICONEXCLAMATION);
291 return 0;
292 }
293 }
294
295 HeapDefaultFree(ProjectInfo.pMenuInfo[i].IdName);
296 ProjectInfo.pMenuInfo[i].IdName=(char *)HeapAlloc(hHeap,0,lstrlen(NewIdName)+1);
297 lstrcpy(ProjectInfo.pMenuInfo[i].IdName,NewIdName);
298
299 tvItem.hItem=hTreeItem;
300 tvItem.mask=TVIF_TEXT;
301 tvItem.pszText=ProjectInfo.pMenuInfo[i].IdName;
302 tvItem.cchTextMax=lstrlen(ProjectInfo.pMenuInfo[i].IdName)+1;
303 TreeView_SetItem(hMaterialTreeView,&tvItem);
304
305 ProjectInfo.ModifyOfMaterial=1;
306
307 TreeView_SortChildren(hMaterialTreeView,
308 TreeView_GetParent(hMaterialTreeView,hTreeItem),
309 0);
310 break;
311 }
312 }
313 break;
314 case IDM_MATERIALTREE_ICON_SETMAIN:
315 RESITEMINFO TempIconResInfo;
316 hTreeItem=TreeView_GetSelection(hMaterialTreeView);
317 for(i=0;i<ProjectInfo.res.NumberOfIconRes;i++){
318 if(ProjectInfo.res.pIconResInfo[i].hTreeItem==hTreeItem){
319 if(i==0) break;
320
321 TempIconResInfo=ProjectInfo.res.pIconResInfo[i];
322 for(;i>0;i--)
323 ProjectInfo.res.pIconResInfo[i]=ProjectInfo.res.pIconResInfo[i-1];
324 ProjectInfo.res.pIconResInfo[0]=TempIconResInfo;
325
326 tvItem.hItem=ProjectInfo.res.pIconResInfo[1].hTreeItem;
327 tvItem.mask=TVIF_TEXT;
328 tvItem.pszText=ProjectInfo.res.pIconResInfo[1].IdName;
329 tvItem.cchTextMax=lstrlen(ProjectInfo.res.pIconResInfo[1].IdName)+1;
330 TreeView_SetItem(hMaterialTreeView,&tvItem);
331
332 tvItem.hItem=ProjectInfo.res.pIconResInfo[0].hTreeItem;
333 tvItem.mask=TVIF_TEXT;
334 sprintf(temporary,"%s (Main)",ProjectInfo.res.pIconResInfo[0].IdName);
335 tvItem.pszText=temporary;
336 tvItem.cchTextMax=lstrlen(temporary)+1;
337 TreeView_SetItem(hMaterialTreeView,&tvItem);
338
339 ProjectInfo.ModifuOfResource=1;
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}
383void 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}
389LRESULT 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}
403void ShowFileView(){
404 TabCtrl_SetCurSel(hProjectViewTab,0);
405 ShowWindow(pobj_FileTree->hTree,SW_SHOW);
406 ShowWindow(hProcedureTreeView,SW_HIDE);
407 ShowWindow(hMaterialTreeView,SW_HIDE);
408}
409void ShowClassView(){
410 TabCtrl_SetCurSel(hProjectViewTab,1);
411 ShowWindow(pobj_FileTree->hTree,SW_HIDE);
412 ShowWindow(hMaterialTreeView,SW_HIDE);
413 ShowWindow(hProcedureTreeView,SW_SHOW);
414}
415void ShowMaterialView(){
416 TabCtrl_SetCurSel(hProjectViewTab,2);
417 ShowWindow(pobj_FileTree->hTree,SW_HIDE);
418 ShowWindow(hProcedureTreeView,SW_HIDE);
419 ShowWindow(hMaterialTreeView,SW_SHOW);
420}
421LRESULT 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
441 OldTabProc=(WNDPROC)GetWindowLongPtr(hProjectViewTab,GWLP_WNDPROC);
442 SetWindowLongPtr(hProjectViewTab,GWLP_WNDPROC,(long)TabProc);
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 //ファイルツリービューを作成
457 pobj_FileTree=new CFileTree(hProjectViewTab);
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);
464 OldProcedureTreeViewProc=(WNDPROC)GetWindowLongPtr(hProcedureTreeView,GWLP_WNDPROC);
465 SetWindowLongPtr(hProcedureTreeView,GWLP_WNDPROC,(long)ProcedureTreeViewProc);
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);
483 OldMaterialTreeViewProc=(WNDPROC)GetWindowLongPtr(hMaterialTreeView,GWLP_WNDPROC);
484 SetWindowLongPtr(hMaterialTreeView,GWLP_WNDPROC,(long)MaterialTreeViewProc);
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
496 ShowWindow(pobj_FileTree->hTree,SW_SHOW);
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
506 SetWindowLongPtr(hwnd,GWL_EXSTYLE,WS_EX_STATICEDGE);
507 SetParent(hwnd,hOwner);
508 ResizeOwnerWnd();
509
510 ShowWindow(hProjectView_ToolWindow,SW_HIDE);
511 }
512 else{
513 pobj_nv->bClipProjectView=0;
514
515 SetWindowLongPtr(hwnd,GWL_EXSTYLE,0);
516
517 SetParent(hwnd,hProjectView_ToolWindow);
518
519 ResizeOwnerWnd();
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){
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;
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);
561 if( ProjectInfo.name[0] ){
562 sprintf(temporary,"%s \'%s\'",STRING_PROJECT,ProjectInfo.name);
563 }
564 else{
565 lstrcpy( temporary, "現在のドキュメント" );
566 }
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
607 pobj_FileTree->resize(rect.left,rect.top,rect.right-rect.left,rect.bottom-rect.top);
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
625 pobj_FileTree->resize(rect.left,rect.top,rect.right-rect.left,rect.bottom-rect.top);
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
647void Project_File_Insert(char *path){
648 extern HANDLE hHeap;
649 char temporary[MAX_PATH],temp2[MAX_PATH];
650
651 GetRelationalPath(path,ProjectInfo.dir);
652
653 //重複チェック
654 if(ProjectInfo.pobj_DBFileInfo->dupli_check(path)){
655 //"\"%s\" ファイルは既にプロジェクト内に存在します。"
656 sprintf(temporary,STRING_DUPLICATIONERROR_FILE_IN_PROJECT,path);
657 MessageBox(hOwner,temporary,APPLICATION_NAME,MB_OK|MB_ICONEXCLAMATION);
658 return;
659 }
660
661
662 //////////////////////
663 //ツリービューに追加
664 HTREEITEM hTreeItem;
665 _splitpath(path,0,0,temporary,temp2);
666 lstrcat(temporary,temp2);
667 hTreeItem=pobj_FileTree->insert(temporary);
668
669
670 //ProjectInfo.ppobj_DBFileInfoオブジェクトに追加
671 ProjectInfo.pobj_DBFileInfo->add(path,hTreeItem);
672
673
674 ProjectInfo.modify=1;
675
676 //ファイル操作によるクラスビューの再表示
677 ResetClassTree(-1);
678}
679void Project_File_Delete(HTREEITEM hTreeItem){
680 extern HANDLE hHeap;
681
682 if(ProjectInfo.pobj_DBFileInfo->IsMainFile(hTreeItem)){
683 //"このファイルはプロジェクトのメイン ファイルです。プロジェクト内から削除することはできません。"
684 MessageBox(hOwner,STRING_ERROR_CANT_MAINFILE,STRING_ERROR,MB_OK|MB_ICONEXCLAMATION);
685 return;
686 }
687
688 //ツリービューから削除
689 TreeView_DeleteItem(pobj_FileTree->hTree,hTreeItem);
690
691 //ProjectInfo.pobj_DBFileInfoオブジェクトから削除
692 ProjectInfo.pobj_DBFileInfo->del(hTreeItem);
693
694 ProjectInfo.modify=1;
695
696 //ファイル操作によるクラスビューの再表示
697 ResetClassTree(-1);
698}
699
700void MakeNewProject(){
701 extern HANDLE hHeap;
702 extern NEWPROJECTINFO NewProjectInfo;
703 int i;
704 char buffer[GENERAL_SIZE],dir[MAX_PATH],temporary[MAX_PATH],*pTemp;
705 HANDLE hFind;
706 WIN32_FIND_DATA wfd;
707
708 //既にプロジェクトが開かれている場合は閉じる
709 if(ProjectInfo.name[0]){
710 if(!CloseProject()) return;
711 }
712
713 //ワークディレクトリを作成
714 i=lstrlen(pobj_nv->ProjectSaveDir);
715 if(pobj_nv->ProjectSaveDir[i-1]=='\\'&&pobj_nv->ProjectSaveDir[i-2]!=':') pobj_nv->ProjectSaveDir[i-1]=0;
716 sprintf(dir,"%s\\%s\\",pobj_nv->ProjectSaveDir,NewProjectInfo.name);
717 i=0;
718 while(!(dir[i]==':'||(dir[i-1]=='\\'&&dir[i]=='\\'))) i++;
719 if(dir[i]==':') i++;
720 else{
721 i++;
722 while(dir[i]!='\\') i++;
723 }
724 for(i++;;i++){
725 if(dir[i]=='\\'){
726 lstrcpy(temporary,dir);
727 temporary[i]=0;
728 hFind=FindFirstFile(temporary,&wfd);
729 if(hFind==INVALID_HANDLE_VALUE){
730 if(!CreateDirectory(temporary,NULL)){
731 MessageBox(hOwner,"ディレクトリを作成できませんでした",APPLICATION_NAME,MB_OK|MB_ICONEXCLAMATION);
732 return;
733 }
734 }
735 else FindClose(hFind);
736 }
737 if(dir[i]=='\0') break;
738 }
739
740
741 //////////////////////////////////////
742 // プロジェクトファイル(*.pj)を作成
743 //////////////////////////////////////
744
745 // 出力先拡張子
746 const std::string outputFileExt
747 = ( NewProjectInfo.dwTypeID == IDC_DLL ) ? ".dll"
748 : ( NewProjectInfo.dwTypeID == IDC_SLL ) ? ".lib"
749 : ".exe";
750
751 //先頭の注釈
752 lstrcpy(buffer,"\' ActiveBasic Project file.\r\n\r\n");
753 i=lstrlen(buffer);
754
755 //プロジェクトのフォーマットバージョン
756 sprintf(buffer+i,"#VERSION=%d\r\n\r\n",PROJECT_VERSION);
757 i+=lstrlen(buffer+i);
758
759 //モジュールタイプ(EXEならば0、DLLならば1)
760 ActiveBasic::Common::TargetModuleType::EnumType moduleType
761 = ( NewProjectInfo.dwTypeID == IDC_DLL ) ? ActiveBasic::Common::TargetModuleType::Dll
762 : ( NewProjectInfo.dwTypeID == IDC_SLL ) ? ActiveBasic::Common::TargetModuleType::Sll
763 : ActiveBasic::Common::TargetModuleType::Exe;
764 lstrcpy(buffer+i,( (std::string)"#MODULETYPE=" + Jenga::Common::ToString( static_cast<int>(moduleType) ) + "\r\n\r\n" ).c_str());
765 i+=lstrlen(buffer+i);
766
767 //プロジェクト名
768 sprintf(buffer+i,"#NAME=%s\r\n\r\n",NewProjectInfo.name);
769 i+=lstrlen(buffer+i);
770
771 lstrcpy(buffer+i,"#PLATFORM=32\r\n\r\n");
772 i+=lstrlen(buffer+i);
773
774 //RADウィンドウの数
775 if(NewProjectInfo.dwTypeID==IDC_EXE_WINDOWBASE||
776 NewProjectInfo.dwTypeID==IDC_EXE_DIRECTX)
777 lstrcpy(buffer+i,"#USEWINDOW=1\r\n\r\n");
778 else lstrcpy(buffer+i,"#USEWINDOW=0\r\n\r\n");
779 i+=lstrlen(buffer+i);
780
781 //プロジェクトオプション
782 sprintf(buffer+i,"#OPTION=&H%08x\r\n\r\n",NewProjectInfo.dwOption);
783 i+=lstrlen(buffer+i);
784
785 //出力先(Release)
786 sprintf(buffer+i,"#OUTPUT_RELEASE=.\\%s%s\r\n\r\n",NewProjectInfo.name, outputFileExt.c_str());
787 i+=lstrlen(buffer+i);
788
789 //出力先(Debug)
790 sprintf(buffer+i,"#OUTPUT_DEBUG=.\\%s_debug%s\r\n\r\n",NewProjectInfo.name, outputFileExt.c_str());
791 i+=lstrlen(buffer+i);
792
793 //マニフェスト
794 sprintf(buffer+i,"#MANIFEST=%s.manifest.xml\r\n\r\n",NewProjectInfo.name);
795 i+=lstrlen(buffer+i);
796
797 //デバッグ用(コマンドライン)
798 lstrcpy(buffer+i,"#DEBUG_CMD_LINE=\r\n\r\n");
799 i+=lstrlen(buffer+i);
800
801 //デバッグ用(DLL用の実行ファイル)
802 lstrcpy(buffer+i,"#DEBUG_EXE_PATH=\r\n\r\n");
803 i+=lstrlen(buffer+i);
804
805 //リソースファイル
806 lstrcpy(buffer+i,"#RESOURCE=0\r\n\r\n");
807 i+=lstrlen(buffer+i);
808
809 //ソースファイル
810 sprintf(buffer+i,"#SOURCE\r\n%s.ab\r\n",NewProjectInfo.name);
811 i+=lstrlen(buffer+i);
812 if(NewProjectInfo.dwTypeID==IDC_EXE_WINDOWBASE||
813 NewProjectInfo.dwTypeID==IDC_EXE_DIRECTX){
814 lstrcpy(buffer+i,"MainWnd.ab\r\n");
815 i+=lstrlen(buffer+i);
816 }
817 if(NewProjectInfo.dwTypeID==IDC_EXE_DIRECTX){
818 lstrcpy(buffer+i,"dx_graphics.sbp\r\n");
819 i+=lstrlen(buffer+i);
820 lstrcpy(buffer+i,"dx_input.sbp\r\n");
821 i+=lstrlen(buffer+i);
822 lstrcpy(buffer+i,"dx_music.sbp\r\n");
823 i+=lstrlen(buffer+i);
824 }
825
826 //保存
827 sprintf(temporary,"%s%s.pj",dir,NewProjectInfo.name);
828 if(hFind=FindFirstFile(temporary,&wfd)){
829 if(hFind!=INVALID_HANDLE_VALUE){
830 FindClose(hFind);
831
832 //"指定したディレクトリにはすでにプロジェクトが存在します。上書きしますか?"
833 if(MessageBox(hOwner,STRING_ERROR_PROJECT_OVERWRITE,APPLICATION_NAME,MB_YESNO|MB_ICONEXCLAMATION)==IDNO) return;
834 }
835 }
836 if(!WriteBuffer(temporary,buffer,i)) return;
837
838
839 ///////////////////////////////////////////
840 //メインプログラムファイル(*.ab)を作成
841 if(NewProjectInfo.dwTypeID==IDC_EXE_WINDOWBASE){
842 sprintf(buffer,"#include \"%s.idx\"\r\n\r\n",NewProjectInfo.name);
843 i=lstrlen(buffer);
844 lstrcpy(buffer+i,"'---------------------------\r\n");
845 i+=lstrlen(buffer+i);
846 lstrcpy(buffer+i,"' Window Message Loop\r\n");
847 i+=lstrlen(buffer+i);
848 lstrcpy(buffer+i,"'---------------------------\r\n");
849 i+=lstrlen(buffer+i);
850 lstrcpy(buffer+i,"Dim msgMain As MSG, iResult As Long\r\n");
851 i+=lstrlen(buffer+i);
852 lstrcpy(buffer+i,"Do\r\n");
853 i+=lstrlen(buffer+i);
854 lstrcpy(buffer+i,"\tiResult=GetMessage(msgMain,0,0,0)\r\n");
855 i+=lstrlen(buffer+i);
856 lstrcpy(buffer+i,"\tIf iResult=0 or iResult=-1 Then Exit Do\r\n");
857 i+=lstrlen(buffer+i);
858 lstrcpy(buffer+i,"\tTranslateMessage(msgMain)\r\n");
859 i+=lstrlen(buffer+i);
860 lstrcpy(buffer+i,"\tDispatchMessage(msgMain)\r\n");
861 i+=lstrlen(buffer+i);
862 lstrcpy(buffer+i,"Loop\r\n\r\n");
863 i+=lstrlen(buffer+i);
864 lstrcpy(buffer+i,"' Call destructores and exit process\r\n");
865 i+=lstrlen(buffer+i);
866 lstrcpy(buffer+i,"End\r\n");
867 i+=lstrlen(buffer+i);
868 }
869 else if(NewProjectInfo.dwTypeID==IDC_EXE_PROMPTBASE){
870 sprintf(buffer,"#include \"%s.idx\"\r\n\r\n",NewProjectInfo.name);
871 i=lstrlen(buffer);
872 lstrcpy(buffer+i,"#N88BASIC\r\n\r\n");
873 i+=lstrlen(buffer+i);
874 lstrcpy(buffer+i,"' ↓ ここからプログラムが実行されます\r\n\r\n");
875 i+=lstrlen(buffer+i);
876 if(NewProjectInfo.ShowHelloWorld){
877 lstrcpy(buffer+i,"Print \"Hello World!\"\r\n");
878 i+=lstrlen(buffer+i);
879 }
880 }
881 else if(NewProjectInfo.dwTypeID==IDC_EXE_DOSPROMPTBASE){
882 sprintf(buffer,"#include \"%s.idx\"\r\n\r\n",NewProjectInfo.name);
883 i=lstrlen(buffer);
884 lstrcpy(buffer+i,"#console\r\n\r\n");
885 i+=lstrlen(buffer+i);
886 lstrcpy(buffer+i,"' ↓ ここからプログラムが実行されます\r\n\r\n");
887 i+=lstrlen(buffer+i);
888 if(NewProjectInfo.ShowHelloWorld){
889 lstrcpy(buffer+i,"Print \"Hello World!\"\r\n");
890 i+=lstrlen(buffer+i);
891 }
892 }
893 else if(NewProjectInfo.dwTypeID==IDC_EXE_NOBASE){
894 sprintf(buffer,"#include \"%s.idx\"\r\n\r\n",NewProjectInfo.name);
895 i=lstrlen(buffer);
896 lstrcpy(buffer+i,"' ↓ ここからプログラムが実行されます\r\n\r\n");
897 i+=lstrlen(buffer+i);
898 }
899 else if(NewProjectInfo.dwTypeID==IDC_EXE_DIRECTX){
900 const std::string mainExeDirectXAbpPath = ActiveBasic::Common::Environment::GetAbdevSystemDirPath() + "\\dx\\main_exe_directx.abp";
901 pTemp = ReadBuffer( mainExeDirectXAbpPath );
902
903 //#name#をプロジェクト名に置換
904 pTemp=PermutationWndPgmTemplate(pTemp,NewProjectInfo.name,0,0,0);
905 }
906 else if(NewProjectInfo.dwTypeID==IDC_DLL){
907 sprintf(buffer,"#include \"%s.idx\"\r\n\r\n",NewProjectInfo.name);
908 i=lstrlen(buffer);
909 lstrcpy(buffer+i,"'-------------------------------------------------------------------\r\n");
910 i+=lstrlen(buffer+i);
911 lstrcpy(buffer+i,"' メモ - このファイルには、DLLの構成要素を記述します。\r\n");
912 i+=lstrlen(buffer+i);
913 lstrcpy(buffer+i,"' (例:関数定義、グローバル変数、定数定義など)\r\n");
914 i+=lstrlen(buffer+i);
915 lstrcpy(buffer+i,"'\r\n");
916 i+=lstrlen(buffer+i);
917 lstrcpy(buffer+i,"' エクスポートが必要な関数には、\"Export\" 修飾子を指定します。\r\n");
918 i+=lstrlen(buffer+i);
919 lstrcpy(buffer+i,"' (例:Function Export FuncName() As Long)\r\n");
920 i+=lstrlen(buffer+i);
921 lstrcpy(buffer+i,"'-------------------------------------------------------------------\r\n");
922 i+=lstrlen(buffer+i);
923 lstrcpy(buffer+i,"\r\n");
924 i+=lstrlen(buffer+i);
925 lstrcpy(buffer+i,"Function Export DllMain(hinstDLL As HINSTANCE, fdwReason As DWord, lpvReserved As VoidPtr) As Long\r\n");
926 i+=lstrlen(buffer+i);
927 lstrcpy(buffer+i,"\t'DLLエントリポイント\r\n");
928 i+=lstrlen(buffer+i);
929 lstrcpy(buffer+i,"\tSelect Case fdwReason\r\n");
930 i+=lstrlen(buffer+i);
931 lstrcpy(buffer+i,"\t\tCase DLL_PROCESS_ATTACH\r\n");
932 i+=lstrlen(buffer+i);
933 lstrcpy(buffer+i,"\t\t\t'DLLがプロセス空間にロードされた時に実行されます。\r\n");
934 i+=lstrlen(buffer+i);
935 lstrcpy(buffer+i,"\t\t\t_System_StartupProgram()\r\n");
936 i+=lstrlen(buffer+i);
937 lstrcpy(buffer+i,"\t\t\tDllMain=1\r\n");
938 i+=lstrlen(buffer+i);
939 lstrcpy(buffer+i,"\t\tCase DLL_PROCESS_DETACH\r\n");
940 i+=lstrlen(buffer+i);
941 lstrcpy(buffer+i,"\t\t\t_System_Call_Destructor_of_GlobalObject()\r\n");
942 i+=lstrlen(buffer+i);
943 lstrcpy(buffer+i,"\tEnd Select\r\n");
944 i+=lstrlen(buffer+i);
945 lstrcpy(buffer+i,"End Function\r\n");
946 i+=lstrlen(buffer+i);
947 lstrcpy(buffer+i,"\r\n");
948 i+=lstrlen(buffer+i);
949 }
950 else if( NewProjectInfo.dwTypeID == IDC_SLL )
951 {
952 buffer[0] = 0;
953 }
954
955 //保存
956 if(NewProjectInfo.dwTypeID==IDC_EXE_DIRECTX){
957 sprintf(temporary,"%s%s.ab",dir,NewProjectInfo.name);
958 WriteBuffer(temporary,pTemp,lstrlen(pTemp));
959
960 HeapDefaultFree(pTemp);
961 }
962 else{
963 sprintf(temporary,"%s%s.ab",dir,NewProjectInfo.name);
964 if(!WriteBuffer(temporary,buffer,lstrlen(buffer))) return;
965 }
966
967
968 /////////////////////
969 // MainWnd.abを作成
970 /////////////////////
971
972 std::string mainWndSbpPath = "";
973 if(NewProjectInfo.dwTypeID==IDC_EXE_WINDOWBASE)
974 {
975 mainWndSbpPath = ActiveBasic::Common::Environment::GetAbdevSystemDirPath() + "\\MainWnd_exe_windowbase.sbp";
976 }
977 else if(NewProjectInfo.dwTypeID==IDC_EXE_DIRECTX)
978 {
979 mainWndSbpPath = ActiveBasic::Common::Environment::GetAbdevSystemDirPath() + "\\MainWnd_exe_directx.sbp";
980 }
981
982 if( !mainWndSbpPath.empty() ){
983 pTemp = ReadBuffer( mainWndSbpPath );
984
985 //#name#をプロジェクト名に置換
986 pTemp=PermutationWndPgmTemplate(pTemp,
987 NewProjectInfo.name,
988 "MainWnd",
989 "hMainWnd",
990 "MainWndProc");
991
992 if(NewProjectInfo.ShowHelloWorld){
993 //Hello World!表示
994 i=0;
995 lstrcpy(buffer+i,"\r\nSub MainWnd_Paint(hDC As HDC)\r\n");
996 i+=lstrlen(buffer+i);
997 lstrcpy(buffer+i,"\tDim rect As RECT\r\n");
998 i+=lstrlen(buffer+i);
999 lstrcpy(buffer+i,"\tGetClientRect(hMainWnd,rect)\r\n");
1000 i+=lstrlen(buffer+i);
1001 lstrcpy(buffer+i,"\tDrawText(hDC,\"Hello World!\",-1,rect,DT_CENTER or DT_VCENTER or DT_SINGLELINE)\r\n");
1002 i+=lstrlen(buffer+i);
1003 lstrcpy(buffer+i,"End Sub\r\n");
1004 i+=lstrlen(buffer+i);
1005
1006 pTemp=(char *)HeapReAlloc(hHeap,0,pTemp,lstrlen(pTemp)+lstrlen(buffer)+1);
1007 lstrcat(pTemp,buffer);
1008 }
1009
1010 sprintf(temporary,"%sMainWnd.ab",dir,NewProjectInfo.name);
1011 WriteBuffer(temporary,pTemp,lstrlen(pTemp));
1012
1013 HeapDefaultFree(pTemp);
1014 }
1015
1016
1017 if(NewProjectInfo.dwTypeID==IDC_EXE_DIRECTX){
1018 ///////////////////////////
1019 // DirextX対応アプリのとき
1020 ///////////////////////////
1021
1022 //dx_graphics.sbpをコピー
1023 const std::string dxGraphicsSbpPath = ActiveBasic::Common::Environment::GetAbdevSystemDirPath() + "\\dx\\dx_graphics.sbp";
1024 pTemp = ReadBuffer( dxGraphicsSbpPath );
1025 sprintf(temporary,"%sdx_graphics.sbp",dir,NewProjectInfo.name);
1026 WriteBuffer(temporary,pTemp,lstrlen(pTemp));
1027 HeapDefaultFree(pTemp);
1028
1029 //dx_input.sbpをコピー
1030 const std::string dxInputSbpPath = ActiveBasic::Common::Environment::GetAbdevSystemDirPath() + "\\dx\\dx_input.sbp";
1031 pTemp = ReadBuffer( dxInputSbpPath );
1032 sprintf(temporary,"%sdx_input.sbp",dir,NewProjectInfo.name);
1033 WriteBuffer(temporary,pTemp,lstrlen(pTemp));
1034 HeapDefaultFree(pTemp);
1035
1036 //dx_music.sbpをコピー
1037 const std::string dxMusicSbpPath = ActiveBasic::Common::Environment::GetAbdevSystemDirPath() + "\\dx\\dx_music.sbp";
1038 pTemp = ReadBuffer( dxMusicSbpPath );
1039 sprintf(temporary,"%sdx_music.sbp",dir,NewProjectInfo.name);
1040 WriteBuffer(temporary,pTemp,lstrlen(pTemp));
1041 HeapDefaultFree(pTemp);
1042
1043 //dx9abm.dllをコピー
1044 sprintf(temporary,"%sRuntime\\dx9abm.dll",pj_editor_Dir);
1045 sprintf(buffer,"%sdx9abm.dll",dir,NewProjectInfo.name);
1046 CopyFile(temporary,buffer,0);
1047 }
1048
1049
1050 if(NewProjectInfo.dwTypeID==IDC_EXE_WINDOWBASE||
1051 NewProjectInfo.dwTypeID==IDC_EXE_DIRECTX){
1052 /////////////////////////////////////////
1053 // ウィンドウ定義ファイル(*.wnd)を作成
1054 /////////////////////////////////////////
1055 WindowInfos windowInfos;
1056 windowInfos.push_back( new WindowInfo() );
1057 windowInfos.back()->name="MainWnd";
1058 windowInfos.back()->HandleName="hMainWnd";
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;
1063 windowInfos.back()->caption=NewProjectInfo.name;
1064 if(NewProjectInfo.dwTypeID==IDC_EXE_WINDOWBASE)
1065 windowInfos.back()->style=WS_OVERLAPPED|WS_CAPTION|WS_SYSMENU|WS_THICKFRAME|WS_MINIMIZEBOX|WS_MAXIMIZEBOX|WS_VISIBLE;
1066 else if(NewProjectInfo.dwTypeID==IDC_EXE_DIRECTX)
1067 windowInfos.back()->style=WS_OVERLAPPED|WS_THICKFRAME|WS_SYSMENU;
1068 windowInfos.back()->ExStyle=0;
1069 windowInfos.back()->MenuID=0;
1070 windowInfos.back()->id=0;
1071 windowInfos.back()->bgColor=COLOR_3DFACE;
1072 GetDefaultWindowFont(&windowInfos.back()->LogFont);
1073 windowInfos.back()->IconResName=0;
1074 windowInfos.back()->ClassName="NORMAL";
1075 windowInfos.back()->CallBackName="MainWndProc";
1076 windowInfos.back()->type=WNDTYPE_DEFAULT;
1077 windowInfos.back()->filepath="MainWnd.ab";
1078 sprintf(temporary,"%s%s.wnd",dir,NewProjectInfo.name);
1079
1080 ProjectInfo.NumberOfMenu=0;
1081 SaveWindowFile( temporary, windowInfos );
1082 }
1083
1084
1085 ////////////////////////
1086 // ワークファイルを作成
1087 ////////////////////////
1088 lstrcpy(buffer,"case4\r\n\r\n");
1089 if(NewProjectInfo.dwTypeID==IDC_EXE_WINDOWBASE){
1090 lstrcat(buffer,"rad,MainWnd\r\n\r\n");
1091 }
1092 else{
1093 sprintf(buffer+lstrlen(buffer),"text,\"%s.ab\",0,0,0,0\r\n\r\n",NewProjectInfo.name);
1094 }
1095 lstrcat(buffer,"0\r\n0\r\n0\r\n0,0");
1096 //保存
1097 sprintf(temporary,"%s%s.wrk",dir,NewProjectInfo.name);
1098 if(!WriteBuffer(temporary,buffer,lstrlen(buffer))) return;
1099
1100
1101 //マニフェストを作成
1102 char temp2[MAX_PATH];
1103 const std::string manifestTempXmlPath = ActiveBasic::Common::Environment::GetAbdevSystemDirPath() + "\\manifest_temp.xml";
1104 sprintf(temp2,"%s%s.manifest.xml",dir,NewProjectInfo.name);
1105 CopyFile( manifestTempXmlPath.c_str(), temp2, 0 );
1106
1107
1108 sprintf(temporary,"%s%s.pj",dir,NewProjectInfo.name);
1109 OpenProject(temporary);
1110 SaveProject();
1111}
1112void SetTreeViewForProjectInfo(){
1113 extern HANDLE hHeap;
1114 extern HWND hProjectView;
1115 int i;
1116 char temporary[MAX_PATH];
1117 TV_INSERTSTRUCT tv;
1118
1119 sprintf(temporary,"%s ",ProjectInfo.name);
1120 lstrcat(temporary,STRING_PROJECT);
1121 SetWindowText(hProjectView,temporary);
1122
1123 tv.hInsertAfter=TVI_SORT;
1124 tv.item.mask=TVIF_TEXT|TVIF_IMAGE|TVIF_SELECTEDIMAGE;
1125
1126 //ファイル ツリー
1127 ProjectInfo.pobj_DBFileInfo->ResetTree();
1128
1129 //関数ツリー
1130 ResetClassTree(-1);
1131
1132 /////////////////////
1133 // マテリアル ツリー
1134
1135 //Cursorリソース フォルダ
1136 sprintf(temporary,"Cursor %s",STRING_RESOURCE);
1137 tv.hParent=TVI_ROOT;
1138 tv.item.iImage=0;
1139 tv.item.iSelectedImage=0;
1140 tv.item.pszText=temporary;
1141 tv.hParent=TreeView_InsertItem(hMaterialTreeView,&tv);
1142 ProjectInfo.res.hCursorTreeItem=tv.hParent;
1143 for(i=0;i<ProjectInfo.res.NumberOfCursorRes;i++){
1144 tv.item.iImage=6;
1145 tv.item.iSelectedImage=6;
1146 tv.item.pszText=ProjectInfo.res.pCursorResInfo[i].IdName;
1147 ProjectInfo.res.pCursorResInfo[i].hTreeItem=TreeView_InsertItem(hMaterialTreeView,&tv);
1148 }
1149
1150 //Bitmapリソース フォルダ
1151 sprintf(temporary,"Bitmap %s",STRING_RESOURCE);
1152 tv.hParent=TVI_ROOT;
1153 tv.item.iImage=0;
1154 tv.item.iSelectedImage=0;
1155 tv.item.pszText=temporary;
1156 tv.hParent=TreeView_InsertItem(hMaterialTreeView,&tv);
1157 ProjectInfo.res.hBitmapTreeItem=tv.hParent;
1158 for(i=0;i<ProjectInfo.res.NumberOfBitmapRes;i++){
1159 tv.item.iImage=5;
1160 tv.item.iSelectedImage=5;
1161 tv.item.pszText=ProjectInfo.res.pBitmapResInfo[i].IdName;
1162 ProjectInfo.res.pBitmapResInfo[i].hTreeItem=TreeView_InsertItem(hMaterialTreeView,&tv);
1163 }
1164
1165 //Iconリソース フォルダ
1166 sprintf(temporary,"Icon %s",STRING_RESOURCE);
1167 tv.hParent=TVI_ROOT;
1168 tv.item.iImage=0;
1169 tv.item.iSelectedImage=0;
1170 tv.item.pszText=temporary;
1171 tv.hParent=TreeView_InsertItem(hMaterialTreeView,&tv);
1172 ProjectInfo.res.hIconTreeItem=tv.hParent;
1173 for(i=0;i<ProjectInfo.res.NumberOfIconRes;i++){
1174 tv.item.iImage=4;
1175 tv.item.iSelectedImage=4;
1176 if(i==0){
1177 sprintf(temporary,"%s (Main)",ProjectInfo.res.pIconResInfo[i].IdName);
1178 tv.item.pszText=temporary;
1179 }
1180 else tv.item.pszText=ProjectInfo.res.pIconResInfo[i].IdName;
1181 ProjectInfo.res.pIconResInfo[i].hTreeItem=TreeView_InsertItem(hMaterialTreeView,&tv);
1182 }
1183
1184 //Menuフォルダ
1185 tv.hParent=TVI_ROOT;
1186 tv.item.iImage=0;
1187 tv.item.iSelectedImage=0;
1188 tv.item.pszText="Menu";
1189 tv.hParent=TreeView_InsertItem(hMaterialTreeView,&tv);
1190 ProjectInfo.hMenuTreeItem=tv.hParent;
1191 for(i=0;i<ProjectInfo.NumberOfMenu;i++){
1192 tv.item.iImage=3;
1193 tv.item.iSelectedImage=3;
1194 tv.item.pszText=ProjectInfo.pMenuInfo[i].IdName;
1195 ProjectInfo.pMenuInfo[i].hTreeItem=TreeView_InsertItem(hMaterialTreeView,&tv);
1196 }
1197
1198 //Windowフォルダ
1199 tv.hParent=TVI_ROOT;
1200 tv.item.iImage=0;
1201 tv.item.iSelectedImage=0;
1202 tv.item.pszText="Window";
1203 tv.hParent=TreeView_InsertItem(hMaterialTreeView,&tv);
1204 ProjectInfo.hWindowTreeItem=tv.hParent;
1205 BOOST_FOREACH( WindowInfo *pWindowInfo, ProjectInfo.windowInfos )
1206 {
1207 tv.item.iImage=2;
1208 tv.item.iSelectedImage=2;
1209 tv.item.pszText = pWindowInfo->name;
1210 pWindowInfo->hTreeItem=TreeView_InsertItem(hMaterialTreeView,&tv);
1211 }
1212}
1213void OpenProject(char *path){
1214 extern HANDLE hHeap;
1215 int i,i2,i3;
1216 char *buffer,temporary[MAX_PATH],temp2[MAX_PATH];
1217
1218 //既にプロジェクトが開かれている場合は閉じる
1219 if(ProjectInfo.name[0]){
1220 if(!CloseProject()) return;
1221 }
1222 memset(&ProjectInfo,0,sizeof(PROJECTINFO));
1223
1224 //プロジェクトの作業ディレクトリを取得
1225 _splitpath(path,ProjectInfo.dir,temporary,0,0);
1226 lstrcat(ProjectInfo.dir,temporary);
1227
1228 //ファイルを開く、保存の初期ディレクトリをセット
1229 lstrcpy(pobj_nv->DefSaveDir,ProjectInfo.dir);
1230
1231
1232 //////////////////////////////////////////
1233 // リソースデータ用領域を確保
1234 ProjectInfo.res.pCursorResInfo=(RESITEMINFO *)HeapAlloc(hHeap,0,1);
1235 ProjectInfo.res.NumberOfCursorRes=0;
1236 ProjectInfo.res.pBitmapResInfo=(RESITEMINFO *)HeapAlloc(hHeap,0,1);
1237 ProjectInfo.res.NumberOfBitmapRes=0;
1238 ProjectInfo.res.pIconResInfo=(RESITEMINFO *)HeapAlloc(hHeap,0,1);
1239 ProjectInfo.res.NumberOfIconRes=0;
1240
1241
1242 //////////////////////////////////////////
1243 //プロジェクトファイル(*.pj)をオープン
1244 buffer=ReadBuffer(path);
1245 if(!buffer) return;
1246
1247 //解析
1248 ProjectInfo.pobj_DBFileInfo=new CDBFileInfo();
1249 bool isUseWindow = false;
1250 for(i=0;;i++){
1251 if(buffer[i]=='\0') break;
1252 if(buffer[i]=='\r'&&buffer[i+1]=='\n'&&buffer[i+2]=='#'){
1253 for(i+=3,i2=0;;i++,i2++){
1254 if(!IsVariableChar(buffer[i])){
1255 temporary[i2]=0;
1256 break;
1257 }
1258 temporary[i2]=buffer[i];
1259 }
1260 if(lstrcmpi(temporary,"VERSION")==0&&buffer[i]=='='){
1261 for(i++,i2=0;;i++,i2++){
1262 if((buffer[i]=='\r'&&buffer[i+1]=='\n')||buffer[i]=='\0'){
1263 temporary[i2]=0;
1264 if(buffer[i]=='\r'&&buffer[i+1]=='\n') i-=2;
1265 break;
1266 }
1267 temporary[i2]=buffer[i];
1268 }
1269 ProjectInfo.dwVersion=GetValue(temporary);
1270 }
1271 else if(lstrcmpi(temporary,"MODULETYPE")==0&&buffer[i]=='='){
1272 for(i++,i2=0;;i++,i2++){
1273 if((buffer[i]=='\r'&&buffer[i+1]=='\n')||buffer[i]=='\0'){
1274 temporary[i2]=0;
1275 if(buffer[i]=='\r'&&buffer[i+1]=='\n') i-=2;
1276 break;
1277 }
1278 temporary[i2]=buffer[i];
1279 }
1280 ProjectInfo.dwModuleType=atoi(temporary);
1281 }
1282 else if(lstrcmpi(temporary,"NAME")==0&&buffer[i]=='='){
1283 for(i++,i2=0;;i++,i2++){
1284 if((buffer[i]=='\r'&&buffer[i+1]=='\n')||buffer[i]=='\0'){
1285 ProjectInfo.name[i2]=0;
1286 break;
1287 }
1288 ProjectInfo.name[i2]=buffer[i];
1289 }
1290 }
1291 else if(lstrcmpi(temporary,"PLATFORM")==0&&buffer[i]=='='){
1292 for(i++,i2=0;;i++,i2++){
1293 if((buffer[i]=='\r'&&buffer[i+1]=='\n')||buffer[i]=='\0'){
1294 temporary[i2]=0;
1295 if(buffer[i]=='\r'&&buffer[i+1]=='\n') i-=2;
1296 break;
1297 }
1298 temporary[i2]=buffer[i];
1299 }
1300 i2=atoi(temporary);
1301 extern HWND hSelectCompilerCombo;
1302 if(i2==32){
1303 //プラットフォームにWin32を選択
1304 SendMessage(hSelectCompilerCombo,CB_SETCURSEL,0,0);
1305 }
1306 else if(i2==64){
1307 //プラットフォームにWin64を選択
1308 SendMessage(hSelectCompilerCombo,CB_SETCURSEL,1,0);
1309 }
1310 SendMessage(hSelectCompilerCombo,WM_COMMAND,MAKELONG(0,CBN_SELCHANGE),0);
1311 }
1312 else if(lstrcmpi(temporary,"USEWINDOW")==0&&buffer[i]=='='){
1313 for(i++,i2=0;;i++,i2++){
1314 if((buffer[i]=='\r'&&buffer[i+1]=='\n')||buffer[i]=='\0'){
1315 temporary[i2]=0;
1316 if(buffer[i]=='\r'&&buffer[i+1]=='\n') i-=2;
1317 break;
1318 }
1319 temporary[i2]=buffer[i];
1320 }
1321 if( atoi(temporary) > 0 )
1322 {
1323 isUseWindow = true;
1324 }
1325 }
1326 else if(lstrcmpi(temporary,"OPTION")==0&&buffer[i]=='='){
1327 for(i++,i2=0;;i++,i2++){
1328 if((buffer[i]=='\r'&&buffer[i+1]=='\n')||buffer[i]=='\0'){
1329 temporary[i2]=0;
1330 if(buffer[i]=='\r'&&buffer[i+1]=='\n') i-=2;
1331 break;
1332 }
1333 temporary[i2]=buffer[i];
1334 }
1335 ProjectInfo.dwOption=GetValue(temporary);
1336 }
1337 else if(lstrcmpi(temporary,"OUTPUT_RELEASE")==0&&buffer[i]=='='){
1338 for(i++,i2=0;;i++,i2++){
1339 if((buffer[i]=='\r'&&buffer[i+1]=='\n')||buffer[i]=='\0'){
1340 temporary[i2]=0;
1341 if(buffer[i]=='\r'&&buffer[i+1]=='\n') i-=2;
1342 break;
1343 }
1344 temporary[i2]=buffer[i];
1345 }
1346 lstrcpy(ProjectInfo.lpszOutput_Release,temporary);
1347 }
1348 else if(lstrcmpi(temporary,"OUTPUT_DEBUG")==0&&buffer[i]=='='){
1349 for(i++,i2=0;;i++,i2++){
1350 if((buffer[i]=='\r'&&buffer[i+1]=='\n')||buffer[i]=='\0'){
1351 temporary[i2]=0;
1352 if(buffer[i]=='\r'&&buffer[i+1]=='\n') i-=2;
1353 break;
1354 }
1355 temporary[i2]=buffer[i];
1356 }
1357 lstrcpy(ProjectInfo.lpszOutput_Debug,temporary);
1358 }
1359 else if(lstrcmpi(temporary,"MANIFEST")==0&&buffer[i]=='='){
1360 for(i++,i2=0;;i++,i2++){
1361 if((buffer[i]=='\r'&&buffer[i+1]=='\n')||buffer[i]=='\0'){
1362 temporary[i2]=0;
1363 if(buffer[i]=='\r'&&buffer[i+1]=='\n') i-=2;
1364 break;
1365 }
1366 temporary[i2]=buffer[i];
1367 }
1368 lstrcpy(ProjectInfo.szManifestPath,temporary);
1369 }
1370 else if(lstrcmpi(temporary,"DEBUG_CMD_LINE")==0&&buffer[i]=='='){
1371 for(i++,i2=0;;i++,i2++){
1372 if((buffer[i]=='\r'&&buffer[i+1]=='\n')||buffer[i]=='\0'){
1373 temporary[i2]=0;
1374 if(buffer[i]=='\r'&&buffer[i+1]=='\n') i-=2;
1375 break;
1376 }
1377 temporary[i2]=buffer[i];
1378 }
1379 lstrcpy(ProjectInfo.szCmdLine,temporary);
1380 }
1381 else if(lstrcmpi(temporary,"DEBUG_EXE_PATH")==0&&buffer[i]=='='){
1382 for(i++,i2=0;;i++,i2++){
1383 if((buffer[i]=='\r'&&buffer[i+1]=='\n')||buffer[i]=='\0'){
1384 temporary[i2]=0;
1385 if(buffer[i]=='\r'&&buffer[i+1]=='\n') i-=2;
1386 break;
1387 }
1388 temporary[i2]=buffer[i];
1389 }
1390 lstrcpy(ProjectInfo.szExePath,temporary);
1391 }
1392 else if(lstrcmpi(temporary,"RESOURCE")==0&&buffer[i]=='='){
1393 for(i++,i2=0;;i++,i2++){
1394 if((buffer[i]=='\r'&&buffer[i+1]=='\n')||buffer[i]=='\0'){
1395 temporary[i2]=0;
1396 if(buffer[i]=='\r'&&buffer[i+1]=='\n') i-=2;
1397 break;
1398 }
1399 temporary[i2]=buffer[i];
1400 }
1401 if(temporary[0]!='\0'&&(!(temporary[0]=='0'&&temporary[1]=='\0'))){
1402 lstrcpy(ProjectInfo.ResourceFileName,temporary);
1403 GetResourceData();
1404 }
1405 else{
1406 sprintf(ProjectInfo.ResourceFileName,"%s.rc",ProjectInfo.name);
1407 }
1408 }
1409 else if(lstrcmpi(temporary,"SOURCE")==0&&buffer[i]=='\r'&&buffer[i+1]=='\n'){
1410 while(1){
1411 for(i+=2,i2=0;;i++,i2++){
1412 if((buffer[i]=='\r'&&buffer[i+1]=='\n')||buffer[i]=='\0'){
1413 temporary[i2]=0;
1414 break;
1415 }
1416 temporary[i2]=buffer[i];
1417 }
1418 if(temporary[0]=='\0') break;
1419 ProjectInfo.pobj_DBFileInfo->add(temporary,0);
1420
1421 if(buffer[i]=='\0') break;
1422 }
1423 }
1424 else{
1425 //不明なパラメータは無視
1426 for(i++;;i++){
1427 if((buffer[i]=='\r'&&buffer[i+1]=='\n')||buffer[i]=='\0'){
1428 if(buffer[i]=='\r'&&buffer[i+1]=='\n') i-=2;
1429 break;
1430 }
1431 }
1432 }
1433 if(buffer[i]=='\0') break;
1434 }
1435 }
1436 HeapDefaultFree(buffer);
1437
1438 //古いバージョンファイルを考慮
1439 if(ProjectInfo.dwVersion<=4){
1440 if(ProjectInfo.dwModuleType==MT_DLL)
1441 sprintf(ProjectInfo.lpszOutput_Release,".\\%s.dll",ProjectInfo.name);
1442 else sprintf(ProjectInfo.lpszOutput_Release,".\\%s.exe",ProjectInfo.name);
1443 sprintf(ProjectInfo.lpszOutput_Debug,".\\%s_debug.exe",ProjectInfo.name);
1444 }
1445
1446 //ブレークポイントを初期化
1447 ProjectInfo.pobj_DBBreakPoint=new CDBBreakPoint();
1448
1449
1450 if( isUseWindow )
1451 {
1452 /////////////////////////////////////////////
1453 //ウィンドウ定義ファイル(*.wnd)をオープン
1454 sprintf(temp2,"%s%s.wnd",ProjectInfo.dir,ProjectInfo.name);
1455 if(!OpenWindowFile(temp2)) return;
1456 }
1457 else{
1458 ProjectInfo.windowInfos.Clear();
1459
1460 ProjectInfo.NumberOfMenu=0;
1461 ProjectInfo.pMenuInfo=(MENU_INFO *)HeapAlloc(hHeap,HEAP_ZERO_MEMORY,1);
1462 }
1463
1464
1465 //プロジェクト ビューを設定、表示
1466 extern HWND hProjectView;
1467 SetTreeViewForProjectInfo();
1468 if(!IsWindowVisible(hProjectView)) SendMessage(hOwner,WM_COMMAND,IDM_PROJECTVIEW,0);
1469
1470
1471 //メニュー状態を設定
1472 ResetState_DocMenu();
1473
1474
1475 //////////////////////////////////////////
1476 //ワークファイル(*.wrk)をオープン
1477 extern MDIINFO MdiInfo[MAX_WNDNUM];
1478 HTREEITEM hTreeItem;
1479 HANDLE hFind;
1480 WIN32_FIND_DATA wfd;
1481 HWND hChild;
1482 int WndNum;
1483 sprintf(temp2,"%s%s.wrk",ProjectInfo.dir,ProjectInfo.name);
1484 hFind=FindFirstFile(temp2,&wfd);
1485 if(hFind!=INVALID_HANDLE_VALUE){
1486 FindClose(hFind);
1487 buffer=ReadBuffer(temp2);
1488 if(!buffer) return;
1489
1490 //解析、反映
1491 memcpy(temporary,buffer,5);
1492 temporary[5]=0;
1493 if(lstrcmp(temporary,"case4")==0){
1494
1495 LockWindowUpdate(hOwner);
1496 for(i=9,i2=0;;i++,i2++){
1497 if((buffer[i]=='\r'&&buffer[i+1]=='\n')||buffer[i]=='\0'){
1498 if(i2!=0){
1499 temporary[i2]=0;
1500 for(i3=0;;i3++){
1501 if(temporary[i3]==','||temporary[i3]=='\0') break;
1502 }
1503 if(temporary[i3]=='\0') goto EndToSetWorkFile;
1504 lstrcpy(temp2,temporary+i3+1);
1505 temporary[i3]=0;
1506 if(lstrcmpi(temporary,"text")==0){
1507 if(temp2[0]!='\"') goto EndToSetWorkFile;
1508
1509 //ファイルを開く
1510 i2=1;
1511 for(i3=0;;i2++,i3++){
1512 if(temp2[i2]=='\"'||temp2[i2]=='\0'){
1513 temporary[i3]=0;
1514 break;
1515 }
1516 temporary[i3]=temp2[i2];
1517 }
1518 GetFullPath(temporary,ProjectInfo.dir);
1519 hChild=OpenFileWithExtension(temporary);
1520 WndNum=GetWndNum(hChild);
1521 if(WndNum==-1){
1522 goto EndToSetWorkFile;
1523 }
1524
1525 //ResetScrollbarが再描画時に呼び出されるので、再描画する
1526 InvalidateRect(MdiInfo[WndNum].pMdiTextEdit->hEdit,NULL,0);
1527 UpdateWindow(MdiInfo[WndNum].pMdiTextEdit->hEdit);
1528
1529 if(temp2[i2]=='\0') goto EndToSetWorkFile;
1530 if(temp2[i2+1]!=',') goto EndToSetWorkFile;
1531
1532 //以前のスクロール位置を復元
1533 SCROLLINFO si;
1534 POINT pos;
1535 for(i2+=2,i3=0;;i2++,i3++){
1536 if(temp2[i2]==','||temp2[i2]=='\0'){
1537 temporary[i3]=0;
1538 break;
1539 }
1540 temporary[i3]=temp2[i2];
1541 }
1542 sscanf(temporary,"%d",&pos.x);
1543 if(temp2[i2]=='\0') goto EndToSetWorkFile;
1544 for(i2++,i3=0;;i2++,i3++){
1545 if(temp2[i2]==','||temp2[i2]=='\0'){
1546 temporary[i3]=0;
1547 break;
1548 }
1549 temporary[i3]=temp2[i2];
1550 }
1551 sscanf(temporary,"%d",&pos.y);
1552 si.cbSize=sizeof(SCROLLINFO);
1553 si.fMask=SIF_POS;
1554 si.nPos=pos.x;
1555 SetScrollInfo(MdiInfo[WndNum].pMdiTextEdit->hEdit,SB_HORZ,&si,1);
1556 si.nPos=pos.y;
1557 SetScrollInfo(MdiInfo[WndNum].pMdiTextEdit->hEdit,SB_VERT,&si,1);
1558
1559 if(temp2[i2]=='\0') goto EndToSetWorkFile;
1560
1561 //キャレット位置をセット
1562 for(i2++,i3=0;;i2++,i3++){
1563 if(temp2[i2]==','||temp2[i2]=='\0'){
1564 temporary[i3]=0;
1565 break;
1566 }
1567 temporary[i3]=temp2[i2];
1568 }
1569 sscanf(temporary,"%d",&pos.x);
1570 if(temp2[i2]=='\0') goto EndToSetWorkFile;
1571 for(i2++,i3=0;;i2++,i3++){
1572 if(temp2[i2]==','||temp2[i2]=='\0'){
1573 temporary[i3]=0;
1574 break;
1575 }
1576 temporary[i3]=temp2[i2];
1577 }
1578 sscanf(temporary,"%d",&pos.y);
1579 TextEdit_SetSel(WndNum,pos.x,pos.y);
1580 }
1581 else if(lstrcmpi(temporary,"rad")==0){
1582 for(i3=0;i3<static_cast<int>(ProjectInfo.windowInfos.size());i3++){
1583 if(lstrcmpi(ProjectInfo.windowInfos[i3]->name,temp2)==0){
1584 NewRadWindow( *ProjectInfo.windowInfos[i3] );
1585 break;
1586 }
1587 }
1588 }
1589 else if(lstrcmpi(temporary,"menu")==0){
1590 for(i3=0;i3<ProjectInfo.NumberOfMenu;i3++){
1591 if(lstrcmpi(ProjectInfo.pMenuInfo[i3].IdName,temp2)==0){
1592 NewMenuWindow(&ProjectInfo.pMenuInfo[i3]);
1593 break;
1594 }
1595 }
1596 }
1597 else if(lstrcmpi(temporary,"icon")==0){
1598 for(i3=0;i3<ProjectInfo.res.NumberOfIconRes;i3++){
1599 if(lstrcmpi(ProjectInfo.res.pIconResInfo[i3].path,temp2)==0){
1600 GetFullPath(temp2,ProjectInfo.dir);
1601 NewIconEditWindow(temp2);
1602 break;
1603 }
1604 }
1605 }
1606 i++;
1607 i2=-1;
1608 continue;
1609 }
1610 else break;
1611 }
1612 temporary[i2]=buffer[i];
1613 }
1614
1615 for(i+=2,i2=0;;i++,i2++){
1616 if((buffer[i]=='\r'&&buffer[i+1]=='\n')||buffer[i]=='\0'){
1617 temporary[i2]=0;
1618 break;
1619 }
1620 temporary[i2]=buffer[i];
1621 }
1622 sscanf(temporary,"%d",&i2);
1623
1624 switch( i2 ){
1625 case 0:
1626 ShowFileView();
1627 break;
1628 case 1:
1629 ShowClassView();
1630 break;
1631 case 2:
1632 ShowMaterialView();
1633 break;
1634 }
1635
1636 if(buffer[i]=='\0') goto EndToSetWorkFile;
1637
1638 for(i+=2,i2=0;;i++,i2++){
1639 if((buffer[i]=='\r'&&buffer[i+1]=='\n')||buffer[i]=='\0'){
1640 temporary[i2]=0;
1641 break;
1642 }
1643 temporary[i2]=buffer[i];
1644 }
1645 if(temporary[0]=='1') TreeView_Expand(pobj_FileTree->hTree,TreeView_GetRoot(pobj_FileTree->hTree),TVE_EXPAND);
1646
1647 for(i+=2,i2=0;;i++,i2++){
1648 if((buffer[i]=='\r'&&buffer[i+1]=='\n')||buffer[i]=='\0'){
1649 temporary[i2]=0;
1650 break;
1651 }
1652 temporary[i2]=buffer[i];
1653 }
1654 if(temporary[0]=='1') TreeView_Expand(hProcedureTreeView,TreeView_GetRoot(hProcedureTreeView),TVE_EXPAND);
1655
1656 for(i+=2,i2=0;;i++,i2++){
1657 if((buffer[i]=='\r'&&buffer[i+1]=='\n')||buffer[i]=='\0'){
1658 temporary[i2]=0;
1659 break;
1660 }
1661 temporary[i2]=buffer[i];
1662 }
1663 hTreeItem=TreeView_GetRoot(hMaterialTreeView);
1664 i2=0;
1665 while(hTreeItem){
1666 i2=GetOneParameter(temporary,i2,temp2);
1667 if(GetValue(temp2)) TreeView_Expand(hMaterialTreeView,hTreeItem,TVE_EXPAND);
1668 hTreeItem=TreeView_GetNextSibling(hMaterialTreeView,hTreeItem);
1669 }
1670 }
1671 else if(lstrcmp(temporary,"case3")==0){
1672 ////////////////////////////////////////
1673 // 古いフォーマットのワークファイル
1674
1675 LockWindowUpdate(hOwner);
1676 for(i=9,i2=0;;i++,i2++){
1677 if((buffer[i]=='\r'&&buffer[i+1]=='\n')||buffer[i]=='\0'){
1678 if(i2!=0){
1679 temporary[i2]=0;
1680 for(i3=0;;i3++){
1681 if(temporary[i3]==','||temporary[i3]=='\0') break;
1682 }
1683 if(temporary[i3]=='\0') goto EndToSetWorkFile;
1684 lstrcpy(temp2,temporary+i3+1);
1685 temporary[i3]=0;
1686 if(lstrcmpi(temporary,"text")==0){
1687 for(i3=0;;i3++){
1688 if(temp2[i3]==','||temp2[i3]=='\0') break;
1689 }
1690 if(temp2[i3]=='\0') goto EndToSetWorkFile;
1691 lstrcpy(temporary,temp2+i3+1);
1692 temp2[i3]=0;
1693 GetFullPath(temporary,ProjectInfo.dir);
1694 sscanf(temp2,"%d",&i3);
1695
1696 //ファイルを開く
1697 hChild=OpenFileWithExtension(temporary);
1698 WndNum=GetWndNum(hChild);
1699
1700 //キャレット位置をセット
1701 TextEdit_SetSel(WndNum,i3,i3);
1702 }
1703 else if(lstrcmpi(temporary,"rad")==0){
1704 for(i3=0;i3<static_cast<int>(ProjectInfo.windowInfos.size());i3++){
1705 if(lstrcmpi(ProjectInfo.windowInfos[i3]->name,temp2)==0){
1706 NewRadWindow( *ProjectInfo.windowInfos[i3] );
1707 break;
1708 }
1709 }
1710 }
1711 else if(lstrcmpi(temporary,"menu")==0){
1712 for(i3=0;i3<ProjectInfo.NumberOfMenu;i3++){
1713 if(lstrcmpi(ProjectInfo.pMenuInfo[i3].IdName,temp2)==0){
1714 NewMenuWindow(&ProjectInfo.pMenuInfo[i3]);
1715 break;
1716 }
1717 }
1718 }
1719 else if(lstrcmpi(temporary,"icon")==0){
1720 for(i3=0;i3<ProjectInfo.res.NumberOfIconRes;i3++){
1721 if(lstrcmpi(ProjectInfo.res.pIconResInfo[i3].path,temp2)==0){
1722 GetFullPath(temp2,ProjectInfo.dir);
1723 NewIconEditWindow(temp2);
1724 break;
1725 }
1726 }
1727 }
1728 i++;
1729 i2=-1;
1730 continue;
1731 }
1732 else break;
1733 }
1734 temporary[i2]=buffer[i];
1735 }
1736
1737 for(i+=2,i2=0;;i++,i2++){
1738 if((buffer[i]=='\r'&&buffer[i+1]=='\n')||buffer[i]=='\0'){
1739 temporary[i2]=0;
1740 break;
1741 }
1742 temporary[i2]=buffer[i];
1743 }
1744 sscanf(temporary,"%d",&i2);
1745
1746 switch( i2 ){
1747 case 0:
1748 ShowFileView();
1749 break;
1750 case 1:
1751 ShowClassView();
1752 break;
1753 case 2:
1754 ShowMaterialView();
1755 break;
1756 }
1757
1758 if(buffer[i]=='\0') goto EndToSetWorkFile;
1759
1760 for(i+=2,i2=0;;i++,i2++){
1761 if((buffer[i]=='\r'&&buffer[i+1]=='\n')||buffer[i]=='\0'){
1762 temporary[i2]=0;
1763 break;
1764 }
1765 temporary[i2]=buffer[i];
1766 }
1767 if(temporary[0]=='1') TreeView_Expand(pobj_FileTree->hTree,TreeView_GetRoot(pobj_FileTree->hTree),TVE_EXPAND);
1768
1769 for(i+=2,i2=0;;i++,i2++){
1770 if((buffer[i]=='\r'&&buffer[i+1]=='\n')||buffer[i]=='\0'){
1771 temporary[i2]=0;
1772 break;
1773 }
1774 temporary[i2]=buffer[i];
1775 }
1776 if(temporary[0]=='1') TreeView_Expand(hProcedureTreeView,TreeView_GetRoot(hProcedureTreeView),TVE_EXPAND);
1777
1778 for(i+=2,i2=0;;i++,i2++){
1779 if((buffer[i]=='\r'&&buffer[i+1]=='\n')||buffer[i]=='\0'){
1780 temporary[i2]=0;
1781 break;
1782 }
1783 temporary[i2]=buffer[i];
1784 }
1785 hTreeItem=TreeView_GetRoot(hMaterialTreeView);
1786 i2=0;
1787 while(hTreeItem){
1788 i2=GetOneParameter(temporary,i2,temp2);
1789 if(GetValue(temp2)) TreeView_Expand(hMaterialTreeView,hTreeItem,TVE_EXPAND);
1790 hTreeItem=TreeView_GetNextSibling(hMaterialTreeView,hTreeItem);
1791 }
1792 }
1793EndToSetWorkFile:
1794 LockWindowUpdate(NULL);
1795 HeapDefaultFree(buffer);
1796 }
1797
1798
1799 //ウィンドウ タイトルを変更
1800 sprintf(temporary,"%s - %s",ProjectInfo.name,APPLICATION_NAME);
1801 SetWindowText(hOwner,temporary);
1802
1803
1804 ProjectInfo.modify=0;
1805 ProjectInfo.ModifyOfMaterial=0;
1806 ProjectInfo.ModifuOfResource=0;
1807}
1808BOOL ProjectModifyCheck(BOOL bRun){
1809 extern MDIINFO MdiInfo[MAX_WNDNUM];
1810 int i,WndNum,sw;
1811 HWND hChild;
1812 char temporary[MAX_PATH];
1813 if(ProjectInfo.modify||ProjectInfo.ModifyOfMaterial||ProjectInfo.ModifuOfResource){
1814 if(bRun==0||pobj_nv->bSaveCheckProject){
1815 //"\"%s\" プロジェクトは変更されています。保存しますか?"
1816 sprintf(temporary,STRING_MODIFYCHECK_PROJECT,ProjectInfo.name);
1817 i=MessageBox(hOwner,temporary,APPLICATION_NAME,MB_YESNOCANCEL|MB_ICONEXCLAMATION);
1818
1819 if(i==IDCANCEL) return 0;
1820 if(i==IDYES) SaveProject();
1821 }
1822 else SaveProject();
1823 return 1;
1824 }
1825 hChild=GetWindow(hClient,GW_CHILD);
1826 while(hChild){
1827 WndNum=GetWndNum(hChild);
1828 sw=0;
1829 if(IS_DOCUMENT_TEXT(MdiInfo[WndNum].DocType)){
1830 if( MdiInfo[WndNum].pMdiTextEdit->IsModified() ){
1831 for(i=0;i<ProjectInfo.pobj_DBFileInfo->iNum;i++){
1832 ProjectInfo.pobj_DBFileInfo->ppobj_FileInfo[i]->GetFullPath(temporary);
1833 if(lstrcmpi(MdiInfo[WndNum].path,temporary)==0) sw=1;
1834 }
1835 }
1836 }
1837 else if(MdiInfo[WndNum].DocType==WNDTYPE_ICONEDIT){
1838 if(MdiInfo[WndNum].MdiIconEditInfo->bModify){
1839 for(i=0;i<ProjectInfo.res.NumberOfIconRes;i++){
1840 lstrcpy(temporary,ProjectInfo.res.pIconResInfo[i].path);
1841 GetFullPath(temporary,ProjectInfo.dir);
1842 if(lstrcmpi(MdiInfo[WndNum].path,temporary)==0) sw=1;
1843 }
1844 }
1845 }
1846
1847 if(sw){
1848 if(bRun==0||pobj_nv->bSaveCheckProject){
1849 //"\"%s\" プロジェクトは変更されています。保存しますか?"
1850 sprintf(temporary,STRING_MODIFYCHECK_PROJECT,ProjectInfo.name);
1851 i=MessageBox(hOwner,temporary,APPLICATION_NAME,MB_YESNOCANCEL|MB_ICONEXCLAMATION);
1852
1853 if(i==IDCANCEL) return 0;
1854 if(i==IDYES) SaveProject();
1855 }
1856 else SaveProject();
1857 return 1;
1858 }
1859 hChild=GetNextWindow(hChild,GW_HWNDNEXT);
1860 }
1861 return 2;
1862}
1863_int8 CloseProject(void){
1864 extern HANDLE hHeap;
1865 extern MDIINFO MdiInfo[MAX_WNDNUM];
1866 int i,i2,WndNum;
1867 HWND hChild,hCloseChild;
1868 char temporary[MAX_PATH];
1869
1870
1871 //保存確認
1872 i=ProjectModifyCheck(0);
1873 if(i==0) return 0;
1874 else if(i==2) MakeWorkFile();
1875
1876 //プロジェクトに関するMDIウィンドウをすべて閉じる
1877 hChild=GetWindow(hClient,GW_CHILD);
1878 while(hChild){
1879 hCloseChild=hChild;
1880 hChild=GetNextWindow(hChild,GW_HWNDNEXT);
1881 WndNum=GetWndNum(hCloseChild);
1882 if(IS_DOCUMENT_TEXT(MdiInfo[WndNum].DocType)){
1883 for(i=0;i<ProjectInfo.pobj_DBFileInfo->iNum;i++){
1884 ProjectInfo.pobj_DBFileInfo->ppobj_FileInfo[i]->GetFullPath(temporary);
1885 if(lstrcmpi(MdiInfo[WndNum].path,temporary)==0){
1886
1887 //変更フラグをオフにする
1888 MdiInfo[WndNum].pMdiTextEdit->UnModify();
1889
1890 SendMessage(hCloseChild,WM_CLOSE,0,0);
1891 break;
1892 }
1893 }
1894 }
1895 else if(MdiInfo[WndNum].DocType==WNDTYPE_RAD){
1896 BOOST_FOREACH( const WindowInfo *pWindowInfo, ProjectInfo.windowInfos )
1897 {
1898 if(lstrcmp(MdiInfo[WndNum].path, pWindowInfo->name)==0){
1899 SendMessage(hCloseChild,WM_CLOSE,0,0);
1900 break;
1901 }
1902 }
1903 }
1904 else if(MdiInfo[WndNum].DocType==WNDTYPE_MENU){
1905 for(i=0;i<ProjectInfo.NumberOfMenu;i++){
1906 if(lstrcmp(MdiInfo[WndNum].path,ProjectInfo.pMenuInfo[i].IdName)==0){
1907 SendMessage(hCloseChild,WM_CLOSE,0,0);
1908 break;
1909 }
1910 }
1911 }
1912 else if(MdiInfo[WndNum].DocType==WNDTYPE_ICONEDIT){
1913 for(i=0;ProjectInfo.res.NumberOfIconRes;i++){
1914 lstrcpy(temporary,ProjectInfo.res.pIconResInfo[i].path);
1915 GetFullPath(temporary,ProjectInfo.dir);
1916 if(lstrcmpi(MdiInfo[WndNum].path,temporary)==0){
1917 SendMessage(hCloseChild,WM_CLOSE,0,0);
1918 break;
1919 }
1920 }
1921 }
1922 }
1923
1924 //ファイル情報のメモリを解放
1925 delete ProjectInfo.pobj_DBFileInfo;
1926
1927 //ブレークポイントのオブジェクトを解放
1928 delete ProjectInfo.pobj_DBBreakPoint;
1929
1930 //ウィンドウ情報のメモリを解放
1931 BOOST_FOREACH( WindowInfo *pWindowInfo, ProjectInfo.windowInfos )
1932 {
1933 HeapDefaultFree(pWindowInfo->name);
1934 HeapDefaultFree(pWindowInfo->HandleName);
1935 HeapDefaultFree(pWindowInfo->caption);
1936 HeapDefaultFree(pWindowInfo->ClassName);
1937 HeapDefaultFree(pWindowInfo->CallBackName);
1938 HeapDefaultFree(pWindowInfo->filepath);
1939 if(pWindowInfo->MenuID)
1940 HeapDefaultFree(pWindowInfo->MenuID);
1941 if(pWindowInfo->IconResName)
1942 HeapDefaultFree(pWindowInfo->IconResName);
1943
1944 //子ウィンドウのメモリを解放
1945 for(i2=0;i2<pWindowInfo->childWindowInfos.size();i2++){
1946 HeapDefaultFree(pWindowInfo->childWindowInfos[i2]->IdName);
1947 HeapDefaultFree(pWindowInfo->childWindowInfos[i2]->caption);
1948 if(pWindowInfo->childWindowInfos[i2]->Control==CT_IMAGEBOX){
1949 //イメージ ボックスの場合
1950 HeapDefaultFree(pWindowInfo->childWindowInfos[i2]->ImageCtrlInfo.path);
1951 }
1952
1953 delete pWindowInfo->childWindowInfos[i2];
1954 }
1955 pWindowInfo->childWindowInfos.clear();
1956 }
1957 ProjectInfo.windowInfos.Clear();
1958
1959 //メニュー情報のメモリを解放
1960 HeapMenuDataFree(ProjectInfo.pMenuInfo,ProjectInfo.NumberOfMenu,0);
1961 HeapDefaultFree(ProjectInfo.pMenuInfo);
1962
1963 //リソースのメモリを解放
1964 for(i=0;i<ProjectInfo.res.NumberOfCursorRes;i++){
1965 HeapDefaultFree(ProjectInfo.res.pCursorResInfo[i].IdName);
1966 HeapDefaultFree(ProjectInfo.res.pCursorResInfo[i].path);
1967 }
1968 HeapDefaultFree(ProjectInfo.res.pCursorResInfo);
1969 for(i=0;i<ProjectInfo.res.NumberOfBitmapRes;i++){
1970 HeapDefaultFree(ProjectInfo.res.pBitmapResInfo[i].IdName);
1971 HeapDefaultFree(ProjectInfo.res.pBitmapResInfo[i].path);
1972 }
1973 HeapDefaultFree(ProjectInfo.res.pBitmapResInfo);
1974 for(i=0;i<ProjectInfo.res.NumberOfIconRes;i++){
1975 HeapDefaultFree(ProjectInfo.res.pIconResInfo[i].IdName);
1976 HeapDefaultFree(ProjectInfo.res.pIconResInfo[i].path);
1977 }
1978 HeapDefaultFree(ProjectInfo.res.pIconResInfo);
1979
1980 //プロジェクト ビューを非表示にする
1981 extern HWND hProjectView;
1982 if(IsWindowVisible(hProjectView)) SendMessage(hOwner,WM_COMMAND,IDM_PROJECTVIEW,0);
1983 SetWindowText(hProjectView,"Project View");
1984
1985 TreeView_DeleteAllItems(pobj_FileTree->hTree);
1986 TreeView_DeleteAllItems(hProcedureTreeView);
1987 TreeView_DeleteAllItems(hMaterialTreeView);
1988
1989 //ウィンドウ タイトルを変更
1990 SetWindowText(hOwner,APPLICATION_NAME);
1991
1992 ProjectInfo.name[0]=0;
1993
1994 //メニュー状態を設定
1995 ResetState_DocMenu();
1996
1997 return 1;
1998}
1999void MakeWorkFile(void){
2000 extern MDIINFO MdiInfo[MAX_WNDNUM];
2001 int i,i2,WndNum;
2002 char temporary[MAX_PATH],buffer[32767];
2003 HWND hChild;
2004 CHARRANGE CharRange;
2005
2006 //ワークファイル(*.wrk)を作成
2007 lstrcpy(buffer,"case4\r\n\r\n");
2008 i2=lstrlen(buffer);
2009
2010
2011 ///////////////////////
2012 //MDIウィンドウの並び
2013 hChild=GetWindow(GetWindow(hClient,GW_CHILD),GW_HWNDLAST);
2014 while(hChild){
2015 WndNum=GetWndNum(hChild);
2016 if(IS_DOCUMENT_TEXT(MdiInfo[WndNum].DocType)){
2017 for(i=0;i<ProjectInfo.pobj_DBFileInfo->iNum;i++){
2018 ProjectInfo.pobj_DBFileInfo->ppobj_FileInfo[i]->GetFullPath(temporary);
2019 if(lstrcmpi(MdiInfo[WndNum].path,temporary)==0){
2020 TextEdit_GetSel(WndNum,&CharRange);
2021
2022 SCROLLINFO si;
2023 POINT pos;
2024 si.cbSize=sizeof(SCROLLINFO);
2025 si.fMask=SIF_POS;
2026 GetScrollInfo(MdiInfo[WndNum].pMdiTextEdit->hEdit,SB_HORZ,&si);
2027 pos.x=si.nPos;
2028 GetScrollInfo(MdiInfo[WndNum].pMdiTextEdit->hEdit,SB_VERT,&si);
2029 pos.y=si.nPos;
2030
2031 sprintf(buffer+i2,"text,\"%s\",%d,%d,%d,%d\r\n",
2032 ProjectInfo.pobj_DBFileInfo->ppobj_FileInfo[i]->m_path,
2033 pos.x,
2034 pos.y,
2035 CharRange.cpMin,
2036 CharRange.cpMax);
2037 i2+=lstrlen(buffer+i2);
2038 break;
2039 }
2040 }
2041 }
2042 else if(MdiInfo[WndNum].DocType==WNDTYPE_RAD){
2043 BOOST_FOREACH( WindowInfo *pWindowInfo, ProjectInfo.windowInfos )
2044 {
2045 if(lstrcmpi(MdiInfo[WndNum].path,pWindowInfo->name)==0){
2046 sprintf(buffer+i2,"rad,%s\r\n",MdiInfo[WndNum].path);
2047 i2+=lstrlen(buffer+i2);
2048 break;
2049 }
2050 }
2051 }
2052 else if(MdiInfo[WndNum].DocType==WNDTYPE_MENU){
2053 for(i=0;i<ProjectInfo.NumberOfMenu;i++){
2054 if(lstrcmpi(MdiInfo[WndNum].path,ProjectInfo.pMenuInfo[i].IdName)==0){
2055 sprintf(buffer+i2,"menu,%s\r\n",MdiInfo[WndNum].path);
2056 i2+=lstrlen(buffer+i2);
2057 break;
2058 }
2059 }
2060 }
2061 else if(MdiInfo[WndNum].DocType==WNDTYPE_ICONEDIT){
2062 for(i=0;i<ProjectInfo.res.NumberOfIconRes;i++){
2063 lstrcpy(temporary,ProjectInfo.res.pIconResInfo[i].path);
2064 GetFullPath(temporary,ProjectInfo.dir);
2065 if(lstrcmpi(MdiInfo[WndNum].path,temporary)==0){
2066 sprintf(buffer+i2,"icon,%s\r\n",ProjectInfo.res.pIconResInfo[i].path);
2067 i2+=lstrlen(buffer+i2);
2068 break;
2069 }
2070 }
2071 }
2072 hChild=GetNextWindow(hChild,GW_HWNDPREV);
2073 }
2074 lstrcpy(buffer+i2,"\r\n");
2075 i2+=2;
2076
2077
2078 //////////////////////////
2079 //ツリービューの展開状況
2080 sprintf(buffer+i2,"%d\r\n",TabCtrl_GetCurSel(hProjectViewTab));
2081 i2+=lstrlen(buffer+i2);
2082 TVITEM tvItem;
2083 memset(&tvItem,0,sizeof(TVITEM));
2084 tvItem.mask=TVIF_HANDLE|TVIF_STATE;
2085 tvItem.hItem=TreeView_GetRoot(pobj_FileTree->hTree);
2086 TreeView_GetItem(pobj_FileTree->hTree,&tvItem);
2087 if(tvItem.state&TVIS_EXPANDED) i=1;
2088 else i=0;
2089 sprintf(buffer+i2,"%d\r\n",i);
2090 i2+=lstrlen(buffer+i2);
2091
2092 tvItem.hItem=TreeView_GetRoot(hProcedureTreeView);
2093 TreeView_GetItem(hProcedureTreeView,&tvItem);
2094 if(tvItem.state&TVIS_EXPANDED) i=1;
2095 else i=0;
2096 sprintf(buffer+i2,"%d\r\n",i);
2097 i2+=lstrlen(buffer+i2);
2098
2099 tvItem.hItem=TreeView_GetRoot(hMaterialTreeView);
2100 while(tvItem.hItem){
2101 TreeView_GetItem(hMaterialTreeView,&tvItem);
2102 if(tvItem.state&TVIS_EXPANDED) i=1;
2103 else i=0;
2104 sprintf(buffer+i2,"%d",i);
2105 i2+=lstrlen(buffer+i2);
2106
2107 tvItem.hItem=TreeView_GetNextSibling(hMaterialTreeView,tvItem.hItem);
2108 if(tvItem.hItem){
2109 lstrcpy(buffer+i2,",");
2110 i2+=lstrlen(buffer+i2);
2111 }
2112 }
2113
2114
2115 //保存
2116 sprintf(temporary,"%s%s.wrk",ProjectInfo.dir,ProjectInfo.name);
2117 WriteBuffer(temporary,buffer,i2);
2118}
2119void SaveProject(void){
2120 extern MDIINFO MdiInfo[MAX_WNDNUM];
2121 int i,i2,i3,WndNum;
2122 char temporary[MAX_PATH],buffer[32767];
2123 HWND hChild;
2124
2125 //"プロジェクトを保存中..."
2126 SetStatusText(STRING_PROJECT_SAVING);
2127
2128 //プロジェクトファイルのバージョンを設定
2129 ProjectInfo.dwVersion=PROJECT_VERSION;
2130
2131 hChild=GetWindow(hClient,GW_CHILD);
2132 while(hChild){
2133 WndNum=GetWndNum(hChild);
2134 if(IS_DOCUMENT_TEXT(MdiInfo[WndNum].DocType)){
2135 if( MdiInfo[WndNum].pMdiTextEdit->IsModified() ){
2136 for(i=0;i<ProjectInfo.pobj_DBFileInfo->iNum;i++){
2137 ProjectInfo.pobj_DBFileInfo->ppobj_FileInfo[i]->GetFullPath(temporary);
2138 if(lstrcmpi(MdiInfo[WndNum].path,temporary)==0){
2139 SaveDocument(hChild,NULL);
2140 break;
2141 }
2142 }
2143 }
2144 }
2145 if(MdiInfo[WndNum].DocType==WNDTYPE_ICONEDIT){
2146 if(MdiInfo[WndNum].MdiIconEditInfo->bModify){
2147 for(i=0;i<ProjectInfo.res.NumberOfIconRes;i++){
2148 lstrcpy(temporary,ProjectInfo.res.pIconResInfo[i].path);
2149 GetFullPath(temporary,ProjectInfo.dir);
2150 if(lstrcmpi(MdiInfo[WndNum].path,temporary)==0){
2151 SaveDocument(hChild,NULL);
2152 break;
2153 }
2154 }
2155 }
2156 }
2157 hChild=GetNextWindow(hChild,GW_HWNDNEXT);
2158 }
2159
2160
2161 //////////////////////////////////////
2162 //プロジェクトファイル(*.pj)を作成
2163 lstrcpy(buffer,"\' ActiveBasic Project file.\r\n\r\n");
2164 i2=lstrlen(buffer);
2165 sprintf(buffer+i2,"#VERSION=%d\r\n\r\n",ProjectInfo.dwVersion);
2166 i2+=lstrlen(buffer+i2);
2167 sprintf(buffer+i2,"#MODULETYPE=%d\r\n\r\n",ProjectInfo.dwModuleType);
2168 i2+=lstrlen(buffer+i2);
2169 sprintf(buffer+i2,"#NAME=%s\r\n\r\n",ProjectInfo.name);
2170 i2+=lstrlen(buffer+i2);
2171 extern HWND hSelectCompilerCombo;
2172 if(SendMessage(hSelectCompilerCombo,CB_GETCURSEL,0,0)==0){
2173 sprintf(buffer+i2,"#PLATFORM=32\r\n\r\n",ProjectInfo.name);
2174 i2+=lstrlen(buffer+i2);
2175 }
2176 else{
2177 sprintf(buffer+i2,"#PLATFORM=64\r\n\r\n",ProjectInfo.name);
2178 i2+=lstrlen(buffer+i2);
2179 }
2180 sprintf(buffer+i2,"#USEWINDOW=%d\r\n\r\n",ProjectInfo.windowInfos.size());
2181 i2+=lstrlen(buffer+i2);
2182 sprintf(buffer+i2,"#OPTION=&H%08x\r\n\r\n",ProjectInfo.dwOption);
2183 i2+=lstrlen(buffer+i2);
2184 sprintf(buffer+i2,"#OUTPUT_RELEASE=%s\r\n\r\n",ProjectInfo.lpszOutput_Release);
2185 i2+=lstrlen(buffer+i2);
2186 sprintf(buffer+i2,"#OUTPUT_DEBUG=%s\r\n\r\n",ProjectInfo.lpszOutput_Debug);
2187 i2+=lstrlen(buffer+i2);
2188 sprintf(buffer+i2,"#MANIFEST=%s\r\n\r\n",ProjectInfo.szManifestPath);
2189 i2+=lstrlen(buffer+i2);
2190 sprintf(buffer+i2,"#DEBUG_CMD_LINE=%s\r\n\r\n",ProjectInfo.szCmdLine);
2191 i2+=lstrlen(buffer+i2);
2192 sprintf(buffer+i2,"#DEBUG_EXE_PATH=%s\r\n\r\n",ProjectInfo.szExePath);
2193 i2+=lstrlen(buffer+i2);
2194 if(ProjectInfo.ResourceFileName[0]){
2195 sprintf(buffer+i2,"#RESOURCE=%s\r\n\r\n",ProjectInfo.ResourceFileName);
2196 i2+=lstrlen(buffer+i2);
2197 }
2198 else{
2199 lstrcpy(buffer+i2,"#RESOURCE=0\r\n\r\n");
2200 i2+=lstrlen(buffer+i2);
2201 }
2202 sprintf(buffer+i2,"#SOURCE\r\n");
2203 i2+=lstrlen(buffer+i2);
2204 for(i=0;i<ProjectInfo.pobj_DBFileInfo->iNum;i++){
2205 sprintf(buffer+i2,"%s\r\n",ProjectInfo.pobj_DBFileInfo->ppobj_FileInfo[i]->m_path);
2206 i2+=lstrlen(buffer+i2);
2207 }
2208
2209 //保存
2210 sprintf(temporary,"%s%s.pj",ProjectInfo.dir,ProjectInfo.name);
2211 WriteBuffer(temporary,buffer,i2);
2212
2213
2214 //////////////////////////////////
2215 // リソースファイル(*.rc、resource.ab)を作成
2216 if(ProjectInfo.ResourceFileName[0]){
2217 i2=0;
2218 i3=101;
2219 for(i=0;i<ProjectInfo.res.NumberOfCursorRes;i++,i3++){
2220 sprintf(buffer+i2,"Const %s=%d\r\n",
2221 ProjectInfo.res.pCursorResInfo[i].IdName,
2222 i3);
2223 i2+=lstrlen(buffer+i2);
2224 }
2225 for(i=0;i<ProjectInfo.res.NumberOfBitmapRes;i++,i3++){
2226 sprintf(buffer+i2,"Const %s=%d\r\n",
2227 ProjectInfo.res.pBitmapResInfo[i].IdName,
2228 i3);
2229 i2+=lstrlen(buffer+i2);
2230 }
2231 for(i=0;i<ProjectInfo.res.NumberOfIconRes;i++,i3++){
2232 sprintf(buffer+i2,"Const %s=%d\r\n",
2233 ProjectInfo.res.pIconResInfo[i].IdName,
2234 i3);
2235 i2+=lstrlen(buffer+i2);
2236 }
2237
2238 //保存(resource.ab)
2239 lstrcpy(temporary,"resource.ab");
2240 GetFullPath(temporary,ProjectInfo.dir);
2241 WriteBuffer(temporary,buffer,i2);
2242
2243 i2=0;
2244 for(i=0;i<ProjectInfo.res.NumberOfCursorRes;i++){
2245 sprintf(buffer+i2,"%s CURSOR \"%s\"\r\n",
2246 ProjectInfo.res.pCursorResInfo[i].IdName,
2247 ProjectInfo.res.pCursorResInfo[i].path);
2248 i2+=lstrlen(buffer+i2);
2249 }
2250 for(i=0;i<ProjectInfo.res.NumberOfBitmapRes;i++){
2251 sprintf(buffer+i2,"%s BITMAP \"%s\"\r\n",
2252 ProjectInfo.res.pBitmapResInfo[i].IdName,
2253 ProjectInfo.res.pBitmapResInfo[i].path);
2254 i2+=lstrlen(buffer+i2);
2255 }
2256 for(i=0;i<ProjectInfo.res.NumberOfIconRes;i++){
2257 sprintf(buffer+i2,"%s ICON \"%s\"\r\n",
2258 ProjectInfo.res.pIconResInfo[i].IdName,
2259 ProjectInfo.res.pIconResInfo[i].path);
2260 i2+=lstrlen(buffer+i2);
2261 }
2262
2263 //マニフェスト
2264 if(ProjectInfo.dwOption&PJ_OP_RC_MANIFEST){
2265 sprintf(buffer+i2,"CREATEPROCESS_MANIFEST_RESOURCE_ID RT_MANIFEST \"%s\"\r\n",
2266 ProjectInfo.szManifestPath);
2267 i2+=lstrlen(buffer+i2);
2268 }
2269
2270 //保存
2271 lstrcpy(temporary,ProjectInfo.ResourceFileName);
2272 GetFullPath(temporary,ProjectInfo.dir);
2273 WriteBuffer(temporary,buffer,i2);
2274 }
2275
2276
2277 ///////////////////////////////////////
2278 //インデックスファイル(*.idx)を作成
2279 buffer[0]=0;
2280 lstrcpy(buffer,"' インデックス プログラム\r\n");
2281 i2=lstrlen(buffer);
2282 if(ProjectInfo.dwOption&PJ_OP_SOURCE_MASK){
2283 if(ProjectInfo.dwOption&PJ_OP_STRICT){
2284 /* #strictディレクティブは今は使われていない
2285 lstrcpy(buffer+i2,"\r\n");
2286 i2+=lstrlen(buffer+i2);
2287 lstrcpy(buffer+i2,"#strict");
2288 i2+=lstrlen(buffer+i2);
2289 lstrcpy(buffer+i2,"\r\n");
2290 i2+=lstrlen(buffer+i2);
2291 */
2292 }
2293 lstrcpy(buffer+i2,"\r\n");
2294 i2+=lstrlen(buffer+i2);
2295 lstrcpy(buffer+i2,"'Win32APIの定義ファイル\r\n");
2296 i2+=lstrlen(buffer+i2);
2297 if(ProjectInfo.dwOption&PJ_OP_MMSYSTEM){
2298 lstrcpy(buffer+i2,"#include <api_mmsys.sbp>\r\n");
2299 i2+=lstrlen(buffer+i2);
2300 }
2301 if(ProjectInfo.dwOption&PJ_OP_COMMCTRL){
2302 lstrcpy(buffer+i2,"#include <api_commctrl.sbp>\r\n");
2303 i2+=lstrlen(buffer+i2);
2304 }
2305 if(ProjectInfo.dwOption&PJ_OP_RICHEDIT){
2306 lstrcpy(buffer+i2,"#include <api_richedit.sbp>\r\n");
2307 i2+=lstrlen(buffer+i2);
2308 }
2309 if(ProjectInfo.dwOption&PJ_OP_WINSOCK){
2310 lstrcpy(buffer+i2,"#include <api_winsock2.sbp>\r\n");
2311 i2+=lstrlen(buffer+i2);
2312 }
2313 }
2314 if( !ProjectInfo.windowInfos.empty() )
2315 {
2316 lstrcpy(buffer+i2,"\r\n");
2317 i2+=lstrlen(buffer+i2);
2318 lstrcpy(buffer+i2,"'RADツールが生成するウィンドウ制御プログラム\r\n");
2319 i2+=lstrlen(buffer+i2);
2320 sprintf(buffer+i2,"#include \"Callback.wbp\"\r\n");
2321 i2+=lstrlen(buffer+i2);
2322 }
2323 if(ProjectInfo.pobj_DBFileInfo->iNum>1){
2324 lstrcpy(buffer+i2,"\r\n");
2325 i2+=lstrlen(buffer+i2);
2326 lstrcpy(buffer+i2,"'プロジェクト内のプログラム ファイル\r\n");
2327 i2+=lstrlen(buffer+i2);
2328 for(i=1;i<ProjectInfo.pobj_DBFileInfo->iNum;i++){
2329 //メインファイルは含まない
2330 sprintf(buffer+i2,"#include \"%s\"\r\n",ProjectInfo.pobj_DBFileInfo->ppobj_FileInfo[i]->m_path);
2331 i2+=lstrlen(buffer+i2);
2332 lstrcpy(buffer+i2,"_ClearNamespaceImported\r\n");
2333 i2+=lstrlen(buffer+i2);
2334 }
2335 }
2336 if( !ProjectInfo.windowInfos.empty() )
2337 {
2338 lstrcpy(buffer+i2,"\r\n");
2339 i2+=lstrlen(buffer+i2);
2340 lstrcpy(buffer+i2,"'RADツールが生成するウィンドウ生成プログラム\r\n");
2341 i2+=lstrlen(buffer+i2);
2342 sprintf(buffer+i2,"#include \"MakeWindow.wbp\"\r\n");
2343 i2+=lstrlen(buffer+i2);
2344 }
2345 if(ProjectInfo.ResourceFileName[0]){
2346 //リソースファイルが含まれる場合
2347 lstrcpy(buffer+i2,"\r\n");
2348 i2+=lstrlen(buffer+i2);
2349 lstrcpy(buffer+i2,"'リソースファイル\r\n");
2350 i2+=lstrlen(buffer+i2);
2351 lstrcpy(buffer+i2,"#include \"resource.ab\"\r\n");
2352 i2+=lstrlen(buffer+i2);
2353 sprintf(buffer+i2,"#resource \"%s.rc\"\r\n",ProjectInfo.name);
2354 i2+=lstrlen(buffer+i2);
2355 }
2356
2357 //保存
2358 sprintf(temporary,"%s%s.idx",ProjectInfo.dir,ProjectInfo.name);
2359 WriteBuffer(temporary,buffer,i2);
2360
2361
2362 if( !ProjectInfo.windowInfos.empty() )
2363 {
2364 /////////////////////////////////////////////////////
2365 //ウィンドウ関連ファイル(*.wnd)を作成、保存
2366 if(ProjectInfo.ModifyOfMaterial){
2367 sprintf(temporary,"%s%s.wnd",ProjectInfo.dir,ProjectInfo.name);
2368 SaveWindowFile( temporary, ProjectInfo.windowInfos );
2369 }
2370
2371 //.wbpファイルを生成
2372 SaveWindowProgram();
2373 }
2374
2375
2376 MakeWorkFile();
2377
2378 SetStatusText("");
2379
2380 ProjectInfo.modify=0;
2381 ProjectInfo.ModifuOfResource=0;
2382}
2383
2384BOOL SetProjectToRun(void){
2385 HANDLE hFind;
2386 WIN32_FIND_DATA wfd;
2387
2388 if(ProjectInfo.pobj_DBFileInfo->iNum==0){
2389 //"プログラム ファイルがプロジェクトに存在しません。"
2390 MessageBox(hOwner,STRING_ERROR_NOFILE,STRING_ERROR,MB_OK|MB_ICONEXCLAMATION);
2391 return 0;
2392 }
2393
2394 extern ActiveBasic::Common::Platform::EnumType selectingPlatform;
2395 hFind=FindFirstFile( ActiveBasic::Common::Environment::GetCompilerExePath( selectingPlatform ).c_str(), &wfd );
2396 if(hFind==INVALID_HANDLE_VALUE){
2397 //"BasicCompiler.exe が見つかりません"
2398 MessageBox(hOwner,STRING_ERROR_NOBASICCOMPILER,STRING_ERROR,MB_OK|MB_ICONEXCLAMATION);
2399 return 0;
2400 }
2401 FindClose(hFind);
2402
2403 //プロジェクト構造のバージョンが違う時は、再保存する
2404 if(ProjectInfo.dwVersion<PROJECT_VERSION)
2405 ProjectInfo.ModifyOfMaterial=1;
2406
2407 //保存確認
2408 if(!ProjectModifyCheck(1)) return 0;
2409
2410 return 1;
2411}
2412BOOL IsNeedCompileForProject(BOOL bDebug){
2413 int i2;
2414 char temporary[MAX_PATH];
2415 HANDLE hFind,hFile;
2416 WIN32_FIND_DATA wfd;
2417 FILETIME SourceTime,ExeTime;
2418
2419 if(bDebug) lstrcpy(temporary,ProjectInfo.lpszOutput_Debug);
2420 else lstrcpy(temporary,ProjectInfo.lpszOutput_Release);
2421 GetFullPath(temporary,ProjectInfo.dir);
2422
2423 hFind=FindFirstFile(temporary,&wfd);
2424 if(hFind==INVALID_HANDLE_VALUE) return 1;
2425 FindClose(hFind);
2426
2427 hFile=CreateFile(temporary,GENERIC_READ,FILE_SHARE_READ|FILE_SHARE_WRITE,NULL,OPEN_EXISTING,FILE_ATTRIBUTE_NORMAL,NULL);
2428 GetFileTime(hFile,NULL,NULL,&ExeTime);
2429 CloseHandle(hFile);
2430
2431 for(i2=0;i2<ProjectInfo.pobj_DBFileInfo->iNum;i2++){
2432 ProjectInfo.pobj_DBFileInfo->ppobj_FileInfo[i2]->GetFullPath(temporary);
2433 hFile=CreateFile(temporary,GENERIC_READ,FILE_SHARE_READ|FILE_SHARE_WRITE,NULL,OPEN_EXISTING,FILE_ATTRIBUTE_NORMAL,NULL);
2434 GetFileTime(hFile,NULL,NULL,&SourceTime);
2435 CloseHandle(hFile);
2436
2437 if(SourceTime.dwHighDateTime>ExeTime.dwHighDateTime||
2438 SourceTime.dwHighDateTime==ExeTime.dwHighDateTime&&
2439 SourceTime.dwLowDateTime>ExeTime.dwLowDateTime) return 1;
2440 }
2441 if( !ProjectInfo.windowInfos.empty() )
2442 {
2443 //CallBack.wbp
2444 lstrcpy(temporary,"CallBack.wbp");
2445 GetFullPath(temporary,ProjectInfo.dir);
2446 hFile=CreateFile(temporary,GENERIC_READ,FILE_SHARE_READ|FILE_SHARE_WRITE,NULL,OPEN_EXISTING,FILE_ATTRIBUTE_NORMAL,NULL);
2447 GetFileTime(hFile,NULL,NULL,&SourceTime);
2448 CloseHandle(hFile);
2449 if(SourceTime.dwHighDateTime>ExeTime.dwHighDateTime||
2450 SourceTime.dwHighDateTime==ExeTime.dwHighDateTime&&
2451 SourceTime.dwLowDateTime>ExeTime.dwLowDateTime) return 1;
2452
2453 //MakeWindow.wbp
2454 lstrcpy(temporary,"MakeWindow.wbp");
2455 GetFullPath(temporary,ProjectInfo.dir);
2456 hFile=CreateFile(temporary,GENERIC_READ,FILE_SHARE_READ|FILE_SHARE_WRITE,NULL,OPEN_EXISTING,FILE_ATTRIBUTE_NORMAL,NULL);
2457 GetFileTime(hFile,NULL,NULL,&SourceTime);
2458 CloseHandle(hFile);
2459 if(SourceTime.dwHighDateTime>ExeTime.dwHighDateTime||
2460 SourceTime.dwHighDateTime==ExeTime.dwHighDateTime&&
2461 SourceTime.dwLowDateTime>ExeTime.dwLowDateTime) return 1;
2462 }
2463 return 0;
2464}
Note: See TracBrowser for help on using the repository browser.