![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to cfinput.c CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [OS/2 SDKs] / pmsdk / samples / newcard|
Return to cfinput.c CVS log | Up to [OS/2 SDKs] / pmsdk / samples / newcard |
1.1 ! root 1: #define NORASTEROPS ! 2: #define NOSYSCOMMANDS ! 3: #include "cardfile.h" ! 4: ! 5: /*********************************************************************/ ! 6: /* Windows/PM Cardfile Shared Code */ ! 7: /* */ ! 8: /* (c) Copyright Microsoft Corp. 1987,1988 - All Rights Reserved */ ! 9: /*********************************************************************/ ! 10: ! 11: /*********************************************************************/ ! 12: /* The following shared code was developed from the original */ ! 13: /* Cardfile application. This code can be compiled to run under */ ! 14: /* either the Windows or the PM manager environment. All */ ! 15: /* functionality associated with bitmaps or printing has been */ ! 16: /* deleted. Some comments refering to these functions may still be */ ! 17: /* present in the code and should be disregarded. jw. */ ! 18: /*********************************************************************/ ! 19: ! 20: ! 21: /*********************************************************************/ ! 22: /* CardfileInput - */ ! 23: /* This routine handles all the menu commands in Cardfile. */ ! 24: /* */ ! 25: /* Slightly different for PM and Windows */ ! 26: /*********************************************************************/ ! 27: ! 28: void CardfileInput(hWindow, event) ! 29: HWND hWindow; ! 30: int event; ! 31: { ! 32: PSTR pchBuf; ! 33: PSTR pchFile; ! 34: LPCARDHEADER lpCards; ! 35: unsigned long lTemp; ! 36: OFSTRUCT ofStruct; ! 37: ! 38: /* which menu command was it */ ! 39: switch(event) ! 40: { ! 41: case IDM_ABOUT: ! 42: /* about dialog box */ ! 43: PutUpDB(DTABOUT); ! 44: break; ! 45: case IDM_NEW: ! 46: /* create a new cardfile */ ! 47: if (fReadOnly) ! 48: break; ! 49: ! 50: /* make sure we save any changes the user made */ ! 51: if (!MaybeSaveFile()) ! 52: /* the user cancelled in the save changes dialog */ ! 53: break; ! 54: ! 55: ! 56: CurIFile[0] = 0; ! 57: CurIFind[0] = 0; ! 58: SetCaption(); ! 59: ! 60: /* get rid of the old temp file */ ! 61: Fdelete(TmpFile); ! 62: ! 63: /* create a new one */ ! 64: MakeTmpFile(); ! 65: ! 66: /* there's only one card in a new cardfile shrinking */ ! 67: /* or leaving the same size, so this should always work */ ! 68: GlobalReAlloc(hCards, (long)sizeof(CARDHEADER),GMEM_MOVEABLE); ! 69: cCards = 1; ! 70: iFirstCard = 0; ! 71: iTopCard = 0; ! 72: SetScrRangeAndPos(); ! 73: ! 74: /* Set up CurCardHead */ ! 75: MakeBlankCard(); ! 76: ! 77: /* Save blank card in data structure */ ! 78: lpCards = (LPCARDHEADER) GlobalLock(hCards); ! 79: *lpCards = CurCardHead; ! 80: GlobalUnlock(hCards); ! 81: ! 82: /* when in phone book mode, not making changes so must */ ! 83: /* save now */ ! 84: if (CardPhone == IDM_PHONEBOOK) ! 85: SaveCurrentCard(iFirstCard); ! 86: ! 87: /* make sure the window gets repainted */ ! 88: InvalidateRect(hWindow, (LPRECT)NULL, TRUE); ! 89: ! 90: /* clean file */ ! 91: fFileDirty = FALSE; ! 92: ! 93: /* make sure that any selection gets repainted for empty card */ ! 94: if (CardPhone == IDM_CARDFILE) ! 95: { ! 96: SetFocus(NULL); ! 97: SetFocus(hCardWnd); ! 98: } ! 99: break; ! 100: ! 101: case IDM_OPEN: ! 102: /* opening an existing file */ ! 103: /* make sure that any changes get saved */ ! 104: if(MaybeSaveFile()) ! 105: { ! 106: /* put up dialog box, and if user hits ok, open file */ ! 107: if (pchBuf = PutUpDB(DTOPEN)) ! 108: { ! 109: if (!DoOpen(pchBuf)) ! 110: SetCurCard(iFirstCard); ! 111: LocalFree((HANDLE)pchBuf); ! 112: } ! 113: else ! 114: /* user cancelled open dialog box */ ! 115: SetCurCard(iFirstCard); ! 116: } ! 117: break; ! 118: ! 119: case IDM_MERGE: ! 120: /* merge in another file */ ! 121: DoMerge(); ! 122: break; ! 123: ! 124: case IDM_SAVE: ! 125: case IDM_SAVEAS: ! 126: /* save the file */ ! 127: pchFile = NULL; ! 128: /* if doing a SAVE, and file is named, use current name */ ! 129: if (event == IDM_SAVE && CurIFile[0]) ! 130: pchFile = CurIFile; ! 131: /* else ask the user for a name */ ! 132: else if (GetNewFileName(&ofStruct)) ! 133: pchFile = ofStruct.szPathName; ! 134: /* if there is a name to save it to */ ! 135: if (pchFile) ! 136: { ! 137: /* get the current selection if in cardfile mode */ ! 138: if (CardPhone == IDM_CARDFILE) ! 139: lTemp = SendMessage(hCardWnd, EM_GETSEL, 0, 0L); ! 140: /* if in phonebook mode, or if in cardfile mode and */ ! 141: /* able to save the front card */ ! 142: if (CardPhone == IDM_PHONEBOOK || ! 143: SaveCurrentCard(iFirstCard)) ! 144: { ! 145: /* write the file out */ ! 146: if (WriteCardFile(pchFile)) ! 147: { ! 148: /* reset the caption */ ! 149: SetCaption(); ! 150: /* start a new temp file */ ! 151: Fdelete(TmpFile); ! 152: MakeTmpFile(); ! 153: } ! 154: /* if in cardfile mode */ ! 155: if (CardPhone == IDM_CARDFILE) ! 156: { ! 157: /* get contents of front card again, and set */ ! 158: /* selection*/ ! 159: SetCurCard(iFirstCard); ! 160: #ifdef IN_WINDOWS ! 161: /* Unfortunately, the parameters for the EM_SETSEL */ ! 162: /* message are reversed in PM and Windows - the */ ! 163: /* easiest way to deal with this is to have */ ! 164: /* separate SendMessage calls */ ! 165: ! 166: SendMessage(hCardWnd, EM_SETSEL, 0, lTemp); ! 167: #else ! 168: SendMessage(hCardWnd, EM_SETSEL, lTemp, 0L); ! 169: #endif ! 170: } ! 171: } ! 172: } ! 173: break; ! 174: ! 175: case IDM_CARDFILE: ! 176: case IDM_PHONEBOOK: ! 177: /* change display modes */ ! 178: if (event != CardPhone) ! 179: { ! 180: /* if changing to phonebook */ ! 181: if (event == IDM_PHONEBOOK) ! 182: { ! 183: /* save data in card */ ! 184: if (!SaveCurrentCard(iFirstCard)) ! 185: /* if it doesn't work, stop */ ! 186: break; ! 187: } ! 188: /* else changing to cardfile mode */ ! 189: else ! 190: { ! 191: /* set the text in the front card */ ! 192: SetCurCard(iFirstCard); ! 193: } ! 194: /* save new mode */ ! 195: CardPhone = event; ! 196: /* turn off old scroll bar */ ! 197: /* This define calls SetScrollRange and SetScrollPos */ ! 198: SCROLL_RANGE(hWindow, event == IDM_PHONEBOOK ? ! 199: SB_HORZ : SB_VERT, 0, 0, 0); ! 200: ! 201: /* if phonebook, get rid of edit control, otherwise reactivate */ ! 202: ShowWindow(hCardWnd, ! 203: event == IDM_PHONEBOOK ? HIDE_WINDOW : SHOW_OPENWINDOW); ! 204: ! 205: #ifdef IN_WINDOWS ! 206: /* In PM, the way in which the update is turned off is */ ! 207: /* through a function. There is no easy way to have */ ! 208: /* the SendMessage calls in Windows map into separate */ ! 209: /* functions in PM, so they are in #ifdefs */ ! 210: ! 211: SendMessage(hCardWnd, WM_SETREDRAW, ! 212: event == IDM_CARDFILE, 0L); ! 213: #else ! 214: WinEnableWindowUpdate( hCardWnd, event == IDM_CARDFILE ); ! 215: #endif ! 216: ! 217: /* if phonbook, make sure that topcard is valid */ ! 218: if (event == IDM_PHONEBOOK) ! 219: SetTopCard(); ! 220: /* set up new scroll bar */ ! 221: SetScrRangeAndPos(); ! 222: /* set focus to right place */ ! 223: SetFocus(event == IDM_PHONEBOOK ? hCardfileWnd : hCardWnd); ! 224: /* force a repaint */ ! 225: InvalidateRect(hWindow, (LPRECT)NULL, TRUE); ! 226: } ! 227: break; ! 228: case IDM_HEADER: ! 229: /* if in phone book mode, make sure information is in right place */ ! 230: if (CardPhone == IDM_PHONEBOOK) ! 231: { ! 232: SetCurCard(iFirstCard); ! 233: SaveCurrentCard(iFirstCard); ! 234: } ! 235: /* put up dialog box */ ! 236: if(pchBuf = PutUpDB(DTHEADER)) ! 237: { ! 238: /* save new header */ ! 239: Mylstrcpy((LPSTR)CurCardHead.line, (LPSTR)pchBuf); ! 240: ! 241: /* take it out of it's current position */ ! 242: DeleteCard(iFirstCard); ! 243: ! 244: /* and put it back in the right place */ ! 245: iFirstCard = AddCurCard(); ! 246: ! 247: SetScrRangeAndPos(); /* set position */ ! 248: fFileDirty = TRUE; ! 249: InvalidateRect(hWindow, (LPRECT)NULL, TRUE); ! 250: LocalFree((HANDLE)pchBuf); ! 251: } ! 252: break; ! 253: ! 254: case IDM_RESTORE: ! 255: /* get the old information */ ! 256: SetCurCard(iFirstCard); ! 257: InvalidateRect(hCardWnd, (LPRECT)NULL, TRUE); ! 258: break; ! 259: ! 260: case IDM_CUT: ! 261: case IDM_COPY: ! 262: DoCutCopy(event); ! 263: break; ! 264: ! 265: case IDM_PASTE: ! 266: DoPaste(); ! 267: break; ! 268: ! 269: case IDM_ADD: ! 270: /* get the new header for the new card */ ! 271: if(pchBuf = PutUpDB(DTADD)) ! 272: { ! 273: /* allocate space for new card */ ! 274: lTemp = (cCards+1) * sizeof(CARDHEADER); ! 275: if (!GlobalReAlloc(hCards, lTemp,GMEM_MOVEABLE)) ! 276: CardfileOkError(IDS_EINSMEMORY); ! 277: else ! 278: { ! 279: /* if in phone book mode, or can save current card */ ! 280: if (CardPhone == IDM_PHONEBOOK || ! 281: SaveCurrentCard(iFirstCard)) ! 282: { ! 283: /* make a blank card */ ! 284: MakeBlankCard(); ! 285: ! 286: /* save the header */ ! 287: Mylstrcpy((LPSTR)CurCardHead.line, (LPSTR)pchBuf); ! 288: ! 289: /* the card is dirty */ ! 290: CurCardHead.flags |= (FDIRTY + FNEW); ! 291: ! 292: /* add the card */ ! 293: iFirstCard = AddCurCard(); ! 294: ! 295: /* make sure that top card is correct */ ! 296: if (CardPhone == IDM_PHONEBOOK) ! 297: SetTopCard(); ! 298: ! 299: /* set new scroll information */ ! 300: SetScrRangeAndPos(); ! 301: ! 302: /* if in phone book mode, need to save immediately */ ! 303: if (CardPhone == IDM_PHONEBOOK) ! 304: SaveCurrentCard(iFirstCard); ! 305: ! 306: /* else, force redraw of correct highlighting */ ! 307: else ! 308: { ! 309: SetFocus(NULL); ! 310: SetFocus(hCardWnd); ! 311: } ! 312: ! 313: /* force repaint */ ! 314: InvalidateRect(hWindow, (LPRECT)NULL, TRUE); ! 315: } ! 316: } ! 317: LocalFree((HANDLE)pchBuf); ! 318: } ! 319: break; ! 320: ! 321: case IDM_DELETE: ! 322: /* if in phone book mode */ ! 323: if (CardPhone == IDM_PHONEBOOK) ! 324: { ! 325: /* get information */ ! 326: SetCurCard(iFirstCard); ! 327: ! 328: /* save it in case of cancel */ ! 329: SaveCurrentCard(iFirstCard); ! 330: } ! 331: ! 332: /* ask user for confirmation */ ! 333: if (MyMessageBox(IDS_DELCURCARD, ! 334: CurCardHead.line, ! 335: MB_OKCANCEL | MB_ICONQUESTION | MB_DEFBUTTON2) == IDOK) ! 336: { ! 337: ! 338: /* if not last card */ ! 339: if (cCards > 1) ! 340: { ! 341: /* get rid of it */ ! 342: DeleteCard(iFirstCard); ! 343: if (iFirstCard == cCards) ! 344: if (CardPhone == IDM_CARDFILE) ! 345: iFirstCard = 0; ! 346: else ! 347: iFirstCard = cCards-1; ! 348: ! 349: /* change scroll information */ ! 350: SetScrRangeAndPos(); ! 351: ! 352: /* if in card mode, get card's information */ ! 353: if (CardPhone == IDM_CARDFILE) ! 354: SetCurCard(iFirstCard); ! 355: ! 356: /* shrinking, so don't have to check */ ! 357: lTemp = cCards * sizeof(CARDHEADER); ! 358: GlobalReAlloc(hCards, lTemp, GMEM_MOVEABLE); ! 359: } ! 360: /* else, last card */ ! 361: else ! 362: { ! 363: /* make it blank */ ! 364: MakeBlankCard(); ! 365: ! 366: /* store the info */ ! 367: lpCards = (LPCARDHEADER) GlobalLock(hCards); ! 368: *lpCards = CurCardHead; ! 369: GlobalUnlock(hCards); ! 370: ! 371: /* save the info in phonebook mode */ ! 372: if (CardPhone == IDM_PHONEBOOK) ! 373: SaveCurrentCard(iFirstCard); ! 374: } ! 375: /* dirty file and window */ ! 376: fFileDirty = TRUE; ! 377: InvalidateRect(hWindow, (LPRECT)NULL, TRUE); ! 378: } ! 379: break; ! 380: ! 381: case IDM_DUPLICATE: ! 382: /* make sure there's room */ ! 383: lTemp = (cCards + 1) * sizeof(CARDHEADER); ! 384: if (!GlobalReAlloc(hCards, lTemp, GMEM_MOVEABLE)) ! 385: CardfileOkError(IDS_EINSMEMORY); ! 386: else ! 387: { ! 388: /* there is, save current card */ ! 389: if (CardPhone == IDM_PHONEBOOK || ! 390: SaveCurrentCard(iFirstCard)) ! 391: { ! 392: /* get information */ ! 393: SetCurCard(iFirstCard); ! 394: CurCardHead.flags |= (FDIRTY + FNEW); ! 395: ! 396: /* add it */ ! 397: iFirstCard = AddCurCard(); ! 398: if (CardPhone == IDM_PHONEBOOK) ! 399: { ! 400: SaveCurrentCard(iFirstCard); ! 401: SetTopCard(); ! 402: } ! 403: ! 404: /* set new scroll information */ ! 405: SetScrRangeAndPos(); ! 406: InvalidateRect(hWindow, (LPRECT)NULL, TRUE); ! 407: fFileDirty = TRUE; ! 408: } ! 409: } ! 410: break; ! 411: ! 412: case IDM_GOTO: ! 413: /* search headers */ ! 414: if (pchBuf = PutUpDB(DTGOTO)) ! 415: { ! 416: DoGoto(pchBuf); ! 417: LocalFree((HANDLE)pchBuf); ! 418: } ! 419: break; ! 420: ! 421: case IDM_FINDNEXT: ! 422: /* search body of card */ ! 423: if (CurIFind[0]) ! 424: { ! 425: FindStrCard(); ! 426: break; ! 427: } ! 428: ! 429: case IDM_FIND: ! 430: /* search for a pattern */ ! 431: if(pchBuf = PutUpDB(DTFIND)) ! 432: { ! 433: /* save the pattern */ ! 434: Mylstrcpy((LPSTR)CurIFind, (LPSTR)pchBuf); ! 435: FindStrCard(); ! 436: LocalFree((HANDLE)pchBuf); ! 437: } ! 438: break; ! 439: ! 440: default: ! 441: break; ! 442: } ! 443: } ! 444: ! 445: /*********************************************************************/ ! 446: /* SetTopCard - */ ! 447: /* This routine is called in phone mode to figure out which */ ! 448: /* header should appear at the top of the window */ ! 449: /* */ ! 450: /* Slightly different for PM and Windows */ ! 451: /*********************************************************************/ ! 452: ! 453: void SetTopCard() ! 454: { ! 455: RECT rect; ! 456: int i; ! 457: ! 458: GetClientRect(hCardfileWnd, (LPRECT)&rect); ! 459: ! 460: #ifdef IN_WINDOWS ! 461: /* In PM, the height of a window after a GetClientRect call is */ ! 462: /* stored in yTop (the origin is based on the bottom */ ! 463: ! 464: i = rect.bottom / CharFixHeight; ! 465: #else ! 466: i = rect.yTop / CharFixHeight; ! 467: #endif ! 468: ! 469: if (!i) ! 470: i = 1; ! 471: iTopCard = min(iFirstCard-(i-1)/2, (cCards - i)); ! 472: if (iTopCard < 0) ! 473: iTopCard = 0; ! 474: } ! 475: ! 476: /*********************************************************************/ ! 477: /* PutUpDB - */ ! 478: /* Calls routine to put up requested dialog box */ ! 479: /* */ ! 480: /* Same for PM and Windows */ ! 481: /*********************************************************************/ ! 482: ! 483: PSTR PutUpDB(idb) ! 484: int idb; ! 485: { ! 486: FARPROC lpdbProc; ! 487: ! 488: DBcmd = idb; ! 489: switch(idb) ! 490: { ! 491: case DTMERGE: ! 492: case DTOPEN: ! 493: lpdbProc = lpfnOpen; ! 494: break; ! 495: case DTSAVE: ! 496: lpdbProc = lpfnSave; ! 497: break; ! 498: case DTABOUT: ! 499: lpdbProc = lpfnAbout; ! 500: break; ! 501: default: ! 502: lpdbProc = lpDlgProc; ! 503: break; ! 504: } ! 505: return((PSTR)DialogBox(hCardfileInstance, ! 506: MAKEINTRESOURCE(idb), hCardfileWnd, lpdbProc)); ! 507: } ! 508: ! 509: /*********************************************************************/ ! 510: /* UpdateMenu - */ ! 511: /* This routine initializes the menu every time it is about */ ! 512: /* to be displayed for the user */ ! 513: /* */ ! 514: /* Same for PM and Windows */ ! 515: /*********************************************************************/ ! 516: ! 517: void UpdateMenu() ! 518: { ! 519: HMENU hMenu; ! 520: long lSelection; ! 521: int wFmt; ! 522: int mfPaste; ! 523: ! 524: hMenu = GetMenu(hCardfileWnd); ! 525: CheckMenuItem(hMenu, IDM_CARDFILE, ! 526: CardPhone == IDM_CARDFILE ? MF_CHECKED : MF_UNCHECKED); ! 527: CheckMenuItem(hMenu, IDM_PHONEBOOK, ! 528: CardPhone == IDM_PHONEBOOK ? MF_CHECKED : MF_UNCHECKED); ! 529: ! 530: if (CardPhone == IDM_CARDFILE) ! 531: { ! 532: mfPaste = MF_GRAYED; ! 533: if (OpenClipboard(hCardfileWnd)) ! 534: { ! 535: wFmt = 0; ! 536: ! 537: while (wFmt = EnumClipboardFormats(wFmt)) ! 538: { ! 539: if (wFmt == CF_TEXT) ! 540: { ! 541: mfPaste = MF_ENABLED; ! 542: break; ! 543: } ! 544: } ! 545: ! 546: CloseClipboard(); ! 547: } ! 548: EnableMenuItem(hMenu, IDM_PASTE, mfPaste); ! 549: ! 550: EnableMenuItem(hMenu, IDM_RESTORE, MF_ENABLED); ! 551: EnableMenuItem(hMenu, IDM_FIND, MF_ENABLED); ! 552: EnableMenuItem(hMenu, IDM_FINDNEXT, MF_ENABLED); ! 553: ! 554: lSelection = SendMessage(hCardWnd, EM_GETSEL, 0, 0L); ! 555: if (HIWORD(lSelection) == LOWORD(lSelection)) ! 556: { ! 557: EnableMenuItem(hMenu, IDM_CUT, MF_GRAYED); ! 558: EnableMenuItem(hMenu, IDM_COPY, MF_GRAYED); ! 559: } ! 560: else ! 561: { ! 562: EnableMenuItem(hMenu, IDM_CUT, MF_ENABLED); ! 563: EnableMenuItem(hMenu, IDM_COPY, MF_ENABLED); ! 564: } ! 565: } ! 566: else ! 567: { ! 568: EnableMenuItem(hMenu, IDM_RESTORE, MF_GRAYED); ! 569: EnableMenuItem(hMenu, IDM_CUT, MF_GRAYED); ! 570: EnableMenuItem(hMenu, IDM_COPY, MF_GRAYED); ! 571: EnableMenuItem(hMenu, IDM_PASTE, MF_GRAYED); ! 572: EnableMenuItem(hMenu, IDM_FIND, MF_GRAYED); ! 573: EnableMenuItem(hMenu, IDM_FINDNEXT, MF_GRAYED); ! 574: } ! 575: } ! 576: ! 577: ! 578: /*********************************************************************/ ! 579: /* SetEditText - */ ! 580: /* This routine sets the contents of the edit control */ ! 581: /* */ ! 582: /* Same for PM and Windows */ ! 583: /*********************************************************************/ ! 584: ! 585: void FAR SetEditText(lpText) ! 586: LPSTR lpText; ! 587: { ! 588: SetWindowText(hCardWnd, lpText); ! 589: #ifndef IN_WINDOWS ! 590: /* In PM, the Edit control doesn't initialize the modify flag to */ ! 591: /* False after a SetWindowText call. Read state of modify flag */ ! 592: /* to reset the flag. */ ! 593: ! 594: SendMessage(hCardWnd, EM_GETMODIFY, 0, 0L); ! 595: #endif ! 596: } ! 597: ! 598: ! 599: /*********************************************************************/ ! 600: /* CardfileMouse - */ ! 601: /* This handles all mouse input to main window. Mouse input in */ ! 602: /* the edit control will get sent to CardWndProc */ ! 603: /* */ ! 604: /* Same for PM and Windows */ ! 605: /*********************************************************************/ ! 606: ! 607: void CardfileMouse(hWindow, message, pt) ! 608: HWND hWindow; ! 609: int message; ! 610: POINT pt; ! 611: { ! 612: RECT rect; ! 613: int iCard; ! 614: HDC hDC; ! 615: int y; ! 616: MSG msg; ! 617: ! 618: if (CardPhone == IDM_CARDFILE) ! 619: { ! 620: /* see if click on a card or background */ ! 621: if ((iCard = MapPtToCard(pt)) > -1) ! 622: { ! 623: /* if on another card */ ! 624: if (iCard != iFirstCard) ! 625: { ! 626: /* bring it to front */ ! 627: CardfileScroll(hCardfileWnd, SB_THUMBTRACK, iCard); ! 628: CardfileScroll(hCardfileWnd, SB_THUMBPOSITION, iCard); ! 629: } ! 630: /* else if double click on first */ ! 631: else if (message == WM_LBUTTONDBLCLK) ! 632: { ! 633: /* bring up header box */ ! 634: SetCapture(hCardfileWnd); ! 635: while(GetKeyState(VK_LBUTTON) < 0) ! 636: { ! 637: PeekMessage((LPMSG)&msg, NULL, WM_MOUSEFIRST, ! 638: WM_MOUSELAST, TRUE); ! 639: PeekMessage((LPMSG)&msg, NULL, WM_KEYFIRST, ! 640: WM_KEYLAST, TRUE); ! 641: } ! 642: ReleaseCapture(); ! 643: CardfileInput(hWindow, IDM_HEADER); ! 644: } ! 645: } ! 646: } ! 647: else /* phone book mode */ ! 648: { ! 649: /* figure out which header the user clicked on */ ! 650: TRANSLATE_COORDS( cyMainWindow ); ! 651: ! 652: iCard = iTopCard + (TRANSLATE_Y(pt.y) / CharFixHeight); ! 653: if (message == WM_LBUTTONDOWN || iCard != iFirstCard) ! 654: { ! 655: /* single click, change selection */ ! 656: if (iCard < cCards) ! 657: { ! 658: y = (iFirstCard - iTopCard) * CharFixHeight; ! 659: hDC = GetDC(hWindow); ! 660: SetRect((LPRECT)&rect, 0, y, ! 661: (LINELENGTH+2)*CharFixWidth, y+CharFixHeight); ! 662: TRANSLATE_RECT( rect ); ! 663: ! 664: InvertRect(hDC, (LPRECT)&rect); ! 665: iFirstCard = iCard; ! 666: y = (iFirstCard - iTopCard) * CharFixHeight; ! 667: SetRect((LPRECT)&rect, 0, y, ! 668: (LINELENGTH+2)*CharFixWidth, y+CharFixHeight); ! 669: TRANSLATE_RECT( rect ); ! 670: ! 671: InvertRect(hDC, (LPRECT)&rect); ! 672: ReleaseDC(hWindow, hDC); ! 673: } ! 674: } ! 675: else /* double click on cur card */ ! 676: { ! 677: /* bring up header box */ ! 678: if (iCard < cCards) ! 679: { ! 680: while(!PeekMessage((LPMSG)&msg, NULL, WM_LBUTTONUP, ! 681: WM_LBUTTONUP, TRUE)) ! 682: ; ! 683: CardfileInput(hWindow, IDM_HEADER); ! 684: } ! 685: } ! 686: TRANSLATE_COORDS( 0 ); ! 687: } ! 688: } ! 689: ! 690: /*********************************************************************/ ! 691: /* GetNewCard - */ ! 692: /* This routine is called when a card which is brought forward */ ! 693: /* via a keystroke (i.e. ctrl-letter) */ ! 694: /* */ ! 695: /* Same for PM and Windows */ ! 696: /*********************************************************************/ ! 697: ! 698: BOOL FAR GetNewCard(iOldCard, iNewCard) ! 699: int iOldCard; ! 700: int iNewCard; ! 701: { ! 702: HDC hDC; ! 703: RECT rect; ! 704: int y; ! 705: ! 706: /* if phonebook mode */ ! 707: if (CardPhone == IDM_PHONEBOOK) ! 708: { ! 709: /* unselect old card */ ! 710: y = (iOldCard - iTopCard) * CharFixHeight; ! 711: hDC = GetDC(hCardfileWnd); ! 712: ! 713: TRANSLATE_COORDS( cyMainWindow ); ! 714: SetRect((LPRECT)&rect, 0, y, (LINELENGTH+2)*CharFixWidth, ! 715: y+CharFixHeight); ! 716: TRANSLATE_RECT( rect ); ! 717: TRANSLATE_COORDS( 0 ); ! 718: ! 719: InvertRect(hDC, (LPRECT)&rect); ! 720: ReleaseDC(hCardfileWnd, hDC); ! 721: /* get new one */ ! 722: BringCardOnScreen(iFirstCard = iNewCard); ! 723: } ! 724: else ! 725: { ! 726: /* send scroll messages */ ! 727: CardfileScroll(hCardfileWnd, SB_THUMBTRACK, iNewCard); ! 728: return(CardfileScroll(hCardfileWnd, SB_THUMBPOSITION, iNewCard)); ! 729: } ! 730: return(TRUE); ! 731: } ! 732: ! 733: /*********************************************************************/ ! 734: /* MapPtToCard - */ ! 735: /* Map mouse coordinates to a particular card. This is called in */ ! 736: /* card mode only */ ! 737: /* */ ! 738: /* Same for PM and Windows */ ! 739: /*********************************************************************/ ! 740: ! 741: int MapPtToCard(pt) ! 742: POINT pt; ! 743: { ! 744: int idCard; ! 745: int xCur; ! 746: int yCur; ! 747: int i; ! 748: RECT rect; ! 749: ! 750: yCur = yFirstCard - (cScreenCards - 1)*ySpacing; ! 751: xCur = xFirstCard + (cScreenCards - 1)* (2 * CharFixWidth); ! 752: idCard = (iFirstCard + cScreenCards-1) % cCards; ! 753: ! 754: TRANSLATE_COORDS( cyMainWindow ); ! 755: ! 756: for (i = 0; i < cScreenCards; ++i) ! 757: { ! 758: SetRect((LPRECT)&rect, xCur+1, yCur+1, xCur+CardWidth-1, ! 759: yCur+CharFixHeight+1); ! 760: TRANSLATE_RECT( rect ); ! 761: ! 762: if (PtInRect((LPRECT)&rect, pt)) ! 763: return(idCard); ! 764: ! 765: SetRect((LPRECT)&rect, rect.right - 2*CharFixWidth + 2, ! 766: yCur+1,rect.right,yCur-1+CardHeight); ! 767: TRANSLATE_RECT( rect ); ! 768: ! 769: if (PtInRect((LPRECT)&rect, pt)) ! 770: return(idCard); ! 771: xCur -= (2*CharFixWidth); ! 772: yCur += ySpacing; ! 773: idCard--; ! 774: if (idCard < 0) ! 775: idCard = cCards - 1; ! 776: } ! 777: TRANSLATE_COORDS( 0 ); ! 778: ! 779: return(-1); ! 780: } ! 781: ! 782: /*********************************************************************/ ! 783: /* CardfileOkError - */ ! 784: /* Puts up a dialog box with only an ok button */ ! 785: /* */ ! 786: /* Same for PM and Windows */ ! 787: /*********************************************************************/ ! 788: ! 789: void FAR CardfileOkError(strid) ! 790: int strid; ! 791: { ! 792: MyMessageBox(strid, NULL, MB_OK | MB_ICONEXCLAMATION); ! 793: } ! 794: ! 795: ! 796: /*********************************************************************/ ! 797: /* MyMessageBox - */ ! 798: /* Puts up error message for strid, possibly merging in a string, */ ! 799: /* and asks for the appropriate buttons and icons */ ! 800: /* */ ! 801: /* Same for PM and Windows */ ! 802: /*********************************************************************/ ! 803: ! 804: WORD FAR MyMessageBox(strid, pchMerge, style) ! 805: WORD strid; ! 806: PSTR pchMerge; ! 807: WORD style; ! 808: { ! 809: char buf1[128]; ! 810: char buf2[128]; ! 811: ! 812: if (strid == IDS_EINSMEMORY) ! 813: Mylstrcpy((LPSTR)buf1, (LPSTR)NotEnoughMem); ! 814: else ! 815: LoadString(hCardfileInstance, strid, (LPSTR)buf1, 128); ! 816: MergeStrings((LPSTR)buf1, (LPSTR)pchMerge, (LPSTR)buf2); ! 817: return(MessageBox(hCardfileWnd, (LPSTR)buf2, ! 818: (LPSTR)rgchCardfile, style)); ! 819: } ! 820: ! 821: ! 822: /*********************************************************************/ ! 823: /* MergeStrings - */ ! 824: /* Scans sz1 for merge spec. If found, insert string sz2 at that */ ! 825: /* point. Then append rest of sz1 NOTE! Merge spec guaranteed to be */ ! 826: /* two chars. Returns TRUE if it does a merge, false otherwise. */ ! 827: /* */ ! 828: /* Same for PM and Windows */ ! 829: /*********************************************************************/ ! 830: ! 831: BOOL FAR MergeStrings(lpszSrc, lpszMerge, lpszDst) ! 832: LPSTR lpszSrc; ! 833: LPSTR lpszMerge; ! 834: LPSTR lpszDst; ! 835: { ! 836: LPSTR lpchSrc; ! 837: LPSTR lpchDst; ! 838: ! 839: lpchSrc = lpszSrc; ! 840: lpchDst = lpszDst; ! 841: ! 842: /* Find merge spec if there is one. */ ! 843: while (*(unsigned far *)lpchSrc != wMerge) { ! 844: *lpchDst++ = *lpchSrc; ! 845: ! 846: /* If we reach end of string before merge spec, just return. */ ! 847: if (!*lpchSrc++) ! 848: return FALSE; ! 849: ! 850: } ! 851: /* If merge spec found, insert sz2 there. (check for null merge string */ ! 852: if (lpszMerge) { ! 853: while (*lpszMerge) ! 854: *lpchDst++ = *lpszMerge++; ! 855: ! 856: } ! 857: ! 858: /* Jump over merge spec */ ! 859: lpchSrc++,lpchSrc++; ! 860: ! 861: ! 862: /* Now append rest of Src String */ ! 863: while (*lpchDst++ = *lpchSrc++); ! 864: return TRUE; ! 865: ! 866: } ! 867: ! 868: /*********************************************************************/ ! 869: /* MakeBlankCard - */ ! 870: /* */ ! 871: /* Same for PM and Windows */ ! 872: /*********************************************************************/ ! 873: ! 874: void MakeBlankCard() ! 875: { ! 876: CurCardHead.line[0] = 0; ! 877: CurCard.hBitmap = 0; ! 878: SetEditText((LPSTR)""); ! 879: CurCardHead.flags = FNEW; ! 880: } ! 881: ! 882: ! 883: /*********************************************************************/ ! 884: /* SetCaption - */ ! 885: /* Sets cardfile's window caption */ ! 886: /* */ ! 887: /* Same for PM and Windows */ ! 888: /*********************************************************************/ ! 889: ! 890: void SetCaption() ! 891: { ! 892: char buf[40]; ! 893: BuildCaption(buf); ! 894: SetWindowText( FRAME(hCardfileWnd), (LPSTR)buf ); ! 895: } ! 896: ! 897: /*********************************************************************/ ! 898: /* BuildCaption - */ ! 899: /* Creates the string that will appear in the window, or in the */ ! 900: /* spooled file list */ ! 901: /* */ ! 902: /* Same for PM and Windows */ ! 903: /*********************************************************************/ ! 904: ! 905: void FAR BuildCaption(pchBuf) ! 906: char *pchBuf; ! 907: { ! 908: char *pch; ! 909: char *pch3; ! 910: ! 911: /* always starts off "Cardfile - " */ ! 912: Mylstrcpy((LPSTR)pchBuf, (LPSTR)rgchCardfile); ! 913: Mylstrcat((LPSTR)pchBuf, (LPSTR)" - "); ! 914: /* if named, append just filename */ ! 915: if (CurIFile[0]) ! 916: { ! 917: pch = CurIFile; ! 918: pch3 = pch; ! 919: /* scan to end */ ! 920: for ( ; *pch; ++pch) ! 921: ; ! 922: /* run backwards looking for beginning of filename */ ! 923: while (pch > pch3 && *pch != '\\') ! 924: pch = (PSTR)AnsiPrev(pch3, pch); ! 925: /* if at slash, point to filename */ ! 926: if (*pch == '\\') ! 927: pch++; ! 928: Mylstrcat((LPSTR)pchBuf, (LPSTR)pch); ! 929: } ! 930: /* if unnamed, append "Untitled" */ ! 931: else ! 932: Mylstrcat((LPSTR)pchBuf, (LPSTR)rgchUntitled); ! 933: } ! 934: ! 935:
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.