|
Packit |
b099d7 |
/* $TOG: CommText8.c /main/7 1997/10/02 16:28:55 csn $ */
|
|
Packit |
b099d7 |
/*
|
|
Packit |
b099d7 |
* Motif
|
|
Packit |
b099d7 |
*
|
|
Packit |
b099d7 |
* Copyright (c) 1987-2012, The Open Group. All rights reserved.
|
|
Packit |
b099d7 |
*
|
|
Packit |
b099d7 |
* These libraries and programs are free software; you can
|
|
Packit |
b099d7 |
* redistribute them and/or modify them under the terms of the GNU
|
|
Packit |
b099d7 |
* Lesser General Public License as published by the Free Software
|
|
Packit |
b099d7 |
* Foundation; either version 2 of the License, or (at your option)
|
|
Packit |
b099d7 |
* any later version.
|
|
Packit |
b099d7 |
*
|
|
Packit |
b099d7 |
* These libraries and programs are distributed in the hope that
|
|
Packit |
b099d7 |
* they will be useful, but WITHOUT ANY WARRANTY; without even the
|
|
Packit |
b099d7 |
* implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
|
|
Packit |
b099d7 |
* PURPOSE. See the GNU Lesser General Public License for more
|
|
Packit |
b099d7 |
* details.
|
|
Packit |
b099d7 |
*
|
|
Packit |
b099d7 |
* You should have received a copy of the GNU Lesser General Public
|
|
Packit |
b099d7 |
* License along with these librararies and programs; if not, write
|
|
Packit |
b099d7 |
* to the Free Software Foundation, Inc., 51 Franklin Street, Fifth
|
|
Packit |
b099d7 |
* Floor, Boston, MA 02110-1301 USA
|
|
Packit |
b099d7 |
*/
|
|
Packit |
b099d7 |
/*
|
|
Packit |
b099d7 |
* HISTORY
|
|
Packit |
b099d7 |
*/
|
|
Packit |
b099d7 |
#include <testlib.h>
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
static Widget BBoard1 = NULL;
|
|
Packit |
b099d7 |
static Widget Form1 = NULL;
|
|
Packit |
b099d7 |
static Widget help_dialog = NULL;
|
|
Packit |
b099d7 |
static Arg args[MAX_ARGS];
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
char single_text[] = "Single Line Text Widget";
|
|
Packit |
b099d7 |
char multi_text[] = "Multi Line Text Widget";
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
static char font_name1[] = "fixed";
|
|
Packit |
b099d7 |
static char font_name2[] = "variable";
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
static char render_tag[] = "render1";
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
static char *stat_msg[] =
|
|
Packit |
b099d7 |
{
|
|
Packit |
b099d7 |
"This is generic help for the application,\nor the widget you've selected has no help",
|
|
Packit |
b099d7 |
"This is help for the Default Button.\nPress to make things happen",
|
|
Packit |
b099d7 |
"This is help for the text type.",
|
|
Packit |
b099d7 |
"This is help for the Other Button."
|
|
Packit |
b099d7 |
};
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
static void GenericHelp(Widget w, XtPointer client_data,
|
|
Packit |
b099d7 |
XtPointer call_data)
|
|
Packit |
b099d7 |
{ /*
|
|
Packit |
b099d7 |
1 = bulletinBoard or a widget with no help
|
|
Packit |
b099d7 |
2 = Default button
|
|
Packit |
b099d7 |
3 = Text1 (the single line text)
|
|
Packit |
b099d7 |
4 = OtherButton
|
|
Packit |
b099d7 |
*/
|
|
Packit |
b099d7 |
XmString message;
|
|
Packit |
b099d7 |
int n;
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
message = XmStringLtoRCreate(stat_msg[((int)client_data) - 1],
|
|
Packit |
b099d7 |
XmSTRING_DEFAULT_CHARSET);
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
n = 0;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNmessageString, message); n++;
|
|
Packit |
b099d7 |
XtSetValues(help_dialog, args, n);
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
XtManageChild(help_dialog);
|
|
Packit |
b099d7 |
}
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
static void MyReturnRoutine(Widget w, XEvent *event,
|
|
Packit |
b099d7 |
String *params, Cardinal *num_params)
|
|
Packit |
b099d7 |
{
|
|
Packit |
b099d7 |
printf("The return key has been remapped to this routine.\n");
|
|
Packit |
b099d7 |
}
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
static void DblClickRoutine(Widget w, XEvent *event,
|
|
Packit |
b099d7 |
String *params, Cardinal *num_params)
|
|
Packit |
b099d7 |
{
|
|
Packit |
b099d7 |
printf("The user has double-clicked.\n");
|
|
Packit |
b099d7 |
}
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
static void ActivationDB(Widget w, XtPointer client_data,
|
|
Packit |
b099d7 |
XtPointer call_data)
|
|
Packit |
b099d7 |
{
|
|
Packit |
b099d7 |
printf("The Default Button Activate callback was made.\n");
|
|
Packit |
b099d7 |
}
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
static void setInsensitive(Widget w, XtPointer client_data,
|
|
Packit |
b099d7 |
XtPointer call_data)
|
|
Packit |
b099d7 |
{
|
|
Packit |
b099d7 |
XtSetArg(args[0], XmNsensitive, False);
|
|
Packit |
b099d7 |
XtSetValues(w, args, 1);
|
|
Packit |
b099d7 |
}
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
Widget CreateTheBBoard(Widget parent, Boolean dialog);
|
|
Packit |
b099d7 |
Widget CreateTheForm(Widget parent);
|
|
Packit |
b099d7 |
Widget CreateSingleLineText(Widget parent);
|
|
Packit |
b099d7 |
Widget CreateOtherButton(Widget parent);
|
|
Packit |
b099d7 |
Widget CreateTheDefaultButton(Widget parent);
|
|
Packit |
b099d7 |
Widget CreateMultiLineText(Widget parent);
|
|
Packit |
b099d7 |
Widget CreateTextField(Widget parent);
|
|
Packit |
b099d7 |
Widget CreateToggleButton(Widget parent);
|
|
Packit |
b099d7 |
Widget CreateScrollBar(Widget parent);
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
void main_text8( argc, argv )
|
|
Packit |
b099d7 |
int argc;
|
|
Packit |
b099d7 |
char **argv;
|
|
Packit |
b099d7 |
{
|
|
Packit |
b099d7 |
Widget Text1 = NULL; /* single line text widget */
|
|
Packit |
b099d7 |
Widget Text2 = NULL; /* multi-line text widget */
|
|
Packit |
b099d7 |
Widget TextF = NULL; /* Text field widget */
|
|
Packit |
b099d7 |
Widget DefaultB = NULL;
|
|
Packit |
b099d7 |
Widget ToggleB = NULL;
|
|
Packit |
b099d7 |
Widget OtherB = NULL;
|
|
Packit |
b099d7 |
Widget ScrollB = NULL;
|
|
Packit |
b099d7 |
int n = 0;
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
/* the translation for BtnUp(2+) shows PIR 3113 */
|
|
Packit |
b099d7 |
static XtActionsRec actions[] = {{ "MyReturnRoutine", MyReturnRoutine},
|
|
Packit |
b099d7 |
{ "DblClickRoutine", DblClickRoutine}};
|
|
Packit |
b099d7 |
static char translation_table[] = "<Key>Return: MyReturnRoutine()\n\
|
|
Packit |
b099d7 |
<Btn1Up>(2+): DblClickRoutine()";
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
/* initialize toolkit */
|
|
Packit |
b099d7 |
CommonTestInit(argc, argv);
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
help_dialog = XmCreateMessageDialog(Shell1, "help_dialog", args, n);
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
XtAppAddActions(app_context, actions, 2);
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
/* Test 1: Bulletin Board with default button. */
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
BBoard1 = CreateTheBBoard(Shell1, False);
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
DefaultB = CreateTheDefaultButton(BBoard1);
|
|
Packit |
b099d7 |
n = 0;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNdefaultButton, DefaultB); n++;
|
|
Packit |
b099d7 |
XtSetValues(BBoard1, args, n);
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
Text1 = CreateSingleLineText(BBoard1);
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
Text2 = CreateMultiLineText(BBoard1);
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
TextF = CreateTextField(BBoard1);
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
OtherB = CreateOtherButton(BBoard1);
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
ToggleB = CreateToggleButton(BBoard1);
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
ScrollB = CreateScrollBar(BBoard1);
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
XtManageChild(BBoard1);
|
|
Packit |
b099d7 |
XtManageChild(Text1);
|
|
Packit |
b099d7 |
XtManageChild(Text2);
|
|
Packit |
b099d7 |
XtManageChild(TextF);
|
|
Packit |
b099d7 |
XtManageChild(DefaultB);
|
|
Packit |
b099d7 |
XtManageChild(ToggleB);
|
|
Packit |
b099d7 |
XtManageChild(OtherB);
|
|
Packit |
b099d7 |
XtManageChild(ScrollB);
|
|
Packit |
b099d7 |
XtRealizeWidget(Shell1);
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
CommonPause(); /* #1: activate callback tests */
|
|
Packit |
b099d7 |
CommonPause(); /* #2: ditto */
|
|
Packit |
b099d7 |
CommonPause(); /* #3: more */
|
|
Packit |
b099d7 |
CommonPause(); /* #4: help */
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
XtOverrideTranslations(Text2,
|
|
Packit |
b099d7 |
XtParseTranslationTable(translation_table));
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
CommonPause(); /* #5: reset translations on text */
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
XtRemoveCallback(OtherB, XmNactivateCallback, CommonGenericCB, NULL);
|
|
Packit |
b099d7 |
XtAddCallback(OtherB, XmNactivateCallback, setInsensitive, NULL);
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
XtRemoveCallback(DefaultB, XmNactivateCallback, CommonGenericCB, NULL);
|
|
Packit |
b099d7 |
XtAddCallback(DefaultB, XmNactivateCallback, setInsensitive, NULL);
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
CommonPause(); /* #6: button insensitivity */
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
XtDestroyWidget(BBoard1);
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
/* Test 2: Bulletin Board Dialog with default button. */
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
/* make Shell smaller, just for convenience */
|
|
Packit |
b099d7 |
n = 0;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNheight, 50); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNwidth, 50); n++;
|
|
Packit |
b099d7 |
XtSetValues(Shell1, args, n);
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
BBoard1 = CreateTheBBoard(Shell1, True);
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
DefaultB = CreateTheDefaultButton(BBoard1);
|
|
Packit |
b099d7 |
n = 0;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNdefaultButton, DefaultB); n++;
|
|
Packit |
b099d7 |
XtSetValues(BBoard1, args, n);
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
Text1 = CreateSingleLineText(BBoard1);
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
Text2 = CreateMultiLineText(BBoard1);
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
TextF = CreateTextField(BBoard1);
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
OtherB = CreateOtherButton(BBoard1);
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
ToggleB = CreateToggleButton(BBoard1);
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
ScrollB = CreateScrollBar(BBoard1);
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
XtManageChild(BBoard1);
|
|
Packit |
b099d7 |
XtManageChild(Text1);
|
|
Packit |
b099d7 |
XtManageChild(Text2);
|
|
Packit |
b099d7 |
XtManageChild(TextF);
|
|
Packit |
b099d7 |
XtManageChild(DefaultB);
|
|
Packit |
b099d7 |
XtManageChild(ToggleB);
|
|
Packit |
b099d7 |
XtManageChild(OtherB);
|
|
Packit |
b099d7 |
XtManageChild(ScrollB);
|
|
Packit |
b099d7 |
XtRealizeWidget(Shell1);
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
CommonPause(); /* #7: check again */
|
|
Packit |
b099d7 |
CommonPause(); /* #8: help */
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
XtOverrideTranslations(Text2,
|
|
Packit |
b099d7 |
XtParseTranslationTable(translation_table));
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
CommonPause(); /* #9: override text translations */
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
XtRemoveCallback(OtherB, XmNactivateCallback, CommonGenericCB, NULL);
|
|
Packit |
b099d7 |
XtAddCallback(OtherB, XmNactivateCallback, setInsensitive, NULL);
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
XtRemoveCallback(DefaultB, XmNactivateCallback, CommonGenericCB, NULL);
|
|
Packit |
b099d7 |
XtAddCallback(DefaultB, XmNactivateCallback, setInsensitive, NULL);
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
CommonPause(); /* #10: insensitive buttons */
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
/* Test 3: Form with with default button. */
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
XtDestroyWidget(BBoard1);
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
n = 0;
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
Form1 = CreateTheForm(Shell1);
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
DefaultB = CreateTheDefaultButton(Form1);
|
|
Packit |
b099d7 |
n = 0;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNdefaultButton, DefaultB); n++;
|
|
Packit |
b099d7 |
XtSetValues(Form1, args, n);
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
Text1 = CreateSingleLineText(Form1);
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
Text2 = CreateMultiLineText(Form1);
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
TextF = CreateTextField(Form1);
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
OtherB = CreateOtherButton(Form1);
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
ToggleB = CreateToggleButton(Form1);
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
ScrollB = CreateScrollBar(Form1);
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
XtManageChild(Form1);
|
|
Packit |
b099d7 |
XtManageChild(Text1);
|
|
Packit |
b099d7 |
XtManageChild(Text2);
|
|
Packit |
b099d7 |
XtManageChild(TextF);
|
|
Packit |
b099d7 |
XtManageChild(DefaultB);
|
|
Packit |
b099d7 |
XtManageChild(ToggleB);
|
|
Packit |
b099d7 |
XtManageChild(OtherB);
|
|
Packit |
b099d7 |
XtManageChild(ScrollB);
|
|
Packit |
b099d7 |
XtRealizeWidget(Shell1);
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
CommonPause(); /* form */ /* number #11 */
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
XtAppMainLoop(app_context);
|
|
Packit |
b099d7 |
}
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
Widget CreateTheBBoard(Widget parent, Boolean dialog)
|
|
Packit |
b099d7 |
{
|
|
Packit |
b099d7 |
int n;
|
|
Packit |
b099d7 |
Widget widget;
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
n = 0;
|
|
Packit |
b099d7 |
#ifdef MOTIF1_1
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNwidth, 400); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNheight, 400); n++;
|
|
Packit |
b099d7 |
#endif /* MOTIF1_1 */
|
|
Packit |
b099d7 |
/* test for PIR 2657 */
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNtextFontList,
|
|
Packit |
b099d7 |
CommonGetFontList("variable")); n++;
|
|
Packit |
b099d7 |
if (dialog)
|
|
Packit |
b099d7 |
{
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNautoUnmanage, False); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNdialogStyle, XmDIALOG_MODELESS); n++;
|
|
Packit |
b099d7 |
widget = XmCreateBulletinBoardDialog(parent,
|
|
Packit |
b099d7 |
"BBoard1", args, n);
|
|
Packit |
b099d7 |
}
|
|
Packit |
b099d7 |
else
|
|
Packit |
b099d7 |
{
|
|
Packit |
b099d7 |
widget = XmCreateBulletinBoard(parent, "BBoard1", args, n);
|
|
Packit |
b099d7 |
}
|
|
Packit |
b099d7 |
XtAddCallback(widget, XmNhelpCallback, GenericHelp, (XtPointer)1);
|
|
Packit |
b099d7 |
return(widget);
|
|
Packit |
b099d7 |
}
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
Widget CreateTheForm(Widget parent)
|
|
Packit |
b099d7 |
{
|
|
Packit |
b099d7 |
int n;
|
|
Packit |
b099d7 |
Widget widget;
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
n = 0;
|
|
Packit |
b099d7 |
#ifdef MOTIF1_1
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNwidth, 400); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNheight, 400); n++;
|
|
Packit |
b099d7 |
#endif /* MOTIF1_1 */
|
|
Packit |
b099d7 |
/* test for PIR 2657 */
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNtextFontList,
|
|
Packit |
b099d7 |
CommonGetFontList("variable")); n++;
|
|
Packit |
b099d7 |
widget = XmCreateForm(parent, "Form1", args, n);
|
|
Packit |
b099d7 |
XtAddCallback(widget, XmNhelpCallback, GenericHelp, (XtPointer)1);
|
|
Packit |
b099d7 |
return(widget);
|
|
Packit |
b099d7 |
}
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
Widget CreateSingleLineText(Widget parent)
|
|
Packit |
b099d7 |
{
|
|
Packit |
b099d7 |
int n;
|
|
Packit |
b099d7 |
Widget widget;
|
|
Packit |
b099d7 |
XmString tcs = (XmString)0;
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
n = 0;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNresizeWidth, False); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNresizeHeight, False); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNcolumns, 40); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNrows, 1); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNeditMode, XmSINGLE_LINE_EDIT); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNforeground, CommonGetColor("Red")); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNbackground, CommonGetColor("White")); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNx, 10); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNy, 10); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNtraversalOn, True); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNfontList, CommonGetFontList(font_name1)); n++;
|
|
Packit |
b099d7 |
widget = XmCreateText(parent, "Text1", args, n);
|
|
Packit |
b099d7 |
XtAddCallback(widget, XmNactivateCallback,
|
|
Packit |
b099d7 |
(XtCallbackProc) CommonGenericCB, NULL);
|
|
Packit |
b099d7 |
XtAddCallback(widget, XmNhelpCallback, GenericHelp, (XtPointer)3);
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
/* test case for PIR 684: cannot set XmNvalue and XmNcursorPosition */
|
|
Packit |
b099d7 |
/* simultaneosly at SetValues time or cursorPosition is ignored. */
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
n = 0;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNvalue, single_text); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNcursorPosition, 5); n++;
|
|
Packit |
b099d7 |
XtSetValues(widget, args, n);
|
|
Packit |
b099d7 |
if (tcs) XmStringFree(tcs);
|
|
Packit |
b099d7 |
/* end of test case for PIR 684 */
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
return(widget);
|
|
Packit |
b099d7 |
}
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
Widget CreateOtherButton(Widget parent)
|
|
Packit |
b099d7 |
{
|
|
Packit |
b099d7 |
int n;
|
|
Packit |
b099d7 |
Widget OtherB;
|
|
Packit |
b099d7 |
XmString tmp_string;
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
tmp_string = XmStringLtoRCreate("Other Button",
|
|
Packit |
b099d7 |
XmSTRING_DEFAULT_CHARSET); n++;
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
n = 0;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNx, 375); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNy, 330); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNlabelString, tmp_string); n++;
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
OtherB = XmCreatePushButtonGadget(parent, "OtherB", args, n);
|
|
Packit |
b099d7 |
XtAddCallback(OtherB, XmNactivateCallback, CommonGenericCB, NULL);
|
|
Packit |
b099d7 |
XtAddCallback(OtherB, XmNhelpCallback, GenericHelp, (XtPointer)4);
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
XmStringFree (tmp_string);
|
|
Packit |
b099d7 |
return(OtherB);
|
|
Packit |
b099d7 |
}
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
Widget CreateTheDefaultButton(Widget parent)
|
|
Packit |
b099d7 |
{
|
|
Packit |
b099d7 |
int n;
|
|
Packit |
b099d7 |
Widget DefaultB;
|
|
Packit |
b099d7 |
XmString tmp_string;
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
n = 0;
|
|
Packit |
b099d7 |
tmp_string = XmStringLtoRCreate("Default Button",
|
|
Packit |
b099d7 |
XmSTRING_DEFAULT_CHARSET);
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNlabelString, tmp_string); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNx, 375); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNy, 375); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNtraversalOn, True); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNdefaultButtonShadowThickness, 2); n++;
|
|
Packit |
b099d7 |
DefaultB = XmCreatePushButtonGadget(parent, "DefaultB", args, n);
|
|
Packit |
b099d7 |
XtAddCallback(DefaultB, XmNactivateCallback, ActivationDB, NULL);
|
|
Packit |
b099d7 |
XtAddCallback(DefaultB, XmNhelpCallback, GenericHelp, (XtPointer)2);
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
XmStringFree (tmp_string);
|
|
Packit |
b099d7 |
return(DefaultB);
|
|
Packit |
b099d7 |
}
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
Widget CreateMultiLineText( Widget parent)
|
|
Packit |
b099d7 |
{
|
|
Packit |
b099d7 |
int n;
|
|
Packit |
b099d7 |
Widget Text2;
|
|
Packit |
b099d7 |
XmString tcs = (XmString)0;
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
n = 0;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNeditMode, XmMULTI_LINE_EDIT); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNrows, 4); n++;
|
|
Packit |
b099d7 |
/* test case for PIR 2657
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNfontList, CommonGetFontList("variable")); n++;
|
|
Packit |
b099d7 |
*/
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNcolumns, 20); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNcursorPosition, 1); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNvalue, multi_text); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNforeground, CommonGetColor("Red")); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNbackground, CommonGetColor("White")); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNx, 10); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNy, 150); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNtraversalOn, True); n++;
|
|
Packit |
b099d7 |
Text2 = XmCreateText(parent, "Text2", args, n);
|
|
Packit |
b099d7 |
if ( tcs ) XmStringFree(tcs);
|
|
Packit |
b099d7 |
XtAddCallback(Text2, XmNactivateCallback, CommonGenericCB, NULL);
|
|
Packit |
b099d7 |
return(Text2);
|
|
Packit |
b099d7 |
}
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
Widget CreateTextField(Widget parent)
|
|
Packit |
b099d7 |
{
|
|
Packit |
b099d7 |
int n;
|
|
Packit |
b099d7 |
Widget TextF;
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
n = 0;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNresizeWidth, False); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNcolumns, 40); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNcursorPosition, 5); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNvalue, "Text Field Widget"); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNforeground, CommonGetColor("Red")); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNbackground, CommonGetColor("White")); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNx, 10); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNy, 300); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNfontList, CommonGetFontList(font_name1)); n++;
|
|
Packit |
b099d7 |
TextF = XmCreateTextField(parent, "TextF", args, n);
|
|
Packit |
b099d7 |
XtAddCallback(TextF, XmNactivateCallback, CommonGenericCB, NULL);
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
return(TextF);
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
}
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
Widget CreateToggleButton(Widget parent)
|
|
Packit |
b099d7 |
{
|
|
Packit |
b099d7 |
int n;
|
|
Packit |
b099d7 |
Widget ToggleB;
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
n = 0;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNx, 375); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNy, 300); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNtraversalOn, True); n++;
|
|
Packit |
b099d7 |
ToggleB = XmCreateToggleButton(parent, "Toggle Button", args, n);
|
|
Packit |
b099d7 |
XtAddCallback(ToggleB, XmNvalueChangedCallback, CommonGenericCB, NULL);
|
|
Packit |
b099d7 |
return(ToggleB);
|
|
Packit |
b099d7 |
}
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
Widget CreateScrollBar(Widget parent)
|
|
Packit |
b099d7 |
{
|
|
Packit |
b099d7 |
int n;
|
|
Packit |
b099d7 |
Widget ScrollB;
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
n = 0;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNx, 300); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNy, 150); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNtraversalOn, True); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNorientation, XmVERTICAL); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNhighlightOnEnter, True); n++;
|
|
Packit |
b099d7 |
XtSetArg(args[n], XmNhighlightThickness, 2); n++;
|
|
Packit |
b099d7 |
ScrollB = XmCreateScrollBar (parent, "ScrollB", args, n);
|
|
Packit |
b099d7 |
return(ScrollB);
|
|
Packit |
b099d7 |
}
|
|
Packit |
b099d7 |
|