home *** CD-ROM | disk | FTP | other *** search
/ Piper's Pit BBS/FTP: ibm 0040 - 0049 / ibm0040-0049 / ibm0040.tar / ibm0040 / ZINC_6.ZIP / DOSSRC.ZIP / D_POPUP.CPP < prev    next >
Encoding:
C/C++ Source or Header  |  1991-06-01  |  3.2 KB  |  105 lines

  1. //    Zinc Interface Library - D_POPUP.CPP
  2. //    COPYRIGHT (C) 1990, 1991.  All Rights Reserved.
  3. //    Zinc Software Incorporated.  Pleasant Grove, Utah  USA
  4.  
  5. #include "ui_dsn.hpp"
  6. #include "d_help.hlh"
  7.  
  8. const int STRING_FIELD        = 0x0001;
  9. const int VALUE_FIELD        = 0x0002;
  10. const int ITEM_FIELD        = 0x0003;
  11. const int BTFLAGS_FIELD        = 0x0004;
  12. const int STRINGID_FIELD    = 0x0005;
  13. const int OBJFLAGS_FIELD    = 0x0006;
  14.  
  15. int UIW_POP_UP_MENU::Editor(const UI_EVENT &event)
  16. {
  17.     char *windowName = "Pop-up menu";
  18.  
  19.     int ccode = event.type;
  20.     switch (ccode)
  21.     {
  22.     case S_PLACE_OBJECT:
  23.         if (_currentObject->Inherited(ID_POP_UP_ITEM))
  24.         {
  25.             UIW_WINDOW::Add(_currentObject);
  26.             _currentObject->woFlags |= WOF_NON_FIELD_REGION;
  27.         }
  28.         else
  29.             ccode = S_ERROR;
  30.         break;
  31.  
  32.     case S_EDIT_OBJECT:
  33.         {
  34.         UIW_BUTTON *save, *cancel, *help;
  35.         UIW_MATRIX *itemField;
  36.         UIW_STRING *stringIDField;
  37.  
  38.         // Create the button editor window.
  39.         UIW_WINDOW *window = new UIW_WINDOW(_centerColumn - 35, _centerLine - 7,
  40.             69, 13, WOF_NO_FLAGS, WOAF_MODAL | WOAF_NO_SIZE);
  41.         *window
  42.             + new UIW_BORDER
  43.             + &(*new UIW_SYSTEM_BUTTON
  44.                 + new UIW_POP_UP_ITEM("~Move", MNIF_MOVE, BTF_NO_TOGGLE, WOF_NO_FLAGS)
  45.                 + new UIW_POP_UP_ITEM("~Close", MNIF_CLOSE, BTF_NO_TOGGLE, WOF_NO_FLAGS))
  46.             + new UIW_TITLE(windowName)
  47.  
  48.             + new UIW_PROMPT(2, 1, "Items:", WOF_NO_FLAGS)
  49.             + new UIW_SCROLL_BAR(31, 1, 2, 6, SBF_VERTICAL, WOF_NO_FLAGS)
  50.             + (itemField = new UIW_MATRIX(11, 1, 20, 6, 100, 20, 1, 0, MXF_ROWS_FILL, WOF_BORDER, WOAF_NO_FLAGS))
  51.  
  52.             + new UIW_PROMPT(35, 1, "StringID:", WOF_NO_FLAGS)
  53.             + (stringIDField = new UIW_STRING(45, 1, 20, search.stringID, 100, STF_VARIABLE_NAME, WOF_BORDER | WOF_AUTO_CLEAR, 0))
  54.  
  55.             + (save = new UIW_BUTTON(14, 9, 10, "~Save",
  56.                 BTF_NO_TOGGLE | BTF_AUTO_SIZE,
  57.                 WOF_BORDER | WOF_JUSTIFY_CENTER, UI_DESIGN_MANAGER::Save))
  58.             + (cancel = new UIW_BUTTON(29, 9, 10, "~Cancel",
  59.                 BTF_NO_TOGGLE | BTF_AUTO_SIZE,
  60.                 WOF_BORDER | WOF_JUSTIFY_CENTER, UI_DESIGN_MANAGER::Cancel))
  61.             + (help = new UIW_BUTTON(44, 9, 10, "~Help",
  62.                 BTF_NO_TOGGLE | BTF_AUTO_SIZE,
  63.                 WOF_BORDER | WOF_JUSTIFY_CENTER, UI_DESIGN_MANAGER::Help));
  64.  
  65.         // Supply the object list (if any).
  66.         int i = 1;
  67.         for (UIW_POP_UP_ITEM *item = First(); item; i++, item = item->Next())
  68.             *itemField + new UIW_OBJECT_ITEM(0, i - 1, 20, (char *)item->DataGet(FALSE), item->value, item);
  69.  
  70.         // Identify key fields.
  71.         window->StringID(windowName);
  72.         itemField->NumberID(ITEM_FIELD);
  73.         stringIDField->NumberID(STRINGID_FIELD);
  74.         save->userObject = cancel->userObject = help->userObject = this;
  75.         help->value = HELP_POP_UP_MENU;
  76.  
  77.         *windowManager + window;
  78.         break;
  79.         }
  80.  
  81.     case S_SAVE_OBJECT:
  82.         {
  83.         UIW_WINDOW *window = (UIW_WINDOW *)windowManager->Get(windowName);
  84.  
  85.         UIW_STRING *stringIDField = (UIW_STRING *)window->Get(STRINGID_FIELD);
  86.         StringID(stringIDField->DataGet());
  87.  
  88.         UIW_WINDOW::Clear();
  89.         UIW_MATRIX *itemField = (UIW_MATRIX *)window->Get(ITEM_FIELD);
  90.         for (UIW_OBJECT_ITEM *item = (UIW_OBJECT_ITEM *)itemField->First(); item; item = item->Next())
  91.             UI_LIST::Add(item->object);
  92.  
  93.         UI_WINDOW_OBJECT::Redisplay(FALSE);
  94.         break;
  95.         }
  96.  
  97.     default:
  98.         ccode = UIW_WINDOW::Editor(event);
  99.         break;
  100.     }
  101.  
  102.     // Return the control code.
  103.     return (ccode);
  104. }
  105.