Context Navigation

← Previous Revision
Latest Revision
Next Revision →
Blame
Revision Log

source: dev/ProjectEditor/ProjectControl.cpp@ 7

Last change on this file since 7 was 3, checked in by dai_9181, 18 years ago

File size: 78.3 KB

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

Note: See TracBrowser for help on using the repository browser.

Download in other formats: