| 1 |
/* macndlog.c -- dialog utilities for nifty application library |
| 2 |
*/ |
| 3 |
/* (C) Copyright 1995 by Carnegie Mellon University |
| 4 |
* All Rights Reserved. |
| 5 |
* |
| 6 |
* Permission to use, copy, modify, distribute, and sell this software |
| 7 |
* and its documentation for any purpose is hereby granted without |
| 8 |
* fee, provided that the above copyright notice appear in all copies |
| 9 |
* and that both that copyright notice and this permission notice |
| 10 |
* appear in supporting documentation, and that the name of Carnegie |
| 11 |
* Mellon University not be used in advertising or publicity |
| 12 |
* pertaining to distribution of the software without specific, |
| 13 |
* written prior permission. Carnegie Mellon University makes no |
| 14 |
* representations about the suitability of this software for any |
| 15 |
* purpose. It is provided "as is" without express or implied |
| 16 |
* warranty. |
| 17 |
* |
| 18 |
* CARNEGIE MELLON UNIVERSITY DISCLAIMS ALL WARRANTIES WITH REGARD TO |
| 19 |
* THIS SOFTWARE, INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY |
| 20 |
* AND FITNESS, IN NO EVENT SHALL CARNEGIE MELLON UNIVERSITY BE LIABLE |
| 21 |
* FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES |
| 22 |
* WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN |
| 23 |
* AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING |
| 24 |
* OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS |
| 25 |
* SOFTWARE. |
| 26 |
*/ |
| 27 |
/* (C) Copyright 1990-1995 by Christopher J. Newman |
| 28 |
* All Rights Reserved. |
| 29 |
* |
| 30 |
* Permission to use, copy, modify, distribute, and sell this software and its |
| 31 |
* documentation for any purpose is hereby granted without fee, provided that |
| 32 |
* the above copyright notice appear in all copies and that both that |
| 33 |
* copyright notice and this permission notice appear in supporting |
| 34 |
* documentation, and that the name of Christopher J. Newman not be used in |
| 35 |
* advertising or publicity pertaining to distribution of the software without |
| 36 |
* specific, written prior permission. Christopher J. Newman makes no |
| 37 |
* representations about the suitability of this software for any purpose. It |
| 38 |
* is provided "as is" without express or implied warranty. |
| 39 |
* |
| 40 |
* CHRISTOPHER J. NEWMAN DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, |
| 41 |
* INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO EVENT |
| 42 |
* SHALL CHRISTOPHER J. NEWMAN BE LIABLE FOR ANY SPECIAL, INDIRECT OR |
| 43 |
* CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, |
| 44 |
* DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER |
| 45 |
* TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE |
| 46 |
* OF THIS SOFTWARE. |
| 47 |
* |
| 48 |
* Author: Christopher J. Newman |
| 49 |
* Message: This is a nifty program. |
| 50 |
*/ |
| 51 |
|
| 52 |
#ifndef THINK_C |
| 53 |
#include <ToolUtils.h> |
| 54 |
#endif |
| 55 |
#include <Balloons.h> |
| 56 |
#include "macnapp.h" |
| 57 |
|
| 58 |
/* enable/disable menus for a moveable modal dialog |
| 59 |
*/ |
| 60 |
void NAmodalMenus(int begin) |
| 61 |
{ |
| 62 |
short i, end; |
| 63 |
MenuHandle mh; |
| 64 |
|
| 65 |
/* unhilite menus */ |
| 66 |
HiliteMenu(0); |
| 67 |
|
| 68 |
/* everything but the edit/apple/help menus */ |
| 69 |
for (i = mFile; (mh = NAmenuh(i)); ++i) { |
| 70 |
if (i != mEdit) { |
| 71 |
if (begin) DisableItem(mh, 0); |
| 72 |
else EnableItem(mh, 0); |
| 73 |
} |
| 74 |
} |
| 75 |
|
| 76 |
/* kill the help items */ |
| 77 |
mh = NAmenuh(mApple); |
| 78 |
i = NAappleitems; |
| 79 |
if (NAhelpcount) { |
| 80 |
HMGetHelpMenuHandle(&mh); |
| 81 |
i = NAhelpcount + 1; |
| 82 |
} |
| 83 |
for (end = NAhelpitems + i; i <= end; ++i) { |
| 84 |
if (begin) DisableItem(mh, i); |
| 85 |
else EnableItem(mh, i); |
| 86 |
} |
| 87 |
|
| 88 |
DrawMenuBar(); |
| 89 |
} |
| 90 |
|
| 91 |
/* enable/disable a control in a dialog window |
| 92 |
*/ |
| 93 |
void NAenableDItem(DialogPtr dialog, short item, Boolean on) |
| 94 |
{ |
| 95 |
short type; |
| 96 |
Handle ctrl; |
| 97 |
short ty; |
| 98 |
Rect box; |
| 99 |
|
| 100 |
GetDItem(dialog, item, &ty, &ctrl, &box); |
| 101 |
type = ty; |
| 102 |
if (on) type &= ~itemDisable; |
| 103 |
else type |= itemDisable; |
| 104 |
if (type == (editText | itemDisable)) { |
| 105 |
type = statText; |
| 106 |
} else if (type == statText) { |
| 107 |
type = editText; |
| 108 |
} |
| 109 |
SetDItem(dialog, item, type, ctrl, &box); |
| 110 |
} |
| 111 |
|
| 112 |
/* hilite a control in a dialog window |
| 113 |
*/ |
| 114 |
void NAhiliteDItem(DialogPtr dialog, short item, short how) |
| 115 |
{ |
| 116 |
Handle ctrl; |
| 117 |
short type; |
| 118 |
Rect box; |
| 119 |
PenState tmpPen; |
| 120 |
|
| 121 |
GetDItem(dialog, item, &type, &ctrl, &box); |
| 122 |
if (type & ctrlItem) { |
| 123 |
HiliteControl((ControlHandle) ctrl, how); |
| 124 |
} else if (type & (statText | editText)) { |
| 125 |
GetPenState(&tmpPen); |
| 126 |
PenNormal(); |
| 127 |
if (how == 255) PenPat(QD(gray)); |
| 128 |
InsetRect(&box, -3, -3); |
| 129 |
FrameRect(&box); |
| 130 |
SetPenState(&tmpPen); |
| 131 |
} |
| 132 |
} |
| 133 |
|
| 134 |
/* make an item visible/invisible in a dialog window |
| 135 |
*/ |
| 136 |
void NAvisibleDItem(DialogPtr dialog, short item, Boolean show) |
| 137 |
{ |
| 138 |
if (show) ShowDItem(dialog, item); |
| 139 |
else HideDItem(dialog, item); |
| 140 |
} |
| 141 |
|
| 142 |
/* set the text in a dialog item |
| 143 |
*/ |
| 144 |
void NAsetIText(DialogPtr dialog, short item, PCstr *str) |
| 145 |
{ |
| 146 |
Handle texth; |
| 147 |
|
| 148 |
NAgetDHandle(dialog, item, &texth); |
| 149 |
SetIText(texth, str); |
| 150 |
} |
| 151 |
|
| 152 |
/* get the text in a dialog item |
| 153 |
*/ |
| 154 |
void NAgetIText(DialogPtr dialog, short item, PCstr *str) |
| 155 |
{ |
| 156 |
Handle texth; |
| 157 |
|
| 158 |
NAgetDHandle(dialog, item, &texth); |
| 159 |
GetIText(texth, str); |
| 160 |
SetClen(str); |
| 161 |
} |
| 162 |
|
| 163 |
/* set the appropriate radio buttons |
| 164 |
*/ |
| 165 |
short NAradioSet(DialogPtr dialog, short firstitem, short lastitem, short setting) |
| 166 |
{ |
| 167 |
short item; |
| 168 |
ControlHandle ctrl; |
| 169 |
|
| 170 |
for (item = firstitem; item <= lastitem; item++) { |
| 171 |
NAgetDHandle(dialog, item, &ctrl); |
| 172 |
SetCtlValue(ctrl, item == setting ? 1 : 0); |
| 173 |
} |
| 174 |
|
| 175 |
return (setting - firstitem); |
| 176 |
} |
| 177 |
|
| 178 |
/* get the itemno of the active radio button |
| 179 |
*/ |
| 180 |
short NAradioGet(DialogPtr dialog, short firstitem, short lastitem) |
| 181 |
{ |
| 182 |
short item; |
| 183 |
ControlHandle ctrl; |
| 184 |
|
| 185 |
for (item = firstitem; item <= lastitem; item++) { |
| 186 |
NAgetDHandle(dialog, item, &ctrl); |
| 187 |
if (GetCtlValue(ctrl)) return (item); |
| 188 |
} |
| 189 |
|
| 190 |
return (firstitem); |
| 191 |
} |
| 192 |
|
| 193 |
/* handle the edit menu for a dialog window |
| 194 |
*/ |
| 195 |
short NAdialogMenu(na_win *win, WORD menu, WORD item) |
| 196 |
{ |
| 197 |
MenuHandle mh = NAmenuh(mEdit); |
| 198 |
DialogPeek dpeek = (DialogPeek) win->pwin; |
| 199 |
short result = NA_NOTPROCESSED; |
| 200 |
|
| 201 |
switch (menu) { |
| 202 |
case 0: |
| 203 |
if ((*dpeek->textH)->selStart != (*dpeek->textH)->selEnd) { |
| 204 |
EnableItem(mh, iCopy); |
| 205 |
EnableItem(mh, iCut); |
| 206 |
EnableItem(mh, iClear); |
| 207 |
} |
| 208 |
EnableItem(mh, iPaste); |
| 209 |
if ((*dpeek->textH)->teLength > 0) EnableItem(mh, iSelAll); |
| 210 |
break; |
| 211 |
case mEdit: |
| 212 |
switch (item) { |
| 213 |
case iCut: |
| 214 |
DlgCut(win->pwin); |
| 215 |
ZeroScrap(); |
| 216 |
TEToScrap(); |
| 217 |
break; |
| 218 |
case iCopy: |
| 219 |
DlgCopy(win->pwin); |
| 220 |
ZeroScrap(); |
| 221 |
TEToScrap(); |
| 222 |
break; |
| 223 |
case iClear: |
| 224 |
DlgDelete(win->pwin); |
| 225 |
break; |
| 226 |
case iPaste: |
| 227 |
DlgPaste(win->pwin); |
| 228 |
break; |
| 229 |
case iSelAll: |
| 230 |
SelIText(win->pwin, dpeek->editField + 1, 0, 32767); |
| 231 |
break; |
| 232 |
} |
| 233 |
result = NA_PROCESSED; |
| 234 |
break; |
| 235 |
} |
| 236 |
if (menu != 0) DisableItem(mh, iSelAll); |
| 237 |
|
| 238 |
return (result); |
| 239 |
} |