msg711: Renamed the dlls/msacm/msg711 directory to dlls/msg711.acm.
[wine] / programs / progman / dialog.c
1 /*
2  * Program Manager
3  *
4  * Copyright 1996 Ulrich Schmid
5  * Copyright 2002 Sylvain Petreolle
6  * Copyright 2002 Andriy Palamarchuk
7  *
8  * This library is free software; you can redistribute it and/or
9  * modify it under the terms of the GNU Lesser General Public
10  * License as published by the Free Software Foundation; either
11  * version 2.1 of the License, or (at your option) any later version.
12  *
13  * This library is distributed in the hope that it will be useful,
14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
16  * Lesser General Public License for more details.
17  *
18  * You should have received a copy of the GNU Lesser General Public
19  * License along with this library; if not, write to the Free Software
20  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
21  */
22
23 #define WIN32_LEAN_AND_MEAN
24
25 #include "windows.h"
26 #include "commdlg.h"
27 #include "progman.h"
28 static BOOL    DIALOG_BrowsePrograms(HWND, LPSTR, INT);
29 static BOOL    DIALOG_BrowseSymbols(HWND, LPSTR, INT);
30 static BOOL CALLBACK DIALOG_NEW_DlgProc(HWND, UINT, WPARAM, LPARAM);
31 static BOOL CALLBACK DIALOG_COPY_MOVE_DlgProc(HWND, UINT, WPARAM, LPARAM);
32 static BOOL CALLBACK DIALOG_GROUP_DlgProc(HWND, UINT, WPARAM, LPARAM);
33 static BOOL CALLBACK DIALOG_PROGRAM_DlgProc(HWND, UINT, WPARAM, LPARAM);
34 static BOOL CALLBACK DIALOG_SYMBOL_DlgProc(HWND, UINT, WPARAM, LPARAM);
35 static BOOL CALLBACK DIALOG_EXECUTE_DlgProc(HWND, UINT, WPARAM, LPARAM);
36
37 /***********************************************************************
38  *
39  *           DIALOG_New
40  */
41
42 static struct
43 {
44   INT nDefault;
45 } New;
46
47 INT DIALOG_New(INT nDefault)
48 {
49   DLGPROC lpfnDlg = MakeProcInstance(DIALOG_NEW_DlgProc, Globals.hInstance);
50   INT ret;
51
52   New.nDefault = nDefault;
53
54   ret = DialogBox(Globals.hInstance,  STRING_NEW,
55                   Globals.hMainWnd, lpfnDlg);
56   FreeProcInstance(lpfnDlg);
57   return ret;
58 }
59
60 /* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
61  *
62  *           DIALOG_NEW_DlgProc
63  */
64
65 static BOOL CALLBACK DIALOG_NEW_DlgProc(HWND hDlg, UINT msg, WPARAM wParam, LPARAM lParam)
66 {
67   switch (msg)
68     {
69     case WM_INITDIALOG:
70       CheckRadioButton(hDlg, PM_NEW_GROUP, PM_NEW_PROGRAM, New.nDefault);
71       break;
72
73     case WM_COMMAND:
74       switch (wParam)
75         {
76         case PM_NEW_GROUP:
77         case PM_NEW_PROGRAM:
78           CheckRadioButton(hDlg, PM_NEW_GROUP, PM_NEW_PROGRAM, wParam);
79           return TRUE;
80
81         case IDOK:
82           EndDialog(hDlg, IsDlgButtonChecked(hDlg, PM_NEW_GROUP) ?
83                     PM_NEW_GROUP : PM_NEW_PROGRAM);
84           return TRUE;
85
86         case IDCANCEL:
87           EndDialog(hDlg, IDCANCEL);
88           return TRUE;
89         }
90     }
91   return FALSE;
92 }
93
94 /***********************************************************************
95  *
96  *           DIALOG_CopyMove
97  */
98
99 static struct
100 {
101   LPCSTR lpszProgramName, lpszFromGroupName;
102   HLOCAL hToGroup;
103 } CopyMove;
104
105 HLOCAL DIALOG_CopyMove(LPCSTR lpszProgramName, LPCSTR lpszFromGroupName,
106                      BOOL bMove)
107 {
108   DLGPROC lpfnDlg = MakeProcInstance(DIALOG_COPY_MOVE_DlgProc, Globals.hInstance);
109   INT ret;
110
111   CopyMove.lpszProgramName   = lpszProgramName;
112   CopyMove.lpszFromGroupName = lpszFromGroupName;
113   CopyMove.hToGroup          = 0;
114
115   ret = DialogBox(Globals.hInstance,
116                   bMove ? STRING_MOVE : STRING_COPY,
117                   Globals.hMainWnd, lpfnDlg);
118   FreeProcInstance(lpfnDlg);
119
120   return((ret == IDOK) ? CopyMove.hToGroup : 0);
121 }
122
123 /* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
124  *
125  *           DIALOG_COPY_MOVE_DlgProc
126  */
127
128 static BOOL CALLBACK DIALOG_COPY_MOVE_DlgProc(HWND hDlg, UINT msg, WPARAM wParam, LPARAM lParam)
129 {
130   HLOCAL hGroup;
131
132   switch (msg)
133     {
134     case WM_INITDIALOG:
135       /* List all group names */
136       for (hGroup = GROUP_FirstGroup(); hGroup; hGroup = GROUP_NextGroup(hGroup))
137         SendDlgItemMessage(hDlg, PM_TO_GROUP, CB_ADDSTRING, 0,
138                            (LPARAM) GROUP_GroupName(hGroup));
139
140       SetDlgItemText(hDlg, PM_PROGRAM,    CopyMove.lpszProgramName);
141       SetDlgItemText(hDlg, PM_FROM_GROUP, CopyMove.lpszFromGroupName);
142       break;
143
144     case WM_COMMAND:
145       switch (wParam)
146         {
147         case IDOK:
148         {
149           /* Get selected group */
150           INT nCurSel    = SendDlgItemMessage(hDlg, PM_TO_GROUP, CB_GETCURSEL, 0, 0);
151           INT nLen       = SendDlgItemMessage(hDlg, PM_TO_GROUP, CB_GETLBTEXTLEN, nCurSel, 0);
152           HLOCAL hBuffer = LocalAlloc(LMEM_FIXED, nLen + 1);
153           LPSTR   buffer = LocalLock(hBuffer);
154
155           SendDlgItemMessage(hDlg, PM_TO_GROUP, CB_GETLBTEXT, nCurSel, (LPARAM)buffer);
156           for (hGroup = GROUP_FirstGroup(); hGroup; hGroup = GROUP_NextGroup(hGroup))
157             if (!lstrcmp(buffer, GROUP_GroupName(hGroup))) break;
158           LocalFree(hBuffer);
159
160           CopyMove.hToGroup = hGroup;
161           EndDialog(hDlg, IDOK);
162           return TRUE;
163         }
164
165         case IDCANCEL:
166           EndDialog(hDlg, IDCANCEL);
167           return TRUE;
168         }
169     }
170   return FALSE;
171 }
172
173 /***********************************************************************
174  *
175  *           DIALOG_Delete
176  */
177
178 BOOL DIALOG_Delete(UINT ids_text_s, LPCSTR lpszName)
179 {
180   return (IDYES == MAIN_MessageBoxIDS_s(ids_text_s, lpszName, IDS_DELETE,
181                                         MB_YESNO | MB_DEFBUTTON2));
182 }
183
184
185 /***********************************************************************
186  *
187  *           DIALOG_GroupAttributes
188  */
189
190 static struct
191 {
192   LPSTR lpszTitle, lpszGrpFile;
193   INT   nSize;
194 } GroupAttributes;
195
196 BOOL DIALOG_GroupAttributes(LPSTR lpszTitle, LPSTR lpszGrpFile, INT nSize)
197 {
198   DLGPROC lpfnDlg = MakeProcInstance(DIALOG_GROUP_DlgProc, Globals.hInstance);
199   INT ret;
200
201   GroupAttributes.nSize       = nSize;
202   GroupAttributes.lpszTitle   = lpszTitle;
203   GroupAttributes.lpszGrpFile = lpszGrpFile;
204
205   ret = DialogBox(Globals.hInstance,  STRING_GROUP,
206                   Globals.hMainWnd, lpfnDlg);
207   FreeProcInstance(lpfnDlg);
208   return(ret == IDOK);
209 }
210
211 /* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
212  *
213  *           DIALOG_GROUP_DlgProc
214  */
215
216 static BOOL CALLBACK DIALOG_GROUP_DlgProc(HWND hDlg, UINT msg, WPARAM wParam, LPARAM lParam)
217 {
218   switch (msg)
219     {
220     case WM_INITDIALOG:
221       SetDlgItemText(hDlg, PM_DESCRIPTION, GroupAttributes.lpszTitle);
222       SetDlgItemText(hDlg, PM_FILE, GroupAttributes.lpszGrpFile);
223       break;
224
225     case WM_COMMAND:
226       switch (wParam)
227         {
228         case IDOK:
229           GetDlgItemText(hDlg, PM_DESCRIPTION, GroupAttributes.lpszTitle,
230                          GroupAttributes.nSize);
231           GetDlgItemText(hDlg, PM_FILE, GroupAttributes.lpszGrpFile,
232                          GroupAttributes.nSize);
233           EndDialog(hDlg, IDOK);
234           return TRUE;
235
236         case IDCANCEL:
237           EndDialog(hDlg, IDCANCEL);
238           return TRUE;
239         }
240     }
241   return FALSE;
242 }
243
244 /***********************************************************************
245  *
246  *           DIALOG_ProgramAttributes
247  */
248
249 static struct
250 {
251   LPSTR lpszTitle, lpszCmdLine, lpszWorkDir, lpszIconFile, lpszTmpIconFile;
252   INT   nSize;
253   INT   *lpnCmdShow;
254   INT   *lpnHotKey;
255   HWND  hSelGroupWnd;
256   HICON *lphIcon, hTmpIcon;
257   INT   *lpnIconIndex, nTmpIconIndex;
258 } ProgramAttributes;
259
260 BOOL DIALOG_ProgramAttributes(LPSTR lpszTitle, LPSTR lpszCmdLine,
261                               LPSTR lpszWorkDir, LPSTR lpszIconFile,
262                               HICON *lphIcon, INT *lpnIconIndex,
263                               INT *lpnHotKey, INT *lpnCmdShow, INT nSize)
264 {
265   CHAR szTmpIconFile[MAX_PATHNAME_LEN];
266   DLGPROC lpfnDlg = MakeProcInstance(DIALOG_PROGRAM_DlgProc, Globals.hInstance);
267   INT ret;
268
269   ProgramAttributes.nSize = nSize;
270   ProgramAttributes.lpszTitle = lpszTitle;
271   ProgramAttributes.lpszCmdLine = lpszCmdLine;
272   ProgramAttributes.lpszWorkDir = lpszWorkDir;
273   ProgramAttributes.lpszIconFile = lpszIconFile;
274   ProgramAttributes.lpnCmdShow = lpnCmdShow;
275   ProgramAttributes.lpnHotKey = lpnHotKey;
276   ProgramAttributes.lphIcon = lphIcon;
277   ProgramAttributes.lpnIconIndex = lpnIconIndex;
278
279 #if 0
280   ProgramAttributes.hTmpIcon = 0;
281 #else
282   ProgramAttributes.hTmpIcon = *lphIcon;
283 #endif
284   ProgramAttributes.nTmpIconIndex = *lpnIconIndex;
285   ProgramAttributes.lpszTmpIconFile = szTmpIconFile;
286   lstrcpyn(ProgramAttributes.lpszTmpIconFile, lpszIconFile, MAX_PATHNAME_LEN);
287
288   ret = DialogBox(Globals.hInstance,  STRING_PROGRAM,
289                   Globals.hMainWnd, lpfnDlg);
290   FreeProcInstance(lpfnDlg);
291
292   return(ret == IDOK);
293 }
294
295 /* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
296  *
297  *           DIALOG_PROGRAM_DlgProc
298  */
299
300 static BOOL CALLBACK DIALOG_PROGRAM_DlgProc(HWND hDlg, UINT msg, WPARAM wParam, LPARAM lParam)
301 {
302   CHAR buffer[MAX_STRING_LEN];
303   switch (msg)
304     {
305     case WM_INITDIALOG:
306       SetDlgItemText(hDlg, PM_DESCRIPTION, ProgramAttributes.lpszTitle);
307       SetDlgItemText(hDlg, PM_COMMAND_LINE, ProgramAttributes.lpszCmdLine);
308       SetDlgItemText(hDlg, PM_DIRECTORY, ProgramAttributes.lpszWorkDir);
309       if (!*ProgramAttributes.lpnHotKey)
310         {
311           LoadString(Globals.hInstance, IDS_NO_HOT_KEY, buffer, sizeof(buffer));
312           SetDlgItemText(hDlg, PM_HOT_KEY, buffer);
313         }
314
315       CheckDlgButton(hDlg, PM_SYMBOL,
316                      (*ProgramAttributes.lpnCmdShow == SW_SHOWMINIMIZED));
317       SendDlgItemMessage(hDlg, PM_ICON, STM_SETICON,
318                          (WPARAM) ProgramAttributes.hTmpIcon, 0);
319       break;
320
321     case WM_COMMAND:
322       switch (wParam)
323         {
324         case PM_SYMBOL:
325           CheckDlgButton(hDlg, PM_SYMBOL, !IsDlgButtonChecked(hDlg, PM_SYMBOL));
326           return TRUE;
327
328         case PM_BROWSE:
329           {
330             CHAR filename[MAX_PATHNAME_LEN];
331             if (DIALOG_BrowsePrograms(hDlg, filename, sizeof(filename)))
332               SetDlgItemText(hDlg, PM_COMMAND_LINE, filename);
333             return TRUE;
334           }
335
336         case PM_OTHER_SYMBOL:
337           {
338             DIALOG_Symbol(&ProgramAttributes.hTmpIcon,
339                           ProgramAttributes.lpszTmpIconFile,
340                           &ProgramAttributes.nTmpIconIndex,
341                           MAX_PATHNAME_LEN);
342
343             SendDlgItemMessage(hDlg, PM_ICON, STM_SETICON,
344                                (WPARAM) ProgramAttributes.hTmpIcon, 0);
345             return TRUE;
346           }
347
348         case IDOK:
349           GetDlgItemText(hDlg, PM_DESCRIPTION,
350                          ProgramAttributes.lpszTitle,
351                          ProgramAttributes.nSize);
352           GetDlgItemText(hDlg, PM_COMMAND_LINE,
353                          ProgramAttributes.lpszCmdLine,
354                          ProgramAttributes.nSize);
355           GetDlgItemText(hDlg, PM_DIRECTORY,
356                          ProgramAttributes.lpszWorkDir,
357                          ProgramAttributes.nSize);
358
359           if (ProgramAttributes.hTmpIcon)
360             {
361 #if 0
362               if (*ProgramAttributes.lphIcon)
363                 DestroyIcon(*ProgramAttributes.lphIcon);
364 #endif
365               *ProgramAttributes.lphIcon = ProgramAttributes.hTmpIcon;
366               *ProgramAttributes.lpnIconIndex = ProgramAttributes.nTmpIconIndex;
367               lstrcpyn(ProgramAttributes.lpszIconFile,
368                        ProgramAttributes.lpszTmpIconFile,
369                        ProgramAttributes.nSize);
370             }
371
372           *ProgramAttributes.lpnCmdShow =
373             IsDlgButtonChecked(hDlg, PM_SYMBOL) ?
374             SW_SHOWMINIMIZED : SW_SHOWNORMAL;
375           EndDialog(hDlg, IDOK);
376           return TRUE;
377
378         case IDCANCEL:
379           EndDialog(hDlg, IDCANCEL);
380           return TRUE;
381         }
382       return FALSE;
383     }
384   return FALSE;
385 }
386
387 /***********************************************************************
388  *
389  *           DIALOG_Symbol
390  */
391
392 static struct
393 {
394   LPSTR  lpszIconFile;
395   INT    nSize;
396   HICON  *lphIcon;
397   INT    *lpnIconIndex;
398 } Symbol;
399
400 VOID DIALOG_Symbol(HICON *lphIcon, LPSTR lpszIconFile,
401                    INT *lpnIconIndex, INT nSize)
402 {
403   DLGPROC lpfnDlg = MakeProcInstance(DIALOG_SYMBOL_DlgProc, Globals.hInstance);
404
405   Symbol.nSize = nSize;
406   Symbol.lpszIconFile = lpszIconFile;
407   Symbol.lphIcon = lphIcon;
408   Symbol.lpnIconIndex = lpnIconIndex;
409
410   DialogBox(Globals.hInstance, STRING_SYMBOL,
411             Globals.hMainWnd, lpfnDlg);
412   FreeProcInstance(lpfnDlg);
413 }
414
415 /* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
416  *
417  *           DIALOG_SYMBOL_DlgProc
418  */
419
420 static BOOL CALLBACK DIALOG_SYMBOL_DlgProc(HWND hDlg, UINT msg, WPARAM wParam, LPARAM lParam)
421 {
422   switch (msg)
423     {
424     case WM_INITDIALOG:
425       SetDlgItemText(hDlg, PM_ICON_FILE, Symbol.lpszIconFile);
426       SendDlgItemMessage(hDlg, PM_SYMBOL_LIST, CB_SETITEMHEIGHT, 0, (LPARAM) 32);
427       SendDlgItemMessage(hDlg, PM_SYMBOL_LIST, CB_ADDSTRING, 0, (LPARAM)*Symbol.lphIcon);
428       SendDlgItemMessage(hDlg, PM_SYMBOL_LIST, CB_ADDSTRING, 0, (LPARAM)Globals.hDefaultIcon);
429       SendDlgItemMessage(hDlg, PM_SYMBOL_LIST, CB_SETCURSEL, 0, 0);
430       return TRUE;
431
432     case WM_MEASUREITEM:
433       {
434         PMEASUREITEMSTRUCT measure = (PMEASUREITEMSTRUCT) lParam;
435         measure->itemWidth = 32;
436         measure->itemHeight = 32;
437         return TRUE;
438       }
439
440     case WM_DRAWITEM:
441       {
442         PDRAWITEMSTRUCT dis = (PDRAWITEMSTRUCT) lParam;
443         DrawIcon(dis->hDC, dis->rcItem.left, dis->rcItem.top, (HICON)dis->itemData);
444         return TRUE;
445       }
446
447     case WM_COMMAND:
448       switch (wParam)
449         {
450         case PM_BROWSE:
451           {
452             CHAR filename[MAX_PATHNAME_LEN];
453             if (DIALOG_BrowseSymbols(hDlg, filename, sizeof(filename)))
454               SetDlgItemText(hDlg, PM_ICON_FILE, filename);
455             return TRUE;
456           }
457
458         case PM_HELP:
459           MAIN_MessageBoxIDS(IDS_NOT_IMPLEMENTED, IDS_ERROR, MB_OK);
460           return TRUE;
461
462         case IDOK:
463           {
464             INT nCurSel = SendDlgItemMessage(hDlg, PM_SYMBOL_LIST, CB_GETCURSEL, 0, 0);
465
466             GetDlgItemText(hDlg, PM_ICON_FILE, Symbol.lpszIconFile, Symbol.nSize);
467
468             *Symbol.lphIcon = (HICON)SendDlgItemMessage(hDlg, PM_SYMBOL_LIST,
469                                                         CB_GETITEMDATA,
470                                                         (WPARAM) nCurSel, 0);
471 #if 0
472             *Symbol.lphIcon = CopyIcon(*Symbol.lphIcon);
473 #endif
474
475             EndDialog(hDlg, IDOK);
476             return TRUE;
477           }
478
479         case IDCANCEL:
480           EndDialog(hDlg, IDCANCEL);
481           return TRUE;
482         }
483     }
484   return FALSE;
485 }
486
487 /***********************************************************************
488  *
489  *           DIALOG_Execute
490  */
491
492 VOID DIALOG_Execute()
493 {
494 INT_PTR z;
495         DLGPROC lpfnDlg = MakeProcInstance(DIALOG_EXECUTE_DlgProc, Globals.hInstance);
496         z=DialogBox(Globals.hInstance, STRING_EXECUTE,
497             Globals.hMainWnd, lpfnDlg);
498             FreeProcInstance(lpfnDlg);
499 }
500
501 /* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
502  *
503  *           DIALOG_EXECUTE_DlgProc
504  */
505
506 static BOOL CALLBACK DIALOG_EXECUTE_DlgProc(HWND hDlg, UINT msg,
507                                       WPARAM wParam, LPARAM lParam)
508 {
509   switch (msg)
510     {
511     case WM_COMMAND:
512       switch (wParam)
513         {
514         case PM_SYMBOL:
515           CheckDlgButton(hDlg, PM_SYMBOL, !IsDlgButtonChecked(hDlg, PM_SYMBOL));
516           return TRUE;
517
518         case PM_BROWSE:
519           {
520             CHAR filename[MAX_PATHNAME_LEN];
521             if (DIALOG_BrowsePrograms(hDlg, filename, sizeof(filename)))
522               SetDlgItemText(hDlg, PM_COMMAND, filename);
523             return TRUE;
524           }
525
526         case PM_HELP:
527           MAIN_MessageBoxIDS(IDS_NOT_IMPLEMENTED, IDS_ERROR, MB_OK);
528           return TRUE;
529
530         case IDOK:
531           {
532             CHAR cmdline[MAX_PATHNAME_LEN];
533             GetDlgItemText(hDlg, PM_COMMAND, cmdline, sizeof(cmdline));
534
535             WinExec(cmdline, IsDlgButtonChecked(hDlg, PM_SYMBOL) ?
536                     SW_SHOWMINIMIZED : SW_SHOWNORMAL);
537             if (Globals.bMinOnRun) CloseWindow(Globals.hMainWnd);
538
539             EndDialog(hDlg, IDOK);
540             return TRUE;
541           }
542
543         case IDCANCEL:
544           EndDialog(hDlg, IDCANCEL);
545           return TRUE;
546         }
547     }
548   return FALSE;
549 }
550
551 /***********************************************************************
552  *
553  *           DIALOG_Browse
554  */
555
556 static BOOL DIALOG_Browse(HWND hDlg, LPCSTR lpszzFilter,
557                           LPSTR lpstrFile, INT nMaxFile)
558
559 {
560     OPENFILENAME openfilename;
561
562     CHAR szPath[MAX_PATH];
563     CHAR szDir[MAX_PATH];
564     CHAR szDefaultExt[] = "exe";
565
566     ZeroMemory(&openfilename, sizeof(openfilename));
567
568     GetCurrentDirectory(sizeof(szDir), szDir);
569     lstrcpy(szPath,"*.exe");
570
571     /* FIXME is this correct ? */
572     openfilename.lStructSize       = sizeof(openfilename);
573     openfilename.hwndOwner         = Globals.hMainWnd;
574     openfilename.hInstance         = Globals.hInstance;
575     openfilename.lpstrFile         = szPath;
576     openfilename.nMaxFile          = sizeof(szPath);
577     openfilename.lpstrInitialDir   = szDir;
578     openfilename.Flags             = 0;
579     openfilename.lpstrDefExt       = szDefaultExt;
580     openfilename.lpstrCustomFilter = 0;
581     openfilename.nMaxCustFilter    = 0;
582     openfilename.nFilterIndex      = 0;
583     openfilename.lpstrFileTitle    = 0;
584     openfilename.nMaxFileTitle     = 0;
585     openfilename.lpstrInitialDir   = 0;
586     openfilename.lpstrTitle        = 0;
587     openfilename.nFileOffset       = 0;
588     openfilename.nFileExtension    = 0;
589     openfilename.lCustData         = 0;
590     openfilename.lpfnHook          = 0;
591     openfilename.lpTemplateName    = 0;
592
593     return GetOpenFileName(&openfilename);
594     /* FIXME */
595 }
596
597 /***********************************************************************
598  *
599  *           DIALOG_AddFilterItem
600  */
601
602 static VOID DIALOG_AddFilterItem(LPSTR *p, UINT ids, LPCSTR filter)
603 {
604   LoadString(Globals.hInstance, ids, *p, MAX_STRING_LEN);
605   *p += strlen(*p) + 1;
606   lstrcpy(*p, filter);
607   *p += strlen(*p) + 1;
608   **p = '\0';
609 }
610
611 /***********************************************************************
612  *
613  *           DIALOG_BrowsePrograms
614  */
615
616 static BOOL DIALOG_BrowsePrograms(HWND hDlg, LPSTR lpszFile, INT nMaxFile)
617 {
618   CHAR  szzFilter[2 * MAX_STRING_LEN + 100];
619   LPSTR p = szzFilter;
620
621   DIALOG_AddFilterItem(&p, IDS_PROGRAMS,  "*.exe;*.pif;*.com;*.bat");
622   DIALOG_AddFilterItem(&p, IDS_ALL_FILES, "*.*");
623
624   return(DIALOG_Browse(hDlg, szzFilter, lpszFile, nMaxFile));
625 }
626
627 /***********************************************************************
628  *
629  *           DIALOG_BrowseSymbols
630  */
631
632 static BOOL DIALOG_BrowseSymbols(HWND hDlg, LPSTR lpszFile, INT nMaxFile)
633 {
634   CHAR  szzFilter[5 * MAX_STRING_LEN + 100];
635   LPSTR p = szzFilter;
636
637   DIALOG_AddFilterItem(&p, IDS_SYMBOL_FILES,  "*.ico;*.exe;*.dll");
638   DIALOG_AddFilterItem(&p, IDS_PROGRAMS,      "*.exe");
639   DIALOG_AddFilterItem(&p, IDS_LIBRARIES_DLL, "*.dll");
640   DIALOG_AddFilterItem(&p, IDS_SYMBOLS_ICO,   "*.ico");
641   DIALOG_AddFilterItem(&p, IDS_ALL_FILES,     "*.*");
642
643   return(DIALOG_Browse(hDlg, szzFilter, lpszFile, nMaxFile));
644 }
645
646 /* Local Variables:    */
647 /* c-file-style: "GNU" */
648 /* End:                */