This is macndlog.c in view mode; [Download] [Up]
/* macndlog.c -- dialog utilities for nifty application library
*/
/* (C) Copyright 1995 by Carnegie Mellon University
* All Rights Reserved.
*
* Permission to use, copy, modify, distribute, and sell this software
* and its documentation for any purpose is hereby granted without
* fee, provided that the above copyright notice appear in all copies
* and that both that copyright notice and this permission notice
* appear in supporting documentation, and that the name of Carnegie
* Mellon University not be used in advertising or publicity
* pertaining to distribution of the software without specific,
* written prior permission. Carnegie Mellon University makes no
* representations about the suitability of this software for any
* purpose. It is provided "as is" without express or implied
* warranty.
*
* CARNEGIE MELLON UNIVERSITY DISCLAIMS ALL WARRANTIES WITH REGARD TO
* THIS SOFTWARE, INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY
* AND FITNESS, IN NO EVENT SHALL CARNEGIE MELLON UNIVERSITY BE LIABLE
* FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
* WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN
* AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING
* OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS
* SOFTWARE.
*/
/* (C) Copyright 1990-1995 by Christopher J. Newman
* All Rights Reserved.
*
* Permission to use, copy, modify, distribute, and sell this software and its
* documentation for any purpose is hereby granted without fee, provided that
* the above copyright notice appear in all copies and that both that
* copyright notice and this permission notice appear in supporting
* documentation, and that the name of Christopher J. Newman not be used in
* advertising or publicity pertaining to distribution of the software without
* specific, written prior permission. Christopher J. Newman makes no
* representations about the suitability of this software for any purpose. It
* is provided "as is" without express or implied warranty.
*
* CHRISTOPHER J. NEWMAN DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE,
* INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO EVENT
* SHALL CHRISTOPHER J. NEWMAN BE LIABLE FOR ANY SPECIAL, INDIRECT OR
* CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE,
* DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER
* TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE
* OF THIS SOFTWARE.
*
* Author: Christopher J. Newman
* Message: This is a nifty program.
*/
#ifndef THINK_C
#include <ToolUtils.h>
#endif
#include <Balloons.h>
#include "macnapp.h"
/* enable/disable menus for a moveable modal dialog
*/
void NAmodalMenus(int begin)
{
short i, end;
MenuHandle mh;
/* unhilite menus */
HiliteMenu(0);
/* everything but the edit/apple/help menus */
for (i = mFile; (mh = NAmenuh(i)); ++i) {
if (i != mEdit) {
if (begin) DisableItem(mh, 0);
else EnableItem(mh, 0);
}
}
/* kill the help items */
mh = NAmenuh(mApple);
i = NAappleitems;
if (NAhelpcount) {
HMGetHelpMenuHandle(&mh);
i = NAhelpcount + 1;
}
for (end = NAhelpitems + i; i <= end; ++i) {
if (begin) DisableItem(mh, i);
else EnableItem(mh, i);
}
DrawMenuBar();
}
/* enable/disable a control in a dialog window
*/
void NAenableDItem(DialogPtr dialog, short item, Boolean on)
{
short type;
Handle ctrl;
short ty;
Rect box;
GetDItem(dialog, item, &ty, &ctrl, &box);
type = ty;
if (on) type &= ~itemDisable;
else type |= itemDisable;
if (type == (editText | itemDisable)) {
type = statText;
} else if (type == statText) {
type = editText;
}
SetDItem(dialog, item, type, ctrl, &box);
}
/* hilite a control in a dialog window
*/
void NAhiliteDItem(DialogPtr dialog, short item, short how)
{
Handle ctrl;
short type;
Rect box;
PenState tmpPen;
GetDItem(dialog, item, &type, &ctrl, &box);
if (type & ctrlItem) {
HiliteControl((ControlHandle) ctrl, how);
} else if (type & (statText | editText)) {
GetPenState(&tmpPen);
PenNormal();
if (how == 255) PenPat(QD(gray));
InsetRect(&box, -3, -3);
FrameRect(&box);
SetPenState(&tmpPen);
}
}
/* make an item visible/invisible in a dialog window
*/
void NAvisibleDItem(DialogPtr dialog, short item, Boolean show)
{
if (show) ShowDItem(dialog, item);
else HideDItem(dialog, item);
}
/* set the text in a dialog item
*/
void NAsetIText(DialogPtr dialog, short item, PCstr *str)
{
Handle texth;
NAgetDHandle(dialog, item, &texth);
SetIText(texth, str);
}
/* get the text in a dialog item
*/
void NAgetIText(DialogPtr dialog, short item, PCstr *str)
{
Handle texth;
NAgetDHandle(dialog, item, &texth);
GetIText(texth, str);
SetClen(str);
}
/* set the appropriate radio buttons
*/
short NAradioSet(DialogPtr dialog, short firstitem, short lastitem, short setting)
{
short item;
ControlHandle ctrl;
for (item = firstitem; item <= lastitem; item++) {
NAgetDHandle(dialog, item, &ctrl);
SetCtlValue(ctrl, item == setting ? 1 : 0);
}
return (setting - firstitem);
}
/* get the itemno of the active radio button
*/
short NAradioGet(DialogPtr dialog, short firstitem, short lastitem)
{
short item;
ControlHandle ctrl;
for (item = firstitem; item <= lastitem; item++) {
NAgetDHandle(dialog, item, &ctrl);
if (GetCtlValue(ctrl)) return (item);
}
return (firstitem);
}
/* handle the edit menu for a dialog window
*/
short NAdialogMenu(na_win *win, WORD menu, WORD item)
{
MenuHandle mh = NAmenuh(mEdit);
DialogPeek dpeek = (DialogPeek) win->pwin;
short result = NA_NOTPROCESSED;
switch (menu) {
case 0:
if ((*dpeek->textH)->selStart != (*dpeek->textH)->selEnd) {
EnableItem(mh, iCopy);
EnableItem(mh, iCut);
EnableItem(mh, iClear);
}
EnableItem(mh, iPaste);
if ((*dpeek->textH)->teLength > 0) EnableItem(mh, iSelAll);
break;
case mEdit:
switch (item) {
case iCut:
DlgCut(win->pwin);
ZeroScrap();
TEToScrap();
break;
case iCopy:
DlgCopy(win->pwin);
ZeroScrap();
TEToScrap();
break;
case iClear:
DlgDelete(win->pwin);
break;
case iPaste:
DlgPaste(win->pwin);
break;
case iSelAll:
SelIText(win->pwin, dpeek->editField + 1, 0, 32767);
break;
}
result = NA_PROCESSED;
break;
}
if (menu != 0) DisableItem(mh, iSelAll);
return (result);
}
These are the contents of the former NiCE NeXT User Group NeXTSTEP/OpenStep software archive, currently hosted by Netfuture.ch.