![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to iniedit.c CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [OS/2 SDKs] / os232sdk / toolkt20 / c / samples / iniedit|
Return to iniedit.c CVS log | Up to [OS/2 SDKs] / os232sdk / toolkt20 / c / samples / iniedit |
1.1 root 1: /******************************* Module Header ******************************\
2: * Module Name: IniEdit.c
3: *
4: *
5: * PM OS2.ini Editor
6: *
7: * Allows adding, deleting and modifying of os2.ini entries through PM
8: * interface
9: *
10: * Created by Microsoft, IBM Corporation 1990
11: *
12: * DISCLAIMER OF WARRANTIES. The following [enclosed] code is
13: * sample code created by Microsoft Corporation and/or IBM
14: * Corporation. This sample code is not part of any standard
15: * Microsoft or IBM product and is provided to you solely for
16: * the purpose of assisting you in the development of your
17: * applications. The code is provided "AS IS", without
18: * warranty of any kind. Neither Microsoft nor IBM shall be
19: * liable for any damages arising out of your use of the sample
20: * code, even if they have been advised of the possibility of
21: * such damages.
22: *
23: \***************************************************************************/
24:
25:
26: #define LINT_ARGS // Include needed parts of PM
27: #define INCL_WININPUT // definitions
28: #define INCL_WINSYS
29: #define INCL_WINMESSAGEMGR
30: #define INCL_WINBUTTONS
31: #define INCL_WINPOINTERS
32: #define INCL_WINHEAP
33: #define INCL_WINSHELLDATA
34: #define INCL_WINMENUS
35: #define INCL_WINFRAMEMGR
36: #define INCL_WINDIALOGS
37: #define INCL_WINLISTBOXES
38: #define INCL_WINENTRYFIELDS
39: #define INCL_DOSMEMMGR
40: #define INCL_WINSWITCHLIST
41: #define INCL_DOSPROCESS
42: #define INCL_GPIBITMAPS
43: #define INCL_GPIREGIONS
44: #define INCL_GPILCIDS
45: #define INCL_GPIPRIMITIVES
46: #define INCL_DEV
47:
48: #include <string.h>
49: #include <stdio.h>
50:
51: #include <os2.h>
52:
53: #include "IniEdit.h"
54:
55:
56: /******************************* Constants **********************************/
57:
58: #define STACK_SIZE 0x2000 // Stack size for second thread
59: #define UPPER_SEGMENT_LIMIT 0xFD00 // Amount of Segment used
60:
61: /******************************** Globals **********************************/
62:
63: char szIniEdit[] = "IniEdit"; // App String Name
64:
65: HAB habIniEdit; // Handle Anchor Block
66: HMQ hmqIniEdit; // Handle Message Queue
67: HWND hwndIniEdit; // Main Client Window
68: HWND hwndIniEditFrame; // Frame Window
69: HDC hdcScreen; // DC for Client Window
70: HPS hpsScreen; // PS for Client Window
71:
72:
73: USHORT cAppNames = 0; // Count of App names in os2.ini
74: HWND FocusWindow = (HWND)NULL; // Focus of Dialog Box
75: USHORT cxBorder; // System border width
76: USHORT cyBorder; // System border height
77:
78: USHORT usFormat = APP_FORM; // Current Display format
79: USHORT usPrintFormat = APP_FORM; // Format for Printing
80: USHORT usLineHeight = 12; // Current font Height
81: HWND hwndList = (HWND)NULL; // Handle of Main ListBox
82: HWND hwndMenu = (HWND)NULL; // Handle of Main Menu
83:
84: PGROUPSTRUCT pGroups; // Pointer to String Groups
85: PPAIRSTRUCT pPairsBase; // Pointer to Key-Value Pairs
86: PPAIRSTRUCT pPairsAlloc; // Pointer to next Avail Memory
87:
88: #define HOLD_LEN 4096
89: CHAR achNames[HOLD_LEN]; // Array of Character from Query
90: CHAR szBuf[2 * MAX_STRING_LEN]; // Character buffer for Pairs
91:
92: /***************************** Function Decls ******************************/
93:
94: VOID ProcessMenuItem( HWND hwnd, USHORT msg, MPARAM mp1, MPARAM mp2 );
95: VOID cdecl main( VOID );
96: VOID IniEditPaint( VOID );
97: VOID ReadIni( VOID );
98: VOID OldProfilePrint( VOID );
99: VOID UpdateListBox( BOOL fRead, USHORT usForm );
100:
101: MRESULT EXPENTRY IniEditWndProc(HWND, USHORT, MPARAM, MPARAM);
102:
103:
104: /***************************** Function Header *****************************\
105: *
106: * main
107: *
108: *
109: * Do initialization then do a message loop
110: *
111: \***************************************************************************/
112:
113: VOID cdecl main()
114: {
115:
116: QMSG qmsg; // Current Queue Message
117: ULONG fcf; // Frame Control Flags
118: SIZEL sizel; // Size of PS
119: RECTL rclWindow; // Size Rect for ListBox Window
120: SWCNTRL swcntrl; // Switch Control Block
121: FONTMETRICS fmetrics; // FontMetrics of current font
122:
123:
124: /*** Set up and Initialization ***/
125:
126: /* Initialize the anchor block handle */
127: habIniEdit = WinInitialize(NULL);
128:
129: /* Create the message queue */
130: hmqIniEdit = WinCreateMsgQueue(habIniEdit, 0);
131:
132: /* Register the window class for the IniEdit window */
133: WinRegisterClass(habIniEdit, (PCH)szIniEdit, IniEditWndProc,
134: CS_SIZEREDRAW, 0);
135:
136: /* Create the window for IniEdit */
137: fcf = FCF_TITLEBAR | FCF_MINMAX | FCF_SYSMENU | FCF_SIZEBORDER | FCF_MENU
138: | FCF_SHELLPOSITION | FCF_ACCELTABLE | FCF_ICON;
139:
140: hwndIniEditFrame = WinCreateStdWindow( HWND_DESKTOP, WS_VISIBLE,
141: (PVOID)&fcf, (PSZ)szIniEdit, (PSZ)szIniEdit, WS_VISIBLE,
142: (HMODULE)NULL, IDI_INIEDIT, (PHWND)&hwndIniEdit);
143:
144: /* Create a DC for the IniEdit window */
145: hdcScreen = WinOpenWindowDC(hwndIniEdit);
146:
147: /* also create a screen PS */
148:
149: sizel.cx= 0L; // To use the default screen page size.
150: sizel.cy= 0L;
151:
152: if( (hpsScreen = GpiCreatePS( habIniEdit, hdcScreen, &sizel,
153: (PU_PELS | GPIF_DEFAULT | GPIT_MICRO | GPIA_ASSOC ))) == (HPS)NULL )
154: {
155: ;
156: }
157:
158:
159: /* Initially set the keyboard focus to us */
160: WinSetFocus(HWND_DESKTOP, hwndIniEdit);
161:
162: /* get the font size */
163: GpiQueryFontMetrics( hpsScreen, (LONG)sizeof( FONTMETRICS ), &fmetrics );
164: usLineHeight = (USHORT)(fmetrics.lMaxDescender + fmetrics.lMaxBaselineExt);
165:
166: /* get the system widths of a border */
167: cxBorder = (USHORT) WinQuerySysValue(HWND_DESKTOP, SV_CXBORDER);
168: cyBorder = (USHORT) WinQuerySysValue(HWND_DESKTOP, SV_CYBORDER);
169:
170: /* this menu handle is often used */
171: hwndMenu = WinWindowFromID( hwndIniEditFrame, FID_MENU );
172:
173: /* add program to switch list */
174: swcntrl.hwnd = hwndIniEditFrame;
175: swcntrl.hwndIcon = NULL;
176: swcntrl.hprog = NULL;
177: swcntrl.idProcess = NULL;
178: swcntrl.idSession = NULL;
179: swcntrl.uchVisibility = NULL;
180: swcntrl.fbJump = NULL;
181: strcpy( swcntrl.szSwtitle, szIniEdit);
182: swcntrl.bProgType = NULL;
183:
184: WinAddSwitchEntry( &swcntrl );
185:
186: /* Create main list box in main window */
187: WinQueryWindowRect( hwndIniEdit, &rclWindow);
188: rclWindow.yTop -= usLineHeight;
189: rclWindow.yTop += cyBorder;
190: rclWindow.xRight += 2*cxBorder;
191: hwndList = WinCreateWindow( hwndIniEdit, // parent
192: WC_LISTBOX, // class
193: (PSZ)"Scroll", // name
194: LS_NOADJUSTPOS, // style
195: -cxBorder, -cyBorder, // position
196: (USHORT)rclWindow.xRight,
197: (USHORT)rclWindow.yTop,
198: hwndIniEditFrame, // Owner
199: HWND_TOP, // InsertBehind
200: IDI_LIST, // ID
201: (PVOID)NULL, // pCtlData,
202: (PVOID)NULL);
203:
204:
205: /*** Memory Allocation ***/
206:
207: /* Alloc the needed space for the groups */
208: if( DosAllocMem( &pGroups, 32000L, fPERM | PAG_COMMIT) )
209: ErrMessage( "main: DosAlloc for pGroup failed" );
210:
211: if( DosAllocMem( &pPairsBase, 4*64000, fPERM | PAG_COMMIT) )
212: ErrMessage( "main: DosAlloc for pPairs failed" );
213: pPairsAlloc = pPairsBase;
214:
215: /* read in os2.ini and fill in list box */
216: UpdateListBox( TRUE, APP_FORM );
217:
218: WinShowWindow( hwndList, TRUE );
219:
220: /* Process messages for the window */
221: while ( WinGetMsg(habIniEdit, (PQMSG)&qmsg, (HWND)NULL, 0, 0 ) )
222: {
223:
224: /* Dispatch the message */
225: WinDispatchMsg(habIniEdit, (PQMSG)&qmsg);
226: }
227:
228:
229: /*** CleanUp ***/
230:
231: /* Destroy the IniEdit window and message queue */
232: GpiDestroyPS( hpsScreen );
233: WinDestroyWindow(hwndIniEditFrame);
234: WinDestroyMsgQueue(hmqIniEdit);
235:
236: /* Exit PM */
237: WinTerminate( habIniEdit );
238: DosExit( EXIT_PROCESS, 0 );
239:
240: } /* main */
241:
242:
243: /****************************** Function Header ****************************\
244: *
245: * ReadIni
246: *
247: *
248: * Reads in OS2.ini
249: *
250: \***************************************************************************/
251:
252: VOID ReadIni()
253: {
254: ULONG cchNames; // Count of Character from Query
255: USHORT Index[MAX_APP_NAMES]; // Index of Names into achNames
256: USHORT cPairs; // Count of pairs in current AppName
257: ULONG ul;
258: INT i,j; // Loop Counters
259:
260:
261: /* Reset Count of App Names */
262: cAppNames = 0;
263:
264: /* Reset memory available pointer to Base */
265: pPairsAlloc = pPairsBase;
266:
267: /* Determine number of characters in app Names Strings */
268: PrfQueryProfileSize( HINI_PROFILE, NULL, NULL, &cchNames );
269:
270: /* Read in the App Name strings */
271: PrfQueryProfileString( HINI_PROFILE, NULL, NULL, " ", achNames, cchNames );
272:
273: /*** Find the starting index of each App ***/
274:
275: /* step through each string in set of app characters
276: * adding length of current string to find beginning of next string
277: * also store each App Name into szAppName element of Group
278: */
279: for( i=0; i<cchNames; i += (strlen(pGroups[cAppNames-1].szAppName)+1) )
280: {
281: if( achNames[i] != (char)0 )
282: {
283: strcpy( pGroups[cAppNames++].szAppName, &achNames[i]);
284: } /* if */
285: else
286: if( achNames[i+1] == (char)0 )
287: break;
288: } /* for */
289:
290:
291: /*** Read elements of each App Name ***/
292: for( i=0; i<cAppNames; i++ )
293: {
294: /* Get number of Character Associated with App Name */
295: PrfQueryProfileSize( HINI_PROFILE, pGroups[i].szAppName, NULL, &cchNames );
296:
297: /* Enumerate all KeyNames for this app name */
298: PrfQueryProfileString( HINI_PROFILE, pGroups[i].szAppName, NULL, " ", achNames, HOLD_LEN );
299:
300: /* Count the number of key Names */
301: cPairs = 0;
302: for( j=0; j<cchNames; j++)
303: if( achNames[j] != (CHAR)0 )
304: {
305: Index[cPairs++] = j;
306: j += strlen( &achNames[j] );
307: }
308:
309: pGroups[i].cKeys = cPairs;
310:
311: /*
312: * Make sure we can fit the entire structure into our current
313: * segment, if not, lets jump to the next segment
314: */
315: ul = sizeof(PAIRSTRUCT) * cPairs;
316:
317: /* Allocate the number of pair structures for the current group */
318: pGroups[i].pPairs = pPairsAlloc;
319:
320: // pPairsAlloc += sizeof(PAIRSTRUCT)*cPairs;
321: // Remember that incrementing a pointer automatically mult by size of item
322: pPairsAlloc += cPairs;
323:
324:
325: /* Store the KeyName into the pair structure */
326: for( j=0; j<cPairs; j++ )
327: {
328: strcpy( pGroups[i].pPairs[j].szKey, &achNames[Index[j]] );
329:
330: /* store the key value */
331: PrfQueryProfileString( HINI_PROFILE, pGroups[i].szAppName,
332: pGroups[i].pPairs[j].szKey, " ",
333: pGroups[i].pPairs[j].szValue, MAX_STRING_LEN );
334:
335: }
336: } /* each App Name */
337:
338: } /* ReadIni */
339:
340:
341: /****************************** Function Header ****************************\
342: *
343: * ProcessMenuItem
344: *
345: *
346: * Act on the corresponding Menu Item Choosen
347: *
348: \***************************************************************************/
349:
350: VOID ProcessMenuItem( HWND hwnd, USHORT msg, MPARAM mp1, MPARAM mp2 )
351: {
352: TID Tid; // ID of new thread; Not used
353:
354:
355: /* Switch on the Menu Item choosen */
356: switch( LOUSHORT( mp1 ) )
357: {
358: case IDMI_SHOW_ALL:
359: case IDMI_SHOW_APPNAMES:
360: usFormat = (LOUSHORT(mp1) == IDMI_SHOW_ALL);
361: UpdateListBox( FALSE, usFormat ? ALL_FORM : APP_FORM );
362: break;
363:
364: case IDM_SEARCH:
365: WinDlgBox(HWND_DESKTOP, hwndIniEditFrame, (PFNWP)SearchWndProc,
366: (HMODULE)NULL, IDD_SEARCH, (PVOID)NULL);
367: break;
368:
369: case IDMI_EDIT_DELETE_KEY:
370: WinDlgBox(HWND_DESKTOP, hwndIniEditFrame, (PFNWP)DelKeyWndProc,
371: (HMODULE)NULL, IDD_DEL_KEY, (PVOID)NULL);
372: UpdateListBox( TRUE, usFormat ? ALL_FORM : APP_FORM );
373: break;
374:
375: case IDMI_EDIT_DELETE_APP:
376: WinDlgBox(HWND_DESKTOP, hwndIniEditFrame, (PFNWP)DelAppWndProc,
377: (HMODULE)NULL, IDD_DEL_APP, (PVOID)NULL);
378: UpdateListBox( TRUE, usFormat ? ALL_FORM : APP_FORM );
379: break;
380:
381: case IDMI_EDIT_ADD_KEY:
382: WinDlgBox(HWND_DESKTOP, hwndIniEditFrame, (PFNWP)AddKeyWndProc,
383: (HMODULE)NULL, IDD_ADD_KEY, (PVOID)NULL);
384: UpdateListBox( TRUE, usFormat ? ALL_FORM : APP_FORM );
385: break;
386:
387: case IDMI_EDIT_CHANGE:
388: WinDlgBox(HWND_DESKTOP, hwndIniEditFrame, (PFNWP)ChangeKeyWndProc,
389: (HMODULE)NULL, IDD_CHANGE_KEY, (PVOID)NULL);
390: UpdateListBox( TRUE, usFormat ? ALL_FORM : APP_FORM );
391: break;
392:
393: case IDMI_PRINT_ALL:
394: case IDMI_PRINT_APP:
395: usPrintFormat = LOUSHORT(mp1) == IDMI_PRINT_ALL ? ALL_FORM : APP_FORM;
396: if( DosCreateThread( &Tid, PrintThread, 0L, 0L, STACK_SIZE) )
397: ErrMessage("StartThread2: DosCreateThread Failed");
398: break;
399:
400: case IDMI_REFRESH:
401: UpdateListBox( TRUE, usFormat );
402: break;
403:
404: case IDMI_ABOUT:
405: WinDlgBox(HWND_DESKTOP, hwndIniEditFrame, (PFNWP)DelAppWndProc,
406: (HMODULE)NULL, IDD_ABOUT, (PVOID)NULL);
407: break;
408:
409: default:
410: WinDefWindowProc(hwnd, msg, mp1, mp2);
411:
412: break;
413:
414: } /* switch */
415:
416: } /* ProcessMenuItem */
417:
418:
419: /****************************** Function Header ****************************\
420: *
421: * UpdateListBox
422: *
423: *
424: * Update Main List Box to correct state
425: * May Also:
426: * - Check correct menu item
427: * - Repaint title of List Box
428: * - ReRead os2.ini file
429: *
430: \***************************************************************************/
431:
432: VOID UpdateListBox( BOOL fReadIni, USHORT usNewFormat )
433: {
434: INT i,j; // Loop Counters
435: USHORT Index; // Index into ListBox
436: static USHORT usLastFormat = -1; // Last displayed format
437:
438:
439: /* Check the correct item if format changed */
440: if( usLastFormat != usNewFormat )
441: {
442: WinSendMsg( hwndMenu, MM_SETITEMATTR, MPFROM2SHORT(IDMI_SHOW_ALL, TRUE),
443: MPFROM2SHORT(MIA_CHECKED, usFormat ? MIA_CHECKED:FALSE));
444:
445: WinSendMsg( hwndMenu, MM_SETITEMATTR, MPFROM2SHORT(IDMI_SHOW_APPNAMES, TRUE),
446: MPFROM2SHORT(MIA_CHECKED, (!usFormat) ? MIA_CHECKED:FALSE));
447: usLastFormat = usNewFormat;
448:
449: WinSendMsg( hwndIniEdit, WM_PAINT, (MPARAM)NULL, (MPARAM)NULL );
450: }
451:
452:
453: /* Turn off list box updates */
454: WinEnableWindowUpdate( hwndList, FALSE );
455:
456: /* Remove all items from list box */
457: WinSendMsg( hwndList, LM_DELETEALL, (MPARAM)0, (MPARAM)0 );
458:
459: /* ReRead os2.ini if needed */
460: if( fReadIni )
461: ReadIni();
462:
463: /* Add elements to listbox */
464: if( usNewFormat == ALL_FORM )
465: {
466:
467: /* Insert all app Names */
468: for( i=0; i<cAppNames; i++ )
469: {
470: Index = (USHORT)WinSendMsg( hwndList, LM_INSERTITEM,
471: MPFROM2SHORT(LIT_END, NULL),
472: MPFROMP(pGroups[i].szAppName) );
473:
474: WinSendMsg( hwndList, LM_SETITEMHANDLE,
475: MPFROMSHORT(Index),
476: MPFROMSHORT(i) );
477:
478: /* Insert Key Value Pairs for App Name */
479: for( j=0; j<pGroups[i].cKeys; j++ )
480: {
481: sprintf( szBuf, " %s: %s", pGroups[i].pPairs[j].szKey,
482: pGroups[i].pPairs[j].szValue );
483: Index = (USHORT)WinSendMsg( hwndList, LM_INSERTITEM,
484: MPFROM2SHORT(LIT_END, NULL),
485: MPFROMP(szBuf) );
486:
487: WinSendMsg( hwndList, LM_SETITEMHANDLE,
488: MPFROMSHORT(Index),
489: MPFROM2SHORT(i,j) );
490:
491: }
492: }
493: } /* if */
494: else
495: {
496: /* Insert all app Names */
497: for( i=0; i<cAppNames; i++ )
498: {
499: WinSendMsg( hwndList, LM_INSERTITEM,
500: MPFROM2SHORT(LIT_SORTASCENDING, NULL),
501: MPFROMP(pGroups[i].szAppName) );
502: }
503: } /* else */
504:
505: /* Do All repainting of ListBox */
506: WinEnableWindowUpdate( hwndList, TRUE );
507:
508: } /* UpdateListBox */
509:
510:
511: /****************************** Function Header ****************************\
512: *
513: * IniEditPaint
514: *
515: *
516: * Window Paint Routine
517: *
518: \***************************************************************************/
519:
520: VOID IniEditPaint()
521: {
522: RECTL rclWindow; // Current size of Main Window
523: RECTL rclBlit; // Size of Area to Blank for Title
524: CHAR szShowMode[MAX_STRING_LEN]; // String Description of mode
525:
526:
527: /* Get the size of the whole window */
528: WinQueryWindowRect( hwndIniEdit, &rclWindow );
529:
530: /* Paint the window Title Area */
531: rclBlit = rclWindow;
532: rclBlit.yBottom = rclBlit.yTop - usLineHeight;
533:
534: GpiBitBlt( hpsScreen, (HPS)NULL, 2L, (PPOINTL)&rclBlit, ROP_ONE, (LONG)NULL);
535:
536: /* Write the Title */
537: strcpy( szShowMode, usFormat == APP_FORM ? SZAPP : SZALL );
538: WinDrawText( hpsScreen, strlen(szShowMode), szShowMode, &rclWindow,
539: CLR_BLUE, CLR_WHITE, DT_CENTER|DT_TOP);
540:
541: } /* IniEditPaint */
542:
543:
544: /****************************** Function Header ****************************\
545: *
546: * IniEditWndProc
547: *
548: *
549: * Window Proc for IniEdit
550: *
551: \***************************************************************************/
552:
553: MRESULT EXPENTRY IniEditWndProc(HWND hwnd, USHORT msg,
554: MPARAM mp1, MPARAM mp2)
555: {
556:
557: CHAR szBuf[MAX_STRING_LEN]; // Input character Buffer
558: CHAR szBuf2[MAX_STRING_LEN]; // Second Input Character Buffer
559: USHORT Index; // Index of Current ListBox Item
560: USHORT TopIndex; // Current Top Item in ListBox
561: ULONG Handle; // ListBox Item Handle Info
562: HWND hwndDialog; // Window handle of Dailog Box
563: HWND hwndText; // Handle of current text window
564: HPS hpsPaint; // PS to Paint
565: RECTL rclPaint; // Rect in hpsPaint to Paint
566: BOOL fScroll = FALSE; // Scroll List Box Flag
567:
568:
569: /* Switch on message being processed */
570: switch( msg )
571: {
572: case WM_PAINT:
573: /* Paint the IniEdit window portion not covered by List Box */
574: hpsPaint = WinBeginPaint(hwnd, (HPS)NULL, &rclPaint);
575: IniEditPaint();
576: WinEndPaint(hpsPaint);
577: break;
578:
579: case WM_COMMAND:
580: /* If menu item call Processing Routine */
581: if( LOUSHORT( mp2 ) == CMDSRC_MENU )
582: ProcessMenuItem( hwnd, msg, mp1, mp2 );
583:
584: /* If accelorator call appropriate routine */
585: if( LOUSHORT( mp2 ) == CMDSRC_ACCELERATOR )
586: {
587: switch( LOUSHORT( mp1 ) )
588: {
589: case IDDI_SEARCH_NEXT:
590: FindNext();
591: break;
592: }
593: }
594: break;
595:
596: case WM_SIZE:
597: /* Put the list box in the correct location of the window */
598: if( hwndList != (HWND)NULL )
599: /* The position is set to fill the client, except for the */
600: /* area at the top for some text. In addition, the */
601: /* rectangle is outset by a border width on all dimensions*/
602: /* except for the top so that the list box border is */
603: /* "tucked" under the clients border and doesn't cause */
604: /* there to be a double thick border around it. */
605: WinSetWindowPos( hwndList, HWND_TOP, -cxBorder, -cyBorder,
606: SHORT1FROMMP(mp2)+(2*cxBorder),
607: SHORT2FROMMP(mp2)-usLineHeight + cyBorder,
608: SWP_SIZE | SWP_MOVE );
609: break;
610:
611: case WM_CONTROL:
612: /* Switch on Control activated */
613: switch( SHORT1FROMMP(mp1) )
614: {
615:
616: /*** Process List Box Activity ***/
617: case IDI_LIST:
618: /* was it a double click? */
619: if( SHORT2FROMMP(mp1) == LN_ENTER )
620: {
621: /* get the item clicked on */
622: Index = (USHORT)WinSendMsg( hwndList, LM_QUERYSELECTION,
623: (MPARAM)0, (MPARAM)0 );
624:
625: /* grab its text */
626: WinSendMsg( hwndList, LM_QUERYITEMTEXT,
627: MPFROM2SHORT(Index, MAX_STRING_LEN), MPFROMP(szBuf) );
628:
629: /* if in APP form toggle to ALL form */
630: if( usFormat == APP_FORM )
631: {
632: usFormat = ALL_FORM;
633: fScroll = TRUE;
634: }
635: else
636: {
637: /* if an App name was choosen then go to APP form */
638: if( szBuf[0] != ' ')
639: {
640: usFormat = APP_FORM;
641: fScroll = TRUE;
642: }
643: else
644: /* A Key Value Pair was double clicked
645: * allow editing of key Value
646: */
647: {
648:
649: FocusWindow = (HWND)1;
650:
651: hwndDialog = WinLoadDlg( HWND_DESKTOP,
652: hwndIniEditFrame, ChangeKeyWndProc,
653: (HMODULE)NULL, IDD_CHANGE_KEY, NULL);
654:
655: Handle = (ULONG)WinSendMsg( hwndList, LM_QUERYITEMHANDLE,
656: MPFROMSHORT(Index), (MPARAM)NULL );
657:
658: hwndText = WinWindowFromID( hwndDialog, IDDI_CHANGE_KEY_TEXT_APP );
659: WinSendMsg(hwndText, EM_SETTEXTLIMIT,
660: MPFROMSHORT(MAX_STRING_LEN), 0L);
661: WinSetWindowText( hwndText, pGroups[LOUSHORT(Handle)].szAppName);
662:
663: /* note bug in PMWin GPs if full segment */
664: hwndText = WinWindowFromID( hwndDialog, IDDI_CHANGE_KEY_TEXT_KEY );
665: WinSendMsg(hwndText, EM_SETTEXTLIMIT,
666: MPFROMSHORT(MAX_STRING_LEN), 0L);
667: strcpy( szBuf2, pGroups[LOUSHORT(Handle)].pPairs[HIUSHORT(Handle)].szKey );
668: WinSetWindowText( hwndText, szBuf2 );
669:
670: hwndText = WinWindowFromID( hwndDialog, IDDI_CHANGE_KEY_TEXT_VAL );
671: WinSendMsg(hwndText, EM_SETTEXTLIMIT,
672: MPFROMSHORT(MAX_STRING_LEN), 0L);
673: strcpy( szBuf2, pGroups[LOUSHORT(Handle)].pPairs[HIUSHORT(Handle)].szValue );
674: WinSetWindowText( hwndText, szBuf2 );
675:
676: WinPostMsg( hwndText, EM_SETSEL,
677: MPFROM2SHORT(0, strlen(szBuf2)), (MPARAM)0 );
678:
679: if( WinProcessDlg( hwndDialog ) == IDDI_CHANGE_KEY_OK )
680: {
681: TopIndex = (USHORT)WinSendMsg( hwndList, LM_QUERYTOPINDEX,
682: (MPARAM)NULL, (MPARAM)NULL );
683:
684: UpdateListBox( TRUE, usFormat );
685:
686: /* scroll to top */
687: WinSendMsg( hwndList, LM_SETTOPINDEX,
688: MPFROMSHORT(TopIndex), (MPARAM)NULL );
689:
690: /* make the item selected */
691: WinSendMsg( hwndList, LM_SELECTITEM,
692: MPFROMSHORT(Index), MPFROMSHORT(TRUE) );
693:
694: /* make selected */
695: }
696:
697: WinDestroyWindow( hwndDialog );
698: }
699: }
700:
701: /* Make the double clicked item selected in new form */
702: if( fScroll )
703: {
704: /* put in correct form */
705: UpdateListBox( FALSE, usFormat );
706:
707: /* get the index of the item clicked on */
708: Index = (USHORT)WinSendMsg( hwndList, LM_SEARCHSTRING,
709: MPFROM2SHORT(LSS_SUBSTRING, LIT_FIRST),
710: MPFROMP(szBuf) );
711:
712: /* scroll that item to the top */
713: WinSendMsg( hwndList, LM_SETTOPINDEX,
714: MPFROMSHORT(Index), (MPARAM)NULL );
715:
716: /* make the item selected */
717: WinSendMsg( hwndList, LM_SELECTITEM,
718: MPFROMSHORT(Index), MPFROMSHORT(TRUE) );
719: }
720: } /* if ENTER */
721: }
722: break;
723:
724: default:
725: return WinDefWindowProc(hwnd, msg, mp1, mp2);
726: break;
727: }
728:
729: return 0L;
730:
731: } /* IniEditWndProc */
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.