Context Navigation

source: trunk/settings.cpp@ 28

Last change on this file since 28 was 28, checked in by Gregg Young, 7 years ago
Remove Pmprintf stuff from previous commit
Property svn:eol-style set to `native`
File size: 43.5 KB

Line
1	/***
2	This file belongs to the Gotcha! distribution.
3	Copyright (C) 1998-2002 Thorsten Thielen <thth@c2226.de>
4
5	This program is free software; you can redistribute it and/or modify
6	it under the terms of the GNU General Public License as published by
7	the Free Software Foundation; either version 2 of the License, or
8	(at your option) any later version.
9
10	This program is distributed in the hope that it will be useful,
11	but WITHOUT ANY WARRANTY; without even the implied warranty of
12	MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13	GNU General Public License for more details.
14
15	You should have received a copy of the GNU General Public License
16	along with this program; if not, write to the Free Software
17	Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
18	***/
19	#include <direct.h>
20	#include "settings.h"
21	#include "ctype.h"
22
23	#include "./settings/thth_settings.cpp"
24
25	PSZ SETTINGS::pszPageTab[COUNT_PAGES]; /* = {
26	"Saving", "Snapshot window", "Misc", "Language" };
27	// FIXME nls*/
28
29	bool saveum = FALSE;
30	SWP swpDef = { 0,0,0, 98,66, 0,0,0,0 };
31	SWP swpDefSSW = { 0,0,0, 10,10, 0,0,0,0 };
32	USHORT ausDef[7] = { 0 };
33	USHORT ausDefSSW[7] = { 0 };
34
35	ImageFormatInfo Settings::ifi[BMF_INVALID] =
36	{
37	{ TRUE, BMF_JPG, "JPEG Interchange File Format (jpg)", "jpg", "JPG" },
38	{ TRUE, BMF_PNG, "Portable Network Graphics (png)", "png", "PNG" },
39	{ TRUE, BMF_OS20, "OS/2 Bitmap 2.0 (bmp)", "bmp", "Bitmap" },
40	{ TRUE, BMF_TIF, "Microsoft/Aldus Tagged Image File Format (tif)", "tif", "TIFF" },
41	{ TRUE, BMF_TGA, "Truevision Targa/Vista (tga)", "tga", "Targa" },
42	{ TRUE, BMF_PCX, "ZSoft PC Paintbrush Image Format (pcx)", "pcx", "PCX" },
43	{ TRUE, BMF_GIF, "Portable Anymap (pnm)", "pnm", "PNM" },
44	{ TRUE, BMF_PBM, "Portable Pixel-map (ppm)", "ppm", "PPM" },
45	{ TRUE, BMF_JP2, "Jpeg 2000 (provided by the Open Source OpenJPEG library) (jp2)", "jp2", "JP2" },
46	{ TRUE, BMF_DIB, "Device Independent Bitmap (dib)", "dib", "DIB" }
47	};
48
49
50	PTHTH_SE apse[] =
51	{
52	new THTH_SES (SEI_SAVEFILE, "Save", "Filename", "gotcha.png"),
53	new THTH_SES (SEI_FORCESAVEFILE, "Save", "ForceSaveFilename", "force.png"),
54	new THTH_SEL (SEI_SAVESTYLE, "Save", "Style", SAVESTYLE_FILE),
55	new THTH_SEL (SEI_FILEFORMAT, "Save", "FileFormat", BMF_PNG),
56	new THTH_SEL (SEI_FILESAVESTYLE, "Save", "FileSaveStyle", FSS_PROMPT),
57
58	new THTH_SES (SEI_NUMSAVEDIR, "Save", "NumSaveDir", ""),
59	new THTH_SEF (SEI_HIDEWINDOW, "Extras", "HideWindow", TRUE),
60	new THTH_SEF (SEI_AUTOADDEXTENSION, "Extras", "AutoaddExtension", TRUE),
61	new THTH_SEF (SEI_CONFIRMOVERWRITE, "Extras", "ConfirmOverwrite", TRUE),
62	new THTH_SEF (SEI_DOSOUND, "Extras", "DoSound", TRUE),
63
64	new THTH_SEF (SEI_DELAYEDCAPTURE, "Extras", "DelayedCapture", FALSE),
65	new THTH_SEF (SEI_DELAYCOUNTDOWN, "Extras", "DelayCountdown", FALSE),
66	new THTH_SEL (SEI_DELAYTIME, "Extras", "DelayTime", 5),
67	new THTH_SEF (SEI_SERIALCAPTURE, "Extras", "SerialCapture", FALSE),
68	new THTH_SEL (SEI_SERIALTIME, "Extras", "SerialTime", 10),
69
70	new THTH_SEF (SEI_SNAPSHOTWINDOW, "Snapshot", "Enable", FALSE),
71	new THTH_SEL (SEI_SSWCAPTURETYPE, "Snapshot", "CaptureType", CAP_SCREEN),
72	new THTH_SEF (SEI_SSWHIDE, "Snapshot", "Hide", TRUE),
73	new THTH_SEF (SEI_SSWALWAYSONTOP, "Snapshot", "AlwaysOnTop", TRUE),
74
75	new THTH_SEF (SEI_IDLEPRIORITY, "Extras", "IdlePriority", FALSE),
76
77	new THTH_SEB (SEI_SWP, "Window", "SWP", &swpDef, sizeof (swpDef)),
78	new THTH_SEB (SEI_US, "Window", "US", &ausDef, sizeof (ausDef)),
79
80	new THTH_SEB (SEI_SWPSSW, "Snapshot", "SWP", &swpDefSSW, sizeof (swpDefSSW)),
81	new THTH_SEB (SEI_USSSW, "Snapshot", "US", &ausDefSSW, sizeof (ausDefSSW)),
82
83	new THTH_SES (SEI_LANGUAGE, "Language", "Program", PSZ_DEFAULTLANGUAGEMOD),
84	new THTH_SES (SEI_LANGUAGEHELP, "Language", "Help", PSZ_DEFAULTLANGUAGEHELP),
85
86	new THTH_SEF (SEI_UPDATE178DONE, "Extras", "Update178Done", FALSE),
87
88	NULL,
89	};
90
91	// Settings ********************************************************** /FOLD00/
92
93	Settings :: Settings (VOID) :
94	ththSettings(apse, "gotcha.ini", L_PROFILEVERSION)
95	{
96	if( ! QueryFlag( SEI_UPDATE178DONE ) ) {
97	//DisplayError( "Updated", "false" );
98	SetLong( SEI_SERIALTIME, QueryLong( SEI_SERIALTIME ) * 20 );
99	SetFlag( SEI_UPDATE178DONE );
100	} else {
101	//DisplayError( "NOT Updated", "true" );
102	}
103
104	// to get the error msgs in default language
105	ReloadResources (QueryString(SEI_LANGUAGE));
106
107	if (Error () == 1)
108	{
109	FileNotOpenError ();
110	ReloadResources (QueryString(SEI_LANGUAGE));
111	}
112	else if (Error () == 2)
113	{
114	VersionError ();
115	ReloadResources (QueryString(SEI_LANGUAGE));
116	}
117	}
118
119	// VersionError ******************************************************
120
121	USHORT SETTINGS :: VersionError (VOID)
122	{
123	DisplayError (RSTR(IDS_HEADER_WARNING), RSTR(IDS_ERROR_INIFILEWRONGVERSION),
124	QueryProfileName ());
125	SelectLanguage();
126	return 0;
127	}
128
129	// FileNotOpenError ************************************************** /fold00/
130
131	USHORT SETTINGS :: FileNotOpenError (VOID)
132	{
133	DisplayError (RSTR(IDS_HEADER_ERROR), RSTR(IDS_ERROR_INIFILENOTOPEN),
134	QueryProfileName ());
135	SelectLanguage();
136	return 0;
137	}
138
139	// Dialog ************************************************************ /FOLD00/
140
141	// FIXME YUKKI! YUKKI!! YUKKI!!! But I'm too lazy to do it better now :-)
142	HWND g_hwndSettingsDialog = NULL;
143	HWND g_hwndPage0 = NULL;
144
145	BOOL SETTINGS :: Dialog (BOOL fOnlyLanguage)
146	{
147	#ifdef _DOLOGDEBUG_
148	LogDebug( "Dialog: checkpoint 1" );
149	#endif
150	fAutoLanguage = fOnlyLanguage;
151
152	// load the main dialog window
153	hwndDlg = WinLoadDlg (HWND_DESKTOP, hwndFrame, PFNWP (DialogProcedure),
154	GETMODULE, ID_DLG_SETTINGS, this);
155	// FIXME YUKKI! YUKKI!! YUKKI!!! But I'm too lazy to do it better now :-)
156	g_hwndSettingsDialog = hwndDlg;
157	#ifdef _DOLOGDEBUG_
158	LogDebug( "Dialog: checkpoint 2" );
159	#endif
160
161	// disable this two buttons if only language select
162	if (fAutoLanguage)
163	{
164	WinEnableWindow (WinWindowFromID (hwndDlg, WID_PB_HELP), FALSE);
165	WinEnableWindow (WinWindowFromID (hwndDlg, WID_PB_UNDO), FALSE);
166	}
167
168	HWND hwndNB = WinWindowFromID (hwndDlg, WID_NB_SETTINGS);
169	#ifdef _DOLOGDEBUG_
170	LogDebug( "Dialog: checkpoint 3" );
171	#endif
172
173	// set notebook background color
174	WinSendMsg (hwndNB, BKM_SETNOTEBOOKCOLORS,
175	MPFROMLONG (SYSCLR_DIALOGBACKGROUND),
176	MPFROMSHORT (BKA_BACKGROUNDPAGECOLORINDEX));
177
178	// set tab dimensions
179	WinSendMsg (hwndNB, BKM_SETDIMENSIONS,
180	MPFROM2SHORT (80, 25), MPFROMSHORT (BKA_MAJORTAB));
181	#ifdef _DOLOGDEBUG_
182	LogDebug( "Dialog: checkpoint 4" );
183	#endif
184
185	ULONG idPage[COUNT_PAGES];
186	USHORT i, cPages;
187
188	if (fOnlyLanguage)
189	{
190	cPages = 1;
191
192	idPage[0] = (ULONG)
193	WinSendMsg (hwndNB, BKM_INSERTPAGE, 0L,
194	MPFROM2SHORT (BKA_MAJOR \| BKA_AUTOPAGESIZE,
195	BKA_LAST));
196	WinSendMsg (hwndNB, BKM_SETTABTEXT, MPFROMLONG (idPage[0]),
197	MPFROMP (pszPageTab[COUNT_PAGES-1]));
198	hwndPage[0] = WinLoadDlg (hwndNB, hwndNB, (PFNWP) Page4Procedure,
199	GETMODULE, ID_DLG_SETTINGSPAGE4, this);
200	}
201	else
202	{
203	cPages = COUNT_PAGES;
204
205	// insert empty pages
206	for (i = 0; i < cPages; i++)
207	{
208	idPage[i] = (ULONG)
209	WinSendMsg (hwndNB, BKM_INSERTPAGE, 0L,
210	MPFROM2SHORT (BKA_MAJOR \| BKA_AUTOPAGESIZE,
211	BKA_LAST));
212	WinSendMsg (hwndNB, BKM_SETTABTEXT,
213	MPFROMLONG (idPage[i]), MPFROMP (pszPageTab[i]));
214	}
215	//#ifndef _QUIET_
216	#if 0
217	// open and assign dialogs to pages
218	hwndPage[0] = WinLoadDlg (hwndNB, hwndNB, (PFNWP) Page1Procedure,
219	GETMODULE, ID_DLG_SETTINGSPAGE1, this);
220	hwndPage[1] = WinLoadDlg (hwndNB, hwndNB, (PFNWP) WindowProcedure, //Page2Procedure,
221	GETMODULE, ID_DLG_SETTINGSPAGE2, this);
222	hwndPage[2] = WinLoadDlg (hwndNB, hwndNB, (PFNWP) Page3Procedure,
223	GETMODULE, ID_DLG_SETTINGSPAGE3, this);
224	hwndPage[3] = WinLoadDlg (hwndNB, hwndNB, (PFNWP) Page4Procedure,
225	GETMODULE, ID_DLG_SETTINGSPAGE4, this);
226	#else
227	hwndPage[0] = WinLoadDlg (hwndNB, hwndNB, (PFNWP) WindowProcedure,
228	GETMODULE, ID_DLG_SETTINGSPAGE0, this);
229	hwndPage[1] = WinLoadDlg (hwndNB, hwndNB, (PFNWP) Page1Procedure,
230	GETMODULE, ID_DLG_SETTINGSPAGE1, this);
231	hwndPage[2] = WinLoadDlg (hwndNB, hwndNB, (PFNWP) Page2Procedure,
232	GETMODULE, ID_DLG_SETTINGSPAGE2, this);
233	hwndPage[3] = WinLoadDlg (hwndNB, hwndNB, (PFNWP) Page4Procedure,
234	GETMODULE, ID_DLG_SETTINGSPAGE4, this);
235	g_hwndPage0 = hwndPage[0];
236
237	#endif
238	}
239	#ifdef _DOLOGDEBUG_
240	LogDebug( "Dialog: checkpoint 5" );
241	#endif
242
243	// combine dlg-handle and page ids
244	for (i = 0; i < cPages; i++)
245	WinSendMsg (hwndNB, BKM_SETPAGEWINDOWHWND,
246	MPFROMLONG (idPage[i]), MPFROMHWND (hwndPage[i]));
247
248	/* if (fAutoLanguage)
249	WinSendMsg (hwndNB, BKM_TURNTOPAGE, MPFROMLONG (idPage[0]), 0L);
250	#if (COUNT_PAGES != 4)
251	#warning FIXME settings.cpp 264 or so ...
252	#endif */
253	for (i = 0; i < cPages; i++)
254	WinSendMsg (hwndPage[i], UM_SETTINGS2DIALOG, 0,0);
255	#ifdef _DOLOGDEBUG_
256	LogDebug( "Dialog: checkpoint 6" );
257	#endif
258	WinSendDlgItemMsg (g_hwndPage0, WID_RB_FILE, BM_CLICK,
259	MPFROMSHORT (TRUE), 0);
260	WinSendDlgItemMsg (g_hwndPage0, WID_CB_HIDEWINDOW, BM_SETCHECK,
261	MPFROMLONG (TRUE), MPFROMLONG (0));
262	//WinSetFocus (WinWindowFromID (hwndDlg, WID_PB_OK), TRUE);
263	//WinSetFocus( hwndPage[0], TRUE );
264	WinSetActiveWindow( HWND_DESKTOP, hwndPage[0] );
265	#ifdef _DOLOGDEBUG_
266	LogDebug( "Dialog: checkpoint 7" );
267	#endif
268
269	WinProcessDlg (hwndDlg);
270	#ifdef _DOLOGDEBUG_
271	LogDebug( "Dialog: checkpoint 7.5" );
272	#endif
273	WinDestroyWindow (hwndDlg);
274	#ifdef _DOLOGDEBUG_
275	LogDebug( "Dialog: checkpoint 8" );
276	#endif
277
278	// it ain't the best way to do it, but ...
279	SetIdlePriority(QueryFlag(SEI_IDLEPRIORITY));
280
281	for (i = 0; i < COUNT_PAGES; i++)
282	hwndPage[i] = NULL;
283
284	hwndDlg = NULLHANDLE;
285	#ifdef _DOLOGDEBUG_
286	LogDebug( "Dialog: checkpoint 9" );
287	#endif
288	return TRUE;
289	}
290
291	// DialogProcedure *************************************************** /FOLD00/
292
293	MRESULT EXPENTRY
294	SETTINGS :: DialogProcedure (HWND hwnd, ULONG msg, MPARAM mp1, MPARAM mp2)
295	{
296	static PSETTINGS pset = NULL;
297
298	#ifdef _DOLOGDEBUG_
299	LogDebug( "DialogProcedure:Message 0x%04x", msg );
300	#endif
301
302	switch (msg)
303	{
304	case WM_INITDLG:
305	#ifdef _DOLOGDEBUG_
306	LogDebug( "DialogProcedure: start WM_INITDLG" );
307	#endif
308	pset = PSETTINGS (mp2);
309	#ifdef _DOLOGDEBUG_
310	LogDebug( "DialogProcedure: end WM_INITDLG" );
311	#endif
312	return MRESULT (FALSE);
313
314	case WM_COMMAND:
315	switch (SHORT1FROMMP (mp1))
316	{
317	case WID_PB_OK:
318	#ifdef _DOLOGDEBUG_
319	LogDebug( "DialogProcedure: start WID_PB_OK" );
320	#endif
321	saveum = TRUE;
322	WinSendMsg (hwnd, WM_CLOSE, 0,0);
323	#ifdef _DOLOGDEBUG_
324	LogDebug( "DialogProcedure: end WID_PB_OK" );
325	#endif
326	break;
327
328	case WID_PB_UNDO:
329	{
330	ULONG id = (ULONG)
331	WinSendDlgItemMsg (hwnd, WID_NB_SETTINGS,
332	BKM_QUERYPAGEID, 0,
333	MPFROM2SHORT (BKA_TOP, 0));
334	if (id)
335	{
336	HWND hwndPage = (HWND)
337	WinSendDlgItemMsg (hwnd, WID_NB_SETTINGS,
338	BKM_QUERYPAGEWINDOWHWND,
339	MPFROMLONG (id), 0);
340	// Make mp1 1 for default use it to select setting on pages
341	WinSendMsg (hwndPage, UM_SETTINGS2DIALOG, 0,0);
342	}
343	}
344	break;
345
346	case DID_CANCEL:
347	{
348	// Undo stuff on all notebook pages:
349	HWND hwndPage;
350
351	// Get ID of first notebook page.
352	ULONG id =
353	ULONG( WinSendDlgItemMsg( hwnd, WID_NB_SETTINGS,
354	BKM_QUERYPAGEID, 0,
355	MPFROM2SHORT( BKA_FIRST, 0 ) ) );
356	if( id ) {
357	hwndPage =
358	HWND( WinSendDlgItemMsg( hwnd, WID_NB_SETTINGS,
359	BKM_QUERYPAGEWINDOWHWND,
360	MPFROMLONG( id ), 0 ) );
361	WinSendMsg( hwndPage, UM_SETTINGS2DIALOG, 0,0 );
362	}
363
364	while( id ) {
365	// Get ID of next notebook page.
366	if( ( id =
367	ULONG( WinSendDlgItemMsg( hwnd, WID_NB_SETTINGS,
368	BKM_QUERYPAGEID,
369	MPFROMLONG( id ),
370	MPFROM2SHORT( BKA_NEXT, 0 )
371	) ) ) ) {
372	hwndPage =
373	HWND( WinSendDlgItemMsg( hwnd, WID_NB_SETTINGS,
374	BKM_QUERYPAGEWINDOWHWND,
375	MPFROMLONG( id ), 0 ) );
376	WinSendMsg( hwndPage, UM_SETTINGS2DIALOG, 0,0 );
377	}
378	}
379	WinSendMsg( hwnd, WM_CLOSE, 0,0 );
380	}
381	break;
382	}
383	return MRESULT (FALSE);
384
385	#ifdef _DOLOGDEBUG_
386	case WM_DESTROY:
387	LogDebug( "DialogProcedure: WM_DESTROY" );
388	return MRESULT (FALSE);
389	#endif
390
391	case WM_CLOSE:
392	#ifdef _DOLOGDEBUG_
393	LogDebug( "DialogProcedure: WM_CLOSE" );
394	#endif
395	case WM_QUIT:
396	#ifdef _DOLOGDEBUG_
397	LogDebug( "DialogProcedure: WM_QUIT" );
398	#endif
399	case WM_SAVEAPPLICATION:
400	#ifdef _DOLOGDEBUG_
401	LogDebug( "DialogProcedure: WM_SAVEAPPLICATION" );
402	#endif
403	#ifdef _DOLOGDEBUG_
404	LogDebug( "DialogProcedure: start WM_CLOSE (or WM_QUIT, WM_SAVEAPPLICATION)" );
405	#endif
406	for (USHORT i = 0; i < COUNT_PAGES; i++)
407	WinSendMsg (pset->hwndPage[i], UM_ADJUST, 0,0);
408	#ifdef _DOLOGDEBUG_
409	LogDebug( "DialogProcedure: end WM_CLOSE (or WM_QUIT, WM_SAVEAPPLICATION)" );
410	#endif
411	WinDismissDlg( hwnd, 0L );
412	return MRESULT (FALSE);
413	}
414
415	#ifdef _DOLOGDEBUG_
416	LogDebug( "DialogProcedure:WinDefDlgProc->0x%04x", msg );
417	#endif
418	return WinDefDlgProc (hwnd, msg, mp1, mp2);
419	}
420
421	// Page1Procedure **************************************************** /FOLD00/
422
423	MRESULT EXPENTRY
424	SETTINGS :: Page1Procedure (HWND hwnd, ULONG msg, MPARAM mp1, MPARAM mp2)
425	{
426	static PSETTINGS pset = NULL;
427
428	switch (msg)
429	{
430	case WM_INITDLG: {
431	#ifdef _DOLOGDEBUG_
432	LogDebug( "Page1Procedure: start WM_INITDLG" );
433	#endif
434	ULONG ul;
435	pset = PSETTINGS (mp2);
436	for( int i = 0; i < BMF_INVALID; i++ ) {
437	if( pset->ifi[ i ].available ) {
438	ul = WinInsertLboxItem( WinWindowFromID( hwnd, WID_LB_FILEFORMAT ),
439	LIT_END, pset->ifi[ i ].label );
440	WinSendMsg( WinWindowFromID( hwnd, WID_LB_FILEFORMAT ),
441	LM_SETITEMHANDLE, MPFROMLONG(ul), MPFROMP( i ) );
442	}
443	}
444	#ifdef _DOLOGDEBUG_
445	LogDebug( "Page1Procedure: end WM_INITDLG" );
446	#endif
447	return MRESULT (FALSE);
448	}
449
450	case WM_COMMAND:
451	if( SHORT1FROMMP( mp1 ) == DID_CANCEL )
452	WinPostMsg( g_hwndSettingsDialog, msg, mp1, mp2 );
453	return MRESULT( FALSE );
454
455	case UM_SETTINGS2DIALOG: {
456	#ifdef _DOLOGDEBUG_
457	LogDebug( "Page1Procedure: start UM_SETTINGS2DIALOG" );
458	#endif
459	// set num save dir name
460	WinSendDlgItemMsg (hwnd, WID_E_NUMSAVEDIR, EM_SETTEXTLIMIT,
461	MPARAM (_MAX_PATH-1), (MPARAM)0);
462	WinSetDlgItemText (hwnd, WID_E_NUMSAVEDIR,
463	pset->QueryNumSaveDir ());
464	WinSendDlgItemMsg (hwnd, WID_E_NUMSAVEDIR, EM_SETSEL,
465	MPFROM2SHORT (0, _MAX_PATH), (MPARAM)0);
466
467	// set force file name
468	WinSendDlgItemMsg (hwnd, WID_E_FORCESAVEFILE, EM_SETTEXTLIMIT,
469	MPARAM (_MAX_PATH-1), (MPARAM)0);
470	WinSetDlgItemText (hwnd, WID_E_FORCESAVEFILE,
471	pset->QueryForceSaveFile ());
472	WinSendDlgItemMsg (hwnd, WID_E_FORCESAVEFILE, EM_SETSEL,
473	MPFROM2SHORT (0, _MAX_PATH), (MPARAM)0);
474
475	// Select the appropriate entry in the fileformat-listbox.
476	HWND hwndLB = WinWindowFromID( hwnd, WID_LB_FILEFORMAT );
477	ULONG c, i;
478
479	c = WinQueryLboxCount( hwndLB );
480	for( i = 0; i < c; i++ )
481	{
482	ULONG type = ULONG( WinSendDlgItemMsg( hwnd, WID_LB_FILEFORMAT,
483	LM_QUERYITEMHANDLE,
484	MPFROMLONG(i), NULL ) );
485	if( type == ULONG( pset->QueryFileFormat() ) )
486	break;
487	}
488	if( i < c )
489	WinSendDlgItemMsg( hwnd, WID_LB_FILEFORMAT, LM_SELECTITEM,
490	MPFROMSHORT(i), MPFROMSHORT(TRUE) );
491	else
492	WinSendDlgItemMsg( hwnd, WID_LB_FILEFORMAT, LM_SELECTITEM,
493	MPFROMSHORT(0), MPFROMSHORT(TRUE) );
494	//#ifdef _QUIET_
495	#if 1
496	// set play sound button
497	pset->AdjustButton (hwnd, WID_CB_DOSOUND,
498	pset->DoSound ());
499	#endif
500	// Select appropriate radiobutton for save style.
501	switch (pset->QueryFileSaveStyle ())
502	{
503	case FSS_NUMFILES:
504	WinSendDlgItemMsg (hwnd, WID_RB_FSSNUMFILES, BM_CLICK,
505	MPFROMSHORT(TRUE), 0);
506	AdjustSaveTypeButtons (FALSE);
507	break;
508
509	case FSS_FORCEFILE:
510	WinSendDlgItemMsg (hwnd, WID_RB_FSSFORCEFILE, BM_CLICK,
511	MPFROMSHORT(TRUE), 0);
512	AdjustSaveTypeButtons (TRUE);
513	break;
514
515	default:
516	WinSendDlgItemMsg (hwnd, WID_RB_FSSPROMPT, BM_CLICK,
517	MPFROMSHORT(TRUE), 0);
518	AdjustSaveTypeButtons (FALSE);
519	break;
520	}
521	#ifdef _DOLOGDEBUG_
522	LogDebug( "Page1Procedure: end UM_SETTINGS2DIALOG" );
523	#endif
524	return MRESULT (FALSE);
525	}
526
527	case UM_ADJUST:
528	{
529	#ifdef _DOLOGDEBUG_
530	LogDebug( "Page1Procedure: start UM_ADJUST" );
531	#endif
532	// get file save style
533	if (WinSendMsg (WinWindowFromID (hwnd, WID_RB_FSSNUMFILES),
534	BM_QUERYCHECK, 0,0))
535	pset->SetFileSaveStyle (FSS_NUMFILES);
536	else if (WinSendMsg (WinWindowFromID (hwnd, WID_RB_FSSFORCEFILE),
537	BM_QUERYCHECK, 0,0))
538	pset->SetFileSaveStyle (FSS_FORCEFILE);
539	else
540	pset->SetFileSaveStyle (FSS_PROMPT);
541	//#ifdef _QUIET_
542	#if 1
543	pset->DoSound(WinQueryButtonCheckstate
544	(hwnd, WID_CB_DOSOUND));
545	#endif
546	#ifdef _DOLOGDEBUG_
547	LogDebug( "Page1Procedure: checkpoint 1" );
548	#endif
549
550	// Get file format.
551	ULONG ul = USHORT( WinSendDlgItemMsg( hwnd, WID_LB_FILEFORMAT,
552	LM_QUERYSELECTION,
553	MPFROMLONG( LIT_FIRST ),
554	0L ) );
555	ul = ULONG( WinSendDlgItemMsg( hwnd, WID_LB_FILEFORMAT,
556	LM_QUERYITEMHANDLE,
557	MPFROMLONG( ul ), NULL ) );
558	pset->SetFileFormat( SHORT( ul ) );
559
560	pset->SetSaveFile(AddExtensionToFilename(pset->QuerySaveFile()));
561
562	#ifdef _DOLOGDEBUG_
563	LogDebug( "Page1Procedure: checkpoint 2" );
564	#endif
565
566	// num save dir file name
567	CHAR psz[_MAX_PATH];
568	WinQueryDlgItemText (hwnd, WID_E_NUMSAVEDIR, _MAX_PATH, psz);
569	pset->SetNumSaveDir (psz);
570
571	// force file name
572	WinQueryDlgItemText (hwnd, WID_E_FORCESAVEFILE, _MAX_PATH, psz);
573	pset->SetForceSaveFile (psz);
574
575	AdjustSaveTypeButtons
576	(BOOL (pset->QueryFileSaveStyle () == FSS_FORCEFILE));
577	pset->saveStyle = pset->QuerySaveStyle ();
578	pset->pNumSaveDir = pset->QueryNumSaveDir ();
579	pset->pForceSaveFile = pset->QueryForceSaveFile();
580
581	if (saveum)
582	pset->Save ();
583	#ifdef _DOLOGDEBUG_
584	LogDebug( "Page1Procedure: end UM_ADJUST" );
585	#endif
586	}
587	break;
588
589	case WM_CONTROL:
590	switch (SHORT1FROMMP (mp1))
591	{
592	case WID_RB_FSSFORCEFILE:
593	AdjustSaveTypeButtons (TRUE);
594	break;
595
596	case WID_RB_FSSPROMPT:
597	case WID_RB_FSSNUMFILES:
598	AdjustSaveTypeButtons (FALSE);
599	break;
600	}
601	return MRESULT (FALSE);
602	}
603
604	return WinDefDlgProc (hwnd, msg, mp1, mp2);
605	}
606
607	// Page2Procedure **************************************************** /FOLD00/
608
609	MRESULT EXPENTRY
610	SETTINGS :: Page2Procedure (HWND hwnd, ULONG msg, MPARAM mp1, MPARAM mp2)
611	{
612	static PSETTINGS pset = NULL;
613
614	switch (msg)
615	{
616	case WM_INITDLG:
617	#ifdef _DOLOGDEBUG_
618	LogDebug( "Page1Procedure: start WM_INITDLG" );
619	#endif
620	pset = PSETTINGS (mp2);
621	#ifdef _DOLOGDEBUG_
622	LogDebug( "Page1Procedure: end WM_INITDLG" );
623	#endif
624	return MRESULT (FALSE);
625
626	case WM_COMMAND:
627	if( SHORT1FROMMP( mp1 ) == DID_CANCEL )
628	WinPostMsg( g_hwndSettingsDialog, msg, mp1, mp2 );
629	return MRESULT( FALSE );
630
631	case UM_SETTINGS2DIALOG:
632	#ifdef _DOLOGDEBUG_
633	LogDebug( "Page2Procedure: start UM_SETTINGS2DIALOG" );
634	#endif
635	// set state of checkbuttons
636	pset->AdjustButton (hwnd, WID_CB_SSWENABLE,
637	pset->SnapshotWindow ());
638	pset->AdjustButton (hwnd, WID_CB_SSWHIDE,
639	pset->SSWHide ());
640	pset->AdjustButton (hwnd, WID_CB_SSWALWAYSONTOP,
641	pset->SSWAlwaysOnTop ());
642	//#ifdef _QUIET_
643	#if 1
644	pset->AdjustButton (hwnd, WID_CB_SERIALCAPTURE,
645	pset->SerialCapture ());
646	pset->AdjustButton (hwnd, WID_CB_DELAYCOUNTDOWN,
647	pset->DelayCountdown ());
648
649	// init delay time sb
650	WinSendDlgItemMsg (hwnd, WID_SB_DELAYTIME, SPBM_SETLIMITS,
651	MPFROMLONG (65536), MPFROMLONG (1));
652	WinSendDlgItemMsg (hwnd, WID_SB_DELAYTIME, SPBM_SETCURRENTVALUE,
653	MPFROMLONG (pset->QueryDelayTime ()), 0);
654
655	// init serial time sb
656	WinSendDlgItemMsg (hwnd, WID_SB_SERIALTIME, SPBM_SETLIMITS,
657	MPFROMLONG (65536), MPFROMLONG (1));
658	WinSendDlgItemMsg (hwnd, WID_SB_SERIALTIME, SPBM_SETCURRENTVALUE,
659	MPFROMLONG (pset->QuerySerialTime ()), 0);
660	#endif
661	switch (pset->QuerySSWCaptureType ())
662	{
663	case CAP_WINDOWINT:
664	WinSendDlgItemMsg (hwnd, WID_SSWWINDOWINT, BM_CLICK,
665	MPFROMSHORT(TRUE), 0);
666	break;
667	case CAP_SCREENREGION:
668	WinSendDlgItemMsg (hwnd, WID_SSWSCREENREGION, BM_CLICK,
669	MPFROMSHORT(TRUE), 0);
670	break;
671	case CAP_WINDOW:
672	WinSendDlgItemMsg (hwnd, WID_SSWWINDOW, BM_CLICK,
673	MPFROMSHORT(TRUE), 0);
674	break;
675	default:
676	WinSendDlgItemMsg (hwnd, WID_SSWSCREEN, BM_CLICK,
677	MPFROMSHORT(TRUE), 0);
678	break;
679	}
680
681	// show or hide snapshot window
682	if (! WinSendDlgItemMsg (hwnd, WID_CB_SSWENABLE,
683	BM_QUERYCHECK, 0, 0))
684	WinShowWindow (hwndSnapshot, FALSE);
685	else
686	WinShowWindow (hwndSnapshot, TRUE);
687
688	#ifdef _DOLOGDEBUG_
689	LogDebug( "Page1Procedure: end UM_SETTINGS2DIALOG" );
690	#endif
691	return MRESULT (FALSE);
692
693	case UM_ADJUST:
694	#ifdef _DOLOGDEBUG_
695	LogDebug( "Page2Procedure: start UM_ADJUST" );
696	#endif
697	//#ifndef _QUIET_
698	#if 0
699	// query state of checkbuttons and set flags
700	pset->SSWHide(WinQueryButtonCheckstate(hwnd, WID_CB_SSWHIDE));
701	#ifdef _DOLOGDEBUG_
702	LogDebug( "Page2Procedure: checkpoint 1" );
703	#endif
704	pset->SnapshotWindow(WinQueryButtonCheckstate(hwnd, WID_CB_SSWENABLE));
705	pset->SSWAlwaysOnTop(WinQueryButtonCheckstate(hwnd,
706	WID_CB_SSWALWAYSONTOP));
707	#ifdef _DOLOGDEBUG_
708	LogDebug( "Page2Procedure: checkpoint 2" );
709	#endif
710	#else
711	// query state of checkbuttons and set flags
712	pset->SerialCapture(WinQueryButtonCheckstate
713	(hwnd, WID_CB_SERIALCAPTURE));
714	#ifdef _DOLOGDEBUG_
715	LogDebug( "Page3Procedure: checkpoint 1" );
716	#endif
717	pset->DelayCountdown(WinQueryButtonCheckstate
718	(hwnd, WID_CB_DELAYCOUNTDOWN));
719	#endif
720	// get ssw capture type
721	if (WinSendMsg (WinWindowFromID (hwnd, WID_SSWSCREENREGION),
722	BM_QUERYCHECK, 0,0))
723	pset->SetSSWCaptureType (CAP_SCREENREGION);
724	else if (WinSendMsg (WinWindowFromID (hwnd, WID_SSWWINDOW),
725	BM_QUERYCHECK, 0,0))
726	pset->SetSSWCaptureType (CAP_WINDOW);
727	else if (WinSendMsg (WinWindowFromID (hwnd, WID_SSWWINDOWINT),
728	BM_QUERYCHECK, 0,0))
729	pset->SetSSWCaptureType (CAP_WINDOWINT);
730	else
731	pset->SetSSWCaptureType (CAP_SCREEN);
732	//#ifdef _QUITE_
733	#if 1
734	// delay time
735	ULONG ul;
736	if (! BOOL (WinSendDlgItemMsg (hwnd, WID_SB_DELAYTIME,
737	SPBM_QUERYVALUE,
738	MPFROMP (&ul),
739	MPFROM2SHORT (0, 0))))
740	ul = 5L;
741	pset->SetDelayTime (ul);
742	#ifdef _DOLOGDEBUG_
743	LogDebug( "Page3Procedure: checkpoint 3" );
744	#endif
745
746	// serial time
747	if (! BOOL (WinSendDlgItemMsg (hwnd, WID_SB_SERIALTIME,
748	SPBM_QUERYVALUE,
749	MPFROMP (&ul),
750	MPFROM2SHORT (0, 0))))
751	ul = 10L;
752	pset->SetSerialTime (ul);
753	pset->bSerialCapture = pset->SerialCapture ();
754	#endif
755	if (saveum)
756	pset->Save ();
757	#ifdef _DOLOGDEBUG_
758	LogDebug( "Page2Procedure: end UM_ADJUST" );
759	#endif
760	break;
761
762	case WM_CONTROL:
763	switch (SHORT1FROMMP (mp1))
764	{
765	case WID_CB_SSWENABLE:
766	if (! WinSendDlgItemMsg (hwnd, WID_CB_SSWENABLE,
767	BM_QUERYCHECK, 0, 0))
768	WinShowWindow (hwndSnapshot, FALSE);
769	else
770	WinShowWindow (hwndSnapshot, TRUE);
771	break;
772	}
773	return MRESULT (FALSE);
774	}
775
776	return WinDefDlgProc (hwnd, msg, mp1, mp2);
777	}
778
779	// Page3Procedure **************************************************** /FOLD00/
780
781	MRESULT EXPENTRY
782	SETTINGS :: Page3Procedure (HWND hwnd, ULONG msg, MPARAM mp1, MPARAM mp2)
783	{
784	static PSETTINGS pset = NULL;
785
786	switch (msg)
787	{
788	case WM_INITDLG:
789	#ifdef _DOLOGDEBUG_
790	LogDebug( "Page3Procedure: start WM_INITDLG" );
791	#endif
792	pset = PSETTINGS (mp2);
793	#ifdef _DOLOGDEBUG_
794	LogDebug( "Page3Procedure: end WM_INITDLG" );
795	#endif
796	return MRESULT (FALSE);
797
798	case WM_COMMAND:
799	if( SHORT1FROMMP( mp1 ) == DID_CANCEL )
800	WinPostMsg( g_hwndSettingsDialog, msg, mp1, mp2 );
801	return MRESULT( FALSE );
802
803	case UM_SETTINGS2DIALOG:
804	#ifdef _DOLOGDEBUG_
805	LogDebug( "Page3Procedure: start UM_SETTINGS2DIALOG" );
806	#endif
807	// set state of checkbuttons
808	pset->AdjustButton (hwnd, WID_CB_SERIALCAPTURE,
809	pset->SerialCapture ());
810	pset->AdjustButton (hwnd, WID_CB_DELAYCOUNTDOWN,
811	pset->DelayCountdown ());
812	pset->AdjustButton (hwnd, WID_CB_DOSOUND,
813	pset->DoSound ());
814	pset->AdjustButton (hwnd, WID_CB_IDLEPRIORITY,
815	pset->QueryFlag(SEI_IDLEPRIORITY));
816
817	// init delay time sb
818	WinSendDlgItemMsg (hwnd, WID_SB_DELAYTIME, SPBM_SETLIMITS,
819	MPFROMLONG (65536), MPFROMLONG (1));
820	WinSendDlgItemMsg (hwnd, WID_SB_DELAYTIME, SPBM_SETCURRENTVALUE,
821	MPFROMLONG (pset->QueryDelayTime ()), 0);
822
823	// init serial time sb
824	WinSendDlgItemMsg (hwnd, WID_SB_SERIALTIME, SPBM_SETLIMITS,
825	MPFROMLONG (65536), MPFROMLONG (1));
826	WinSendDlgItemMsg (hwnd, WID_SB_SERIALTIME, SPBM_SETCURRENTVALUE,
827	MPFROMLONG (pset->QuerySerialTime ()), 0);
828	#ifdef _DOLOGDEBUG_
829	LogDebug( "Page3Procedure: end UM_SETTINGS2DIALOG" );
830	#endif
831	return MRESULT (FALSE);
832
833	case UM_ADJUST:
834	{
835	#ifdef _DOLOGDEBUG_
836	LogDebug( "Page3Procedure: start UM_ADJUST" );
837	#endif
838	// query state of checkbuttons and set flags
839	pset->SerialCapture(WinQueryButtonCheckstate
840	(hwnd, WID_CB_SERIALCAPTURE));
841	#ifdef _DOLOGDEBUG_
842	LogDebug( "Page3Procedure: checkpoint 1" );
843	#endif
844	pset->DelayCountdown(WinQueryButtonCheckstate
845	(hwnd, WID_CB_DELAYCOUNTDOWN));
846	pset->DoSound(WinQueryButtonCheckstate
847	(hwnd, WID_CB_DOSOUND));
848	pset->SetFlag(SEI_IDLEPRIORITY, WinQueryButtonCheckstate
849	(hwnd, WID_CB_IDLEPRIORITY));
850	#ifdef _DOLOGDEBUG_
851	LogDebug( "Page3Procedure: checkpoint 2" );
852	#endif
853
854	// delay time
855	ULONG ul;
856	if (! BOOL (WinSendDlgItemMsg (hwnd, WID_SB_DELAYTIME,
857	SPBM_QUERYVALUE,
858	MPFROMP (&ul),
859	MPFROM2SHORT (0, 0))))
860	ul = 5L;
861	pset->SetDelayTime (ul);
862	#ifdef _DOLOGDEBUG_
863	LogDebug( "Page3Procedure: checkpoint 3" );
864	#endif
865
866	// serial time
867	if (! BOOL (WinSendDlgItemMsg (hwnd, WID_SB_SERIALTIME,
868	SPBM_QUERYVALUE,
869	MPFROMP (&ul),
870	MPFROM2SHORT (0, 0))))
871	ul = 10L;
872	pset->SetSerialTime (ul);
873	pset->bSerialCapture = pset->SerialCapture ();
874	pset->idleSetInIni = pset->QueryFlag(SEI_IDLEPRIORITY);
875
876	if (saveum)
877	pset->Save ();
878	#ifdef _DOLOGDEBUG_
879	LogDebug( "Page3Procedure: end UM_ADJUST" );
880	#endif
881	}
882	break;
883
884	case WM_CONTROL:
885	switch (SHORT1FROMMP (mp1))
886	{
887	case WID_CB_SERIALCAPTURE:
888	{
889	HWND hwndButton =
890	WinWindowFromID (WinWindowFromID (hwndFrame, FID_CLIENT),
891	WID_CB_DELAYEDCAPTURE);
892	if (! WinSendDlgItemMsg (hwnd, WID_CB_SERIALCAPTURE,
893	BM_QUERYCHECK, 0, 0))
894	WinEnableWindow (hwndButton, TRUE);
895	else
896	WinEnableWindow (hwndButton, FALSE);
897	}
898	break;
899	}
900	return MRESULT (FALSE);
901	}
902
903	return WinDefDlgProc (hwnd, msg, mp1, mp2);
904	}
905
906	// Page4Procedure **************************************************** /FOLD00/
907
908	MRESULT EXPENTRY
909	SETTINGS :: Page4Procedure (HWND hwnd, ULONG msg, MPARAM mp1, MPARAM mp2)
910	{
911	static PSETTINGS pset = NULL;
912
913	switch (msg)
914	{
915	case WM_INITDLG:
916	{
917	#ifdef _DOLOGDEBUG_
918	LogDebug( "Page4Procedure: start WM_INITDLG" );
919	#endif
920	pset = PSETTINGS (mp2);
921
922	pset->GetLanguages(WinWindowFromID (hwnd, WID_LB_LANGUAGES));
923
924	#ifdef _DOLOGDEBUG_
925	LogDebug( "Page4Procedure: WM_INITDLG: after GetLanguages()" );
926	#endif
927	HDIR hdir;
928	ULONG c, fl;
929	FILEFINDBUF3 findbuf;
930	APIRET rc;
931	PSZ psz;
932
933	// find all hlps and add the names to the language list
934	fl = FILE_NORMAL;
935	hdir = HDIR_CREATE;
936	c = 1;
937	rc = DosFindFirst ("*.hlp", &hdir, fl, &findbuf,
938	sizeof (findbuf), &c, FIL_STANDARD);
939	#ifdef _DOLOGDEBUG_
940	LogDebug( "Page4Procedure: WM_INITDLG: Entering help file loop ..." );
941	#endif
942	while (!rc)
943	{
944	#ifdef _DOLOGDEBUG_
945	LogDebug( "Page4Procedure: WM_INITDLG: Doing '%s' ...", findbuf.achName );
946	#endif
947	if ((psz = strchr (findbuf.achName, '.')))
948	*psz = '\0';
949	findbuf.achName[0] = toupper (findbuf.achName[0]);
950	WinInsertLboxItem (WinWindowFromID (hwnd, WID_LB_LANGUAGESHELP),
951	LIT_END, findbuf.achName);
952	c = 1;
953	rc = DosFindNext (hdir, &findbuf, sizeof (findbuf), &c);
954	}
955	DosFindClose (hdir);
956	#ifdef _DOLOGDEBUG_
957	LogDebug( "Page4Procedure: WM_INITDLG: help file loop done." );
958	#endif
959
960	WinSendMsg (hwnd, UM_SETTINGS2DIALOG, 0,0);
961
962	if (pset->fAutoLanguage)
963	WinEnableWindow (WinWindowFromID (hwnd, WID_ST_LANGNOTE),
964	FALSE);
965	#ifdef _DOLOGDEBUG_
966	LogDebug( "Page4Procedure: end WM_INITDLG" );
967	#endif
968	}
969	return MRESULT (FALSE);
970
971	case WM_COMMAND:
972	if( SHORT1FROMMP( mp1 ) == DID_CANCEL )
973	WinPostMsg( g_hwndSettingsDialog, msg, mp1, mp2 );
974	return MRESULT( FALSE );
975
976	case UM_SETTINGS2DIALOG:
977	{
978
979	#ifdef _DOLOGDEBUG_
980	LogDebug( "Page4Procedure: start UM_SETTINGS2DIALOG" );
981	#endif
982	// select the appropriate entry in the language-listbox
983	CHAR ach[_MAX_FNAME];
984	HWND hwndLB = WinWindowFromID (hwnd, WID_LB_LANGUAGES);
985	ULONG c, i;
986
987	c = WinQueryLboxCount (hwndLB);
988
989	for (i = 0; i < c; i++)
990	{
991	#ifdef _DOLOGDEBUG_
992	LogDebug( "Page4Procedure: UM_SETTINGS2DIALOG: i.1 = %d", i );
993	#endif
994	PSZ psz = PSZ(WinSendDlgItemMsg (hwnd, WID_LB_LANGUAGES,
995	LM_QUERYITEMHANDLE,
996	MPFROMLONG(i), NULL));
997	// WinQueryLboxItemText (hwndLB, i, ach, sizeof (ach));
998	if (stricmp (pset->QueryString(SEI_LANGUAGE), psz) == 0)
999	break;
1000	}
1001	#ifdef _DOLOGDEBUG_
1002	LogDebug( "Page4Procedure: UM_SETTINGS2DIALOG: after loop 1" );
1003	#endif
1004	if (i < c)
1005	WinSendDlgItemMsg (hwnd, WID_LB_LANGUAGES, LM_SELECTITEM,
1006	MPFROMSHORT (i), MPFROMSHORT (TRUE));
1007	else
1008	WinSendDlgItemMsg (hwnd, WID_LB_LANGUAGES, LM_SELECTITEM,
1009	MPFROMSHORT (0), MPFROMSHORT (TRUE));
1010	hwndLB = WinWindowFromID (hwnd, WID_LB_LANGUAGESHELP);
1011	c = WinQueryLboxCount (hwndLB);
1012
1013	for (i = 0; i < c; i++)
1014	{
1015	#ifdef _DOLOGDEBUG_
1016	LogDebug( "Page4Procedure: UM_SETTINGS2DIALOG: i.2 = %d", i );
1017	#endif
1018	WinQueryLboxItemText (hwndLB, i, ach, sizeof (ach));
1019	if (stricmp (pset->QueryString (SEI_LANGUAGEHELP), ach) == 0)
1020	break;
1021	}
1022	#ifdef _DOLOGDEBUG_
1023	LogDebug( "Page4Procedure: UM_SETTINGS2DIALOG: after loop 2" );
1024	#endif
1025	if (i < c)
1026	WinSendDlgItemMsg (hwnd, WID_LB_LANGUAGESHELP, LM_SELECTITEM,
1027	MPFROMSHORT (i), MPFROMSHORT (TRUE));
1028	else
1029	WinSendDlgItemMsg (hwnd, WID_LB_LANGUAGESHELP, LM_SELECTITEM,
1030	MPFROMSHORT (0), MPFROMSHORT (TRUE));
1031	#ifdef _DOLOGDEBUG_
1032	LogDebug( "Page4Procedure: end UM_SETTINGS2DIALOG" );
1033	#endif
1034	}
1035	return MRESULT (FALSE);
1036
1037	case WM_DESTROY:
1038	{
1039	CHAR ach[_MAX_FNAME];
1040
1041	ULONG ul = USHORT (WinSendDlgItemMsg (hwnd, WID_LB_LANGUAGES,
1042	LM_QUERYSELECTION,
1043	MPFROMLONG (LIT_FIRST), 0L));
1044	PSZ psz = PSZ(WinSendDlgItemMsg (hwnd, WID_LB_LANGUAGES,
1045	LM_QUERYITEMHANDLE,
1046	MPFROMLONG(ul), NULL));
1047	pset->SetString(SEI_LANGUAGE, psz);
1048
1049	ul = USHORT (WinSendDlgItemMsg (hwnd, WID_LB_LANGUAGESHELP,
1050	LM_QUERYSELECTION,
1051	MPFROMLONG (LIT_FIRST), 0L));
1052	WinSendDlgItemMsg (hwnd, WID_LB_LANGUAGESHELP, LM_QUERYITEMTEXT,
1053	MPFROM2SHORT (ul, sizeof (ach)), MPFROMP (ach));
1054	pset->SetString (SEI_LANGUAGEHELP, ach);
1055
1056	if (saveum)
1057	pset->Save ();
1058	}
1059	return MRESULT (FALSE);
1060	}
1061
1062	return WinDefDlgProc (hwnd, msg, mp1, mp2);
1063	}
1064
1065	// AdjustSaveTypeButtons ********************************************* /FOLD00/
1066
1067	VOID AdjustSaveTypeButtons (BOOL f)
1068	{
1069	HWND hwndClient = WinWindowFromID (hwndFrame, FID_CLIENT);
1070
1071	// FIXME um, em, global variables :-$
1072	WinEnableWindow (WinWindowFromID (hwndClient, WID_RB_CLIPBOARD), !f);
1073	WinEnableWindow (WinWindowFromID (hwndClient, WID_RB_FILE), !f);
1074	}
1075
1076	// QueryWindowData *************************************************** /fold00/
1077
1078	VOID SETTINGS :: QueryWindowData (SWP *pswp, USHORT us[7], BOOL f)
1079	{
1080	// FIXME puke, yukk, choke! get this flag thing away! do it better!
1081	// FIXME what is with US?
1082	if (f)
1083	memcpy (pswp, QueryBinary(SEI_SWPSSW), sizeof (SWP));
1084	else
1085	memcpy (pswp, QueryBinary(SEI_SWP), sizeof (SWP));
1086
1087	LONG cx, cy;
1088	cx = WinQuerySysValue (HWND_DESKTOP, SV_CXSCREEN);
1089	cy = WinQuerySysValue (HWND_DESKTOP, SV_CYSCREEN);
1090
1091	if (pswp->cx < 32)
1092	pswp->cx = 32;
1093	// bigger than screen?
1094	if (pswp->cx > cx)
1095	pswp->cx = cx;
1096	// partly outside of screen?
1097	if (pswp->x+pswp->cx >= cx)
1098	pswp->x = cx-pswp->cx;
1099	if (pswp->cy < 32)
1100	pswp->cy = 32;
1101	// bigger than screen?
1102	if (pswp->cy > cy)
1103	pswp->cy = cy;
1104	// partly outside of screen?
1105	if (pswp->y+pswp->cy >= cy)
1106	pswp->y = cy-pswp->cy;
1107	}
1108
1109	// ReloadResources *************************************************** /FOLD00/
1110
1111	BOOL Settings :: ReloadResources (PSZ psz)
1112	{
1113	if (g_hmod)
1114	DosFreeModule(g_hmod);
1115
1116	APIRET rc;
1117
1118	if ((rc = DosLoadModule(PSZ(NULL), 0, psz, &g_hmod)))
1119	{
1120	DisplayError("ERROR", "Could not (re)load Gotcha! resource module "
1121	"'%s' (DosLoadModule() return code %d). First make sure the DLL is in the LIBPATH. If this is the case, try to delete "
1122	"GOTCHA.INI and start Gotcha! again. If it does not work "
1123	"then, contact the author (thth@c2226.de).", psz, rc);
1124	exit(1);
1125	}
1126
1127	ResourceString::Module(g_hmod);
1128	//#ifdef _QUIET_
1129	#if 1
1130	pszPageTab[0] = RSTR (IDS_MAINWIN);
1131	pszPageTab[1] = RSTR (IDS_PAGESAVE);
1132	pszPageTab[2] = RSTR (IDS_PAGEMISC);
1133	pszPageTab[3] = RSTR (IDS_PAGELANGUAGE);
1134	#else
1135	pszPageTab[0] = RSTR (IDS_PAGESAVE);
1136	pszPageTab[1] = RSTR (IDS_PAGESNAPSHOT);
1137	pszPageTab[2] = RSTR (IDS_PAGEMISC);
1138	pszPageTab[3] = RSTR (IDS_PAGELANGUAGE);
1139	#endif
1140	for( int i = 0; i < BMF_INVALID; i++ ) {
1141	ifi[ i ].label = RSTR ( IDS_BMF_JPG+i ); }
1142
1143	return TRUE;
1144	}
1145
1146	// SelectLanguage **************************************************** /FOLD00/
1147
1148	VOID Settings :: SelectLanguage (VOID)
1149	{
1150	// set this to some default, as we must open the settings dialog for
1151	// selecting a language
1152	//#ifdef _QUIET_
1153	#if 1
1154	pszPageTab[0] = RSTR (IDS_MAINWIN);
1155	pszPageTab[1] = RSTR (IDS_PAGESAVE);
1156	pszPageTab[2] = RSTR (IDS_PAGEMISC);
1157	pszPageTab[3] = RSTR (IDS_PAGELANGUAGE);
1158	#else
1159	pszPageTab[0] = RSTR (IDS_PAGESAVE);
1160	pszPageTab[1] = RSTR (IDS_PAGESNAPSHOT);
1161	pszPageTab[2] = RSTR (IDS_PAGEMISC);
1162	pszPageTab[3] = RSTR (IDS_PAGELANGUAGE);
1163	#endif
1164	// bring up the "select language" settings page
1165	Dialog (TRUE);
1166	}
1167
1168	// GetLanguages ****************************************************** /FOLD00/
1169
1170	USHORT Settings :: GetLanguages (HWND hwnd)
1171	{
1172	// find all dlls and add the names to the language list
1173	HDIR hdir;
1174	ULONG c, fl, ul;
1175	FILEFINDBUF3 findbuf;
1176	APIRET rc;
1177	PSZ psz;
1178	HMODULE hmod;
1179
1180	fl = FILE_NORMAL;
1181	hdir = HDIR_CREATE;
1182	c = 1;
1183	rc = DosFindFirst ("*.dll", &hdir, fl, &findbuf,
1184	sizeof (findbuf), &c, FIL_STANDARD);
1185	while (!rc)
1186	{
1187	// we don't want the extension
1188	if ((psz = strchr (findbuf.achName, '.')))
1189	*psz = '\0';
1190	// try opening the dll and read the version etc. data
1191	if ((rc = DosLoadModule(PSZ(NULL), 0, findbuf.achName, &hmod)) == NO_ERROR) {
1192	PVOID pv;
1193	if (DosGetResource(hmod, RT_RCDATA, DLL_ID, &pv) == NO_ERROR) {
1194	if (strcmp(PSZ(pv), "Gotcha!") == 0) {
1195	psz = PSZ(pv)+strlen(PSZ(pv))+3;
1196	ul = WinInsertLboxItem (hwnd, LIT_END, psz);
1197	WinSendMsg(hwnd, LM_SETITEMHANDLE, MPFROMLONG(ul),
1198	MPFROMP (strdup(findbuf.achName)));
1199	}
1200	DosFreeResource(pv);
1201	}
1202	DosFreeModule(hmod);
1203	}
1204	c = 1;
1205	rc = DosFindNext (hdir, &findbuf, sizeof (findbuf), &c);
1206	}
1207	DosFindClose (hdir);
1208
1209	return 1;
1210	}
1211
1212	// GetFileExtension ************************************************** /FOLD00/
1213
1214	PSZ Settings :: GetFileExtension( SHORT type )
1215	{
1216	if( type == BMF_INVALID )
1217	type = SHORT( QueryFileFormat() );
1218	if( ( type >= BMF_JPG ) && ( type < BMF_INVALID ) )
1219	return ifi[ type ].extension;
1220	return "";
1221	}
1222
1223	#if 0
1224	// GetFOURCC ********************************************************* /FOLD00/
1225
1226	FOURCC Settings :: GetFOURCC( SHORT type )
1227	{
1228	if( type == BMF_INVALID )
1229	type = SHORT( QueryFileFormat() );
1230	if( ( type >= BMF_JPG ) && ( type < BMF_INVALID ) )
1231	return ifi[ type ].fourcc;
1232	return 0L;
1233	}
1234	#endif
1235	// GetFileEAType ***************************************************** /FOLD00/
1236
1237	PSZ Settings :: GetFileEAType( SHORT type )
1238	{
1239	if( type == BMF_INVALID )
1240	type = SHORT( QueryFileFormat() );
1241	if( ( type >= BMF_JPG ) && ( type < BMF_INVALID ) )
1242	return ifi[ type ].eaType;
1243	return "";
1244	}
1245
1246	// ************************************************************************
1247
1248	PSZ Settings :: QueryNumSaveDir( VOID )
1249	{
1250	// Using a static buffer here is not really good, but good enough
1251	// currently as we know there will be no concurrent access.
1252	static CHAR ach[_MAX_PATH];
1253
1254	if( strspn( QueryString( SEI_NUMSAVEDIR ), " \t\n\r" ) ==
1255	strlen( QueryString( SEI_NUMSAVEDIR ) ) )
1256	return getcwd( ach, _MAX_PATH );
1257	return QueryString( SEI_NUMSAVEDIR );
1258	}
1259
1260	// ************************************************************************

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

Download in other formats: