4 * Copyright 2006 Piotr Caban
6 * This library is free software; you can redistribute it and/or
7 * modify it under the terms of the GNU Lesser General Public
8 * License as published by the Free Software Foundation; either
9 * version 2.1 of the License, or (at your option) any later version.
11 * This library is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 * Lesser General Public License for more details.
16 * You should have received a copy of the GNU Lesser General Public
17 * License along with this library; if not, write to the Free Software
18 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
24 static WCHAR wszRegEdit
[] = { 'r','e','g','e','d','i','t','.','e','x','e','\0' };
26 INT_PTR CALLBACK
CreateInstOnProc(HWND hDlgWnd
, UINT uMsg
, WPARAM wParam
, LPARAM lParam
)
33 switch(LOWORD(wParam
)) {
35 memset(globals
.wszMachineName
, 0, sizeof(WCHAR
[MAX_LOAD_STRING
]));
36 hEdit
= GetDlgItem(hDlgWnd
, IDC_MACHINE
);
38 if (GetWindowTextLength(hEdit
)>0)
39 GetWindowText(hEdit
, globals
.wszMachineName
, MAX_LOAD_STRING
);
41 EndDialog(hDlgWnd
, IDOK
);
44 EndDialog(hDlgWnd
, IDCANCEL
);
52 void ResizeChild(void)
54 RECT client
, stat
, tool
;
56 MoveWindow(globals
.hStatusBar
, 0, 0, 0, 0, TRUE
);
57 MoveWindow(globals
.hToolBar
, 0, 0, 0, 0, TRUE
);
59 if(IsWindowVisible(globals
.hStatusBar
))
60 GetClientRect(globals
.hStatusBar
, &stat
);
63 if(IsWindowVisible(globals
.hToolBar
))
65 GetClientRect(globals
.hToolBar
, &tool
);
70 GetClientRect(globals
.hMainWnd
, &client
);
71 MoveWindow(globals
.hPaneWnd
, 0, tool
.bottom
,
72 client
.right
, client
.bottom
-tool
.bottom
-stat
.bottom
, TRUE
);
75 void RefreshMenu(HTREEITEM item
)
79 HMENU hMenu
= GetMenu(globals
.hMainWnd
);
81 memset(&tvi
, 0, sizeof(TVITEM
));
83 SendMessage(globals
.hTree
, TVM_GETITEM
, 0, (LPARAM
)&tvi
);
85 SendMessage(globals
.hToolBar
, TB_ENABLEBUTTON
, IDM_CREATEINST
, FALSE
);
86 SendMessage(globals
.hToolBar
, TB_ENABLEBUTTON
, IDM_RELEASEINST
, FALSE
);
87 SendMessage(globals
.hToolBar
, TB_ENABLEBUTTON
, IDM_VIEW
, FALSE
);
89 if(tvi
.lParam
&& ((ITEM_INFO
*)tvi
.lParam
)->cFlag
&SHOWALL
)
91 EnableMenuItem(hMenu
, IDM_COPYCLSID
, MF_ENABLED
);
92 EnableMenuItem(hMenu
, IDM_HTMLTAG
, MF_ENABLED
);
93 EnableMenuItem(hMenu
, IDM_VIEW
, MF_GRAYED
);
95 if(!((ITEM_INFO
*)tvi
.lParam
)->loaded
)
97 EnableMenuItem(hMenu
, IDM_CREATEINST
, MF_ENABLED
);
98 EnableMenuItem(hMenu
, IDM_CREATEINSTON
, MF_ENABLED
);
99 EnableMenuItem(hMenu
, IDM_RELEASEINST
, MF_GRAYED
);
100 SendMessage(globals
.hToolBar
, TB_ENABLEBUTTON
, IDM_CREATEINST
, TRUE
);
104 EnableMenuItem(hMenu
, IDM_CREATEINST
, MF_GRAYED
);
105 EnableMenuItem(hMenu
, IDM_CREATEINSTON
, MF_GRAYED
);
106 EnableMenuItem(hMenu
, IDM_RELEASEINST
, MF_ENABLED
);
107 SendMessage(globals
.hToolBar
, TB_ENABLEBUTTON
, IDM_RELEASEINST
, TRUE
);
110 else if(tvi
.lParam
&& ((ITEM_INFO
*)tvi
.lParam
)->cFlag
&INTERFACE
)
112 EnableMenuItem(hMenu
, IDM_TYPEINFO
, MF_GRAYED
);
113 EnableMenuItem(hMenu
, IDM_CREATEINST
, MF_GRAYED
);
114 EnableMenuItem(hMenu
, IDM_CREATEINSTON
, MF_GRAYED
);
115 EnableMenuItem(hMenu
, IDM_RELEASEINST
, MF_GRAYED
);
116 EnableMenuItem(hMenu
, IDM_COPYCLSID
, MF_ENABLED
);
117 EnableMenuItem(hMenu
, IDM_HTMLTAG
, MF_GRAYED
);
118 EnableMenuItem(hMenu
, IDM_VIEW
, MF_ENABLED
);
119 SendMessage(globals
.hToolBar
, TB_ENABLEBUTTON
, IDM_VIEW
, TRUE
);
123 EnableMenuItem(hMenu
, IDM_TYPEINFO
, MF_GRAYED
);
124 EnableMenuItem(hMenu
, IDM_CREATEINST
, MF_GRAYED
);
125 EnableMenuItem(hMenu
, IDM_CREATEINSTON
, MF_GRAYED
);
126 EnableMenuItem(hMenu
, IDM_RELEASEINST
, MF_GRAYED
);
127 EnableMenuItem(hMenu
, IDM_COPYCLSID
, MF_GRAYED
);
128 EnableMenuItem(hMenu
, IDM_HTMLTAG
, MF_GRAYED
);
129 EnableMenuItem(hMenu
, IDM_VIEW
, MF_GRAYED
);
131 parent
= TreeView_GetParent(globals
.hTree
, item
);
132 if(parent
==tree
.hAID
|| parent
==tree
.hGBCC
)
133 EnableMenuItem(hMenu
, IDM_COPYCLSID
, MF_ENABLED
);
136 int MenuCommand(WPARAM wParam
, HWND hWnd
)
140 WCHAR wszAbout
[MAX_LOAD_STRING
];
141 WCHAR wszAboutVer
[MAX_LOAD_STRING
];
146 LoadString(globals
.hMainInst
, IDS_ABOUT
, wszAbout
,
147 sizeof(WCHAR
[MAX_LOAD_STRING
]));
148 LoadString(globals
.hMainInst
, IDS_ABOUTVER
, wszAboutVer
,
149 sizeof(WCHAR
[MAX_LOAD_STRING
]));
150 ShellAbout(hWnd
, wszAbout
, wszAboutVer
, NULL
);
153 hSelect
= TreeView_GetSelection(globals
.hTree
);
154 CreateInst(hSelect
, NULL
);
155 SendMessage(globals
.hTree
, TVM_EXPAND
, TVE_EXPAND
, (LPARAM
)hSelect
);
157 case IDM_CREATEINSTON
:
158 if(DialogBox(0, MAKEINTRESOURCE(DLG_CREATEINSTON
),
159 hWnd
, CreateInstOnProc
) == IDCANCEL
) break;
160 hSelect
= TreeView_GetSelection(globals
.hTree
);
161 CreateInst(hSelect
, globals
.wszMachineName
);
162 SendMessage(globals
.hTree
, TVM_EXPAND
, TVE_EXPAND
, (LPARAM
)hSelect
);
164 case IDM_RELEASEINST
:
165 hSelect
= TreeView_GetSelection(globals
.hTree
);
166 ReleaseInst(hSelect
);
167 RefreshMenu(hSelect
);
168 RefreshDetails(hSelect
);
171 globals
.bExpert
= !globals
.bExpert
;
172 CheckMenuItem(GetMenu(hWnd
), LOWORD(wParam
),
173 globals
.bExpert
? MF_CHECKED
: MF_UNCHECKED
);
175 if(globals
.bExpert
) AddTreeEx();
177 hSelect
= TreeView_GetChild(globals
.hTree
, TVI_ROOT
);
178 SendMessage(globals
.hTree
, TVM_SELECTITEM
, 0, (LPARAM
)hSelect
);
179 RefreshMenu(hSelect
);
181 case IDM_FLAG_INSERV
:
182 vis
= globals
.dwClsCtx
&CLSCTX_INPROC_SERVER
;
183 globals
.dwClsCtx
= globals
.dwClsCtx
&(~CLSCTX_INPROC_SERVER
);
184 globals
.dwClsCtx
= globals
.dwClsCtx
|((~vis
)&CLSCTX_INPROC_SERVER
);
185 if(!globals
.dwClsCtx
) globals
.dwClsCtx
= vis
;
186 else CheckMenuItem(GetMenu(hWnd
), LOWORD(wParam
),
187 vis
? MF_UNCHECKED
: MF_CHECKED
);
189 case IDM_FLAG_INHANDL
:
190 vis
= globals
.dwClsCtx
&CLSCTX_INPROC_HANDLER
;
191 globals
.dwClsCtx
= globals
.dwClsCtx
&(~CLSCTX_INPROC_HANDLER
);
192 globals
.dwClsCtx
= globals
.dwClsCtx
|((~vis
)&CLSCTX_INPROC_HANDLER
);
193 if(!globals
.dwClsCtx
) globals
.dwClsCtx
= vis
;
194 else CheckMenuItem(GetMenu(hWnd
), LOWORD(wParam
),
195 vis
? MF_UNCHECKED
: MF_CHECKED
);
197 case IDM_FLAG_LOCSERV
:
198 vis
= globals
.dwClsCtx
&CLSCTX_LOCAL_SERVER
;
199 globals
.dwClsCtx
= globals
.dwClsCtx
&(~CLSCTX_LOCAL_SERVER
);
200 globals
.dwClsCtx
= globals
.dwClsCtx
|((~vis
)&CLSCTX_LOCAL_SERVER
);
201 if(!globals
.dwClsCtx
) globals
.dwClsCtx
= vis
;
202 else CheckMenuItem(GetMenu(hWnd
), LOWORD(wParam
),
203 vis
? MF_UNCHECKED
: MF_CHECKED
);
205 case IDM_FLAG_REMSERV
:
206 vis
= globals
.dwClsCtx
&CLSCTX_REMOTE_SERVER
;
207 globals
.dwClsCtx
= globals
.dwClsCtx
&(~CLSCTX_REMOTE_SERVER
);
208 globals
.dwClsCtx
= globals
.dwClsCtx
|((~vis
)&CLSCTX_REMOTE_SERVER
);
209 if(!globals
.dwClsCtx
) globals
.dwClsCtx
= vis
;
210 else CheckMenuItem(GetMenu(hWnd
), LOWORD(wParam
),
211 vis
? MF_UNCHECKED
: MF_CHECKED
);
215 if(globals
.bExpert
) AddTreeEx();
217 hSelect
= TreeView_GetChild(globals
.hTree
, TVI_ROOT
);
218 SendMessage(globals
.hTree
, TVM_SELECTITEM
, 0, (LPARAM
)hSelect
);
219 RefreshMenu(hSelect
);
224 PROCESS_INFORMATION pi
;
226 memset(&si
, 0, sizeof(si
));
228 CreateProcess(NULL
, wszRegEdit
, NULL
, NULL
, FALSE
, 0,\
229 NULL
, NULL
, &si
, &pi
);
230 CloseHandle(pi
.hProcess
);
231 CloseHandle(pi
.hThread
);
235 vis
= IsWindowVisible(globals
.hStatusBar
);
236 ShowWindow(globals
.hStatusBar
, vis
? SW_HIDE
: SW_SHOW
);
237 CheckMenuItem(GetMenu(hWnd
), LOWORD(wParam
),
238 vis
? MF_UNCHECKED
: MF_CHECKED
);
242 vis
= IsWindowVisible(globals
.hToolBar
);
243 ShowWindow(globals
.hToolBar
, vis
? SW_HIDE
: SW_SHOW
);
244 CheckMenuItem(GetMenu(hWnd
), LOWORD(wParam
),
245 vis
? MF_UNCHECKED
: MF_CHECKED
);
255 void UpdateStatusBar(int itemID
)
257 WCHAR info
[MAX_LOAD_STRING
];
259 if(!LoadString(globals
.hMainInst
, itemID
, info
, sizeof(WCHAR
[MAX_LOAD_STRING
])))
260 LoadString(globals
.hMainInst
, IDS_READY
, info
, sizeof(WCHAR
[MAX_LOAD_STRING
]));
262 SendMessage(globals
.hStatusBar
, SB_SETTEXT
, 0, (LPARAM
)info
);
265 LRESULT CALLBACK
WndProc(HWND hWnd
, UINT uMsg
,
266 WPARAM wParam
, LPARAM lParam
)
272 if(!CreatePanedWindow(hWnd
, &globals
.hPaneWnd
, globals
.hMainInst
))
274 SetLeft(globals
.hPaneWnd
, CreateTreeWindow(globals
.hMainInst
));
275 SetRight(globals
.hPaneWnd
, CreateDetailsWindow(globals
.hMainInst
));
276 SetFocus(globals
.hTree
);
279 MenuCommand(LOWORD(wParam
), hWnd
);
287 UpdateStatusBar(LOWORD(wParam
));
290 SetFocus(globals
.hTree
);
293 if(wParam
== SIZE_MINIMIZED
) break;
297 return DefWindowProc(hWnd
, uMsg
, wParam
, lParam
);
302 BOOL
InitApplication(HINSTANCE hInst
)
305 WCHAR wszAppName
[MAX_LOAD_STRING
];
307 LoadString(hInst
, IDS_APPNAME
, wszAppName
, sizeof(WCHAR
[MAX_LOAD_STRING
]));
309 memset(&wc
, 0, sizeof(WNDCLASS
));
310 wc
.lpfnWndProc
= WndProc
;
311 wc
.hbrBackground
= (HBRUSH
)(COLOR_WINDOW
+1);
312 wc
.lpszMenuName
= MAKEINTRESOURCE(IDM_MENU
);
313 wc
.lpszClassName
= wszAppName
;
315 if(!RegisterClass(&wc
))
321 BOOL
InitInstance(HINSTANCE hInst
, int nCmdShow
)
324 WCHAR wszAppName
[MAX_LOAD_STRING
];
325 WCHAR wszTitle
[MAX_LOAD_STRING
];
327 {0, 0, 0, BTNS_SEP
, {0, 0}, 0, 0},
328 {0, IDM_BIND
, TBSTATE_ENABLED
, BTNS_BUTTON
, {0, 0}, 0, 0},
329 {1, IDM_TYPELIB
, TBSTATE_ENABLED
, BTNS_BUTTON
, {0, 0}, 0, 0},
330 {0, 0, 0, BTNS_SEP
, {0, 0}, 0, 0},
331 {2, IDM_REGEDIT
, TBSTATE_ENABLED
, BTNS_BUTTON
, {0, 0}, 0, 0},
332 {0, 0, 0, BTNS_SEP
, {0, 0}, 0, 0},
333 {3, IDM_CREATEINST
, TBSTATE_ENABLED
, BTNS_BUTTON
, {0, 0}, 0, 0},
334 {4, IDM_RELEASEINST
, TBSTATE_ENABLED
, BTNS_BUTTON
, {0, 0}, 0, 0},
335 {0, 0, 0, BTNS_SEP
, {0, 0}, 0, 0},
336 {5, IDM_VIEW
, TBSTATE_ENABLED
, BTNS_BUTTON
, {0, 0}, 0, 0}
339 LoadString(hInst
, IDS_APPNAME
, wszAppName
, sizeof(WCHAR
[MAX_LOAD_STRING
]));
340 LoadString(hInst
, IDS_APPTITLE
, wszTitle
, sizeof(WCHAR
[MAX_LOAD_STRING
]));
342 hWnd
= CreateWindow(wszAppName
, wszTitle
, WS_OVERLAPPEDWINDOW
,
343 CW_USEDEFAULT
, 0, CW_USEDEFAULT
, 0, NULL
, NULL
, hInst
, NULL
);
344 if(!hWnd
) return FALSE
;
346 globals
.hStatusBar
= CreateStatusWindow(WS_VISIBLE
|WS_CHILD
,
347 (LPWSTR
)wszTitle
, hWnd
, 0);
349 globals
.hToolBar
= CreateToolbarEx(hWnd
, WS_CHILD
|WS_VISIBLE
, 0, 1, hInst
,
350 IDB_TOOLBAR
, tB
, 10, 16, 16, 16, 16, sizeof(TBBUTTON
));
351 SendMessage(globals
.hToolBar
, TB_ENABLEBUTTON
, IDM_CREATEINST
, FALSE
);
352 SendMessage(globals
.hToolBar
, TB_ENABLEBUTTON
, IDM_RELEASEINST
, FALSE
);
353 SendMessage(globals
.hToolBar
, TB_ENABLEBUTTON
, IDM_VIEW
, FALSE
);
355 globals
.hMainWnd
= hWnd
;
356 globals
.hMainInst
= hInst
;
357 globals
.bExpert
= TRUE
;
358 globals
.dwClsCtx
= CLSCTX_INPROC_SERVER
|CLSCTX_LOCAL_SERVER
;
360 ShowWindow(hWnd
, nCmdShow
);
366 int APIENTRY
wWinMain(HINSTANCE hInst
, HINSTANCE hPrevInst
,
367 LPWSTR lpCmdLine
, int nCmdShow
)
374 if(!InitApplication(hInst
))
378 if(!InitInstance(hInst
, nCmdShow
))
381 hAccelTable
= LoadAccelerators(hInst
, MAKEINTRESOURCE(IDA_OLEVIEW
));
383 while(GetMessage(&msg
, NULL
, 0, 0))
385 if(TranslateAccelerator(globals
.hMainWnd
, hAccelTable
, &msg
)) continue;
387 TranslateMessage(&msg
);
388 DispatchMessage(&msg
);