mirror of https://github.com/Gnucash/gnucash
git-svn-id: svn+ssh://svn.gnucash.org/repo/gnucash/trunk@53 57a11ea4-9604-0410-9ed3-97b8803252fdarchive
Linas Vepstas
29 years ago
parent
f4b8273650
commit
a9d8972674
@ -0,0 +1,185 @@
|
||||
/********************************************************************\
|
||||
* Pop.c -- generic ComboBox for xacc (X-Accountant) *
|
||||
* Copyright (C) 1997 Linas Vepstas *
|
||||
* *
|
||||
* This program is free software; you can redistribute it and/or *
|
||||
* modify it under the terms of the GNU General Public License as *
|
||||
* published by the Free Software Foundation; either version 2 of *
|
||||
* the License, or (at your option) any later version. *
|
||||
* *
|
||||
* This program is distributed in the hope that it will be useful, *
|
||||
* but WITHOUT ANY WARRANTY; without even the implied warranty of *
|
||||
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the *
|
||||
* GNU General Public License for more details. *
|
||||
* *
|
||||
* You should have received a copy of the GNU General Public License*
|
||||
* along with this program; if not, write to the Free Software *
|
||||
* Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. *
|
||||
* *
|
||||
\********************************************************************/
|
||||
|
||||
#include <Xm/Xm.h>
|
||||
#include <ComboBox.h>
|
||||
#include <Xbae/Matrix.h>
|
||||
#include "util.h"
|
||||
|
||||
/** STRUCTS *********************************************************/
|
||||
typedef struct _PopBox {
|
||||
Widget combobox;
|
||||
Widget reg; /* the parent register widget */
|
||||
int currow;
|
||||
int curcol;
|
||||
} PopBox;
|
||||
|
||||
/** PROTOTYPES ******************************************************/
|
||||
|
||||
void selectCB (Widget w, XtPointer cd, XtPointer cb );
|
||||
|
||||
/********************************************************************\
|
||||
* popBox *
|
||||
* creates the pop widget *
|
||||
* *
|
||||
* Args: parent - the parent of this window *
|
||||
* Return: popData - the pop GUI structure *
|
||||
\********************************************************************/
|
||||
|
||||
PopBox *
|
||||
popBox (Widget parent)
|
||||
{
|
||||
Widget combobox;
|
||||
XmString str;
|
||||
PopBox *popData;
|
||||
|
||||
/* malloc the pop GUI structure */
|
||||
popData = (PopBox *) _malloc (sizeof (PopBox));
|
||||
popData->currow = -1;
|
||||
popData->curcol = -1;
|
||||
popData->reg = parent;
|
||||
|
||||
/* create the pop GUI */
|
||||
combobox = XtVaCreateManagedWidget("popbox", xmComboBoxWidgetClass, parent,
|
||||
XmNshadowThickness, 0, /* don't draw a shadow, use bae shadows */
|
||||
XmNeditable, False, /* user can only pick from list */
|
||||
XmNsorted, False,
|
||||
XmNshowLabel, False,
|
||||
XmNmarginHeight, 0,
|
||||
XmNmarginWidth, 0,
|
||||
XmNselectionPolicy, XmSINGLE_SELECT,
|
||||
XmNvalue, "",
|
||||
|
||||
/* hack alert -- the width of the combobox should be relative to the font, should
|
||||
be relative to the size of the cell in which it will fit. */
|
||||
XmNwidth, 53,
|
||||
NULL);
|
||||
|
||||
popData -> combobox = combobox;
|
||||
|
||||
/* add callbacks to detect a selection */
|
||||
XtAddCallback (combobox, XmNselectionCallback, selectCB, (XtPointer)popData);
|
||||
XtAddCallback (combobox, XmNunselectionCallback, selectCB, (XtPointer)popData);
|
||||
|
||||
return popData;
|
||||
}
|
||||
|
||||
/********************************************************************\
|
||||
* AddPopBoxMenuItem *
|
||||
* add a menu item to the pop box *
|
||||
* *
|
||||
* Args: PopBox - the pop GUI structure *
|
||||
* menustr -- the menu entry to be added *
|
||||
* Return: void *
|
||||
\********************************************************************/
|
||||
|
||||
void AddPopBoxMenuItem (PopBox *ab, char * menustr)
|
||||
{
|
||||
XmString str;
|
||||
str = XmStringCreateLtoR (menustr, XmSTRING_DEFAULT_CHARSET);
|
||||
XmComboBoxAddItem (ab->combobox, str, 0);
|
||||
XmStringFree (str);
|
||||
}
|
||||
|
||||
/********************************************************************\
|
||||
* SetPopBox *
|
||||
* moves the ComboBox to the indicated column, row *
|
||||
* *
|
||||
* Args: PopBox - the pop GUI structure *
|
||||
* row -- the row of the Xbae Matrix *
|
||||
* col -- the col of the Xbae Matrix *
|
||||
* Return: void *
|
||||
\********************************************************************/
|
||||
|
||||
|
||||
void SetPopBox (PopBox *ab, int row, int col)
|
||||
{
|
||||
String choice;
|
||||
XmString choosen;
|
||||
|
||||
/* if the drop-down menu is showing, hide it now */
|
||||
XmComboBoxHideList (ab->combobox);
|
||||
|
||||
/* if there is an old widget, remove it */
|
||||
if ((0 <= ab->currow) && (0 <= ab->curcol)) {
|
||||
XbaeMatrixSetCellWidget (ab->reg, ab->currow, ab->curcol, NULL);
|
||||
}
|
||||
ab->currow = row;
|
||||
ab->curcol = col;
|
||||
|
||||
/* if the new position is valid, go to it,
|
||||
* otherwise, unmanage the widget */
|
||||
if ((0 <= ab->currow) && (0 <= ab->curcol)) {
|
||||
|
||||
/* Get the current cell contents, and set the
|
||||
* combobox menu selction to match the contents */
|
||||
choice = XbaeMatrixGetCell (ab->reg, ab->currow, ab->curcol);
|
||||
|
||||
/* do a menu selection only if the cell ain't empty. */
|
||||
if (0x0 != choice[0]) {
|
||||
/* convert String to XmString ... arghhh */
|
||||
choosen = XmCvtCTToXmString (choice);
|
||||
XmComboBoxSelectItem (ab->combobox, choosen, False);
|
||||
XmStringFree (choosen);
|
||||
} else {
|
||||
XmComboBoxClearItemSelection (ab->combobox);
|
||||
}
|
||||
|
||||
/* set the cell widget */
|
||||
XbaeMatrixSetCellWidget (ab->reg, row, col, ab->combobox);
|
||||
|
||||
if (!XtIsManaged (ab->combobox)) {
|
||||
XtManageChild (ab->combobox);
|
||||
}
|
||||
|
||||
/* drop down the menu so that its ready to go. */
|
||||
XmComboBoxShowList (ab->combobox);
|
||||
} else {
|
||||
XtUnmanageChild (ab->combobox);
|
||||
}
|
||||
}
|
||||
|
||||
/********************************************************************\
|
||||
* selectCB -- get the user's selection, put the string into the *
|
||||
* cell. *
|
||||
* *
|
||||
* Args: w - the widget that called us *
|
||||
* cd - popData - the data struct for this combobox *
|
||||
* cb - *
|
||||
* Return: none *
|
||||
\********************************************************************/
|
||||
|
||||
void selectCB (Widget w, XtPointer cd, XtPointer cb )
|
||||
|
||||
{
|
||||
PopBox *ab = (PopBox *) cd;
|
||||
XmComboBoxSelectionCallbackStruct *selection =
|
||||
(XmComboBoxSelectionCallbackStruct *) cb;
|
||||
char * choice;
|
||||
|
||||
choice = XmCvtXmStringToCT (selection->value);
|
||||
if (0x0 == choice) choice = "";
|
||||
|
||||
XbaeMatrixSetCell (ab->reg, ab->currow, ab->curcol, choice);
|
||||
|
||||
/* a diffeent way of getting the user's selection ... */
|
||||
/* text = XmComboBoxGetString (ab->combobox); */
|
||||
}
|
||||
/************************* END OF FILE ******************************/
|
||||
@ -0,0 +1,56 @@
|
||||
/********************************************************************\
|
||||
* XferBox.c -- account transfers for xacc (X-Accountant) *
|
||||
* Copyright (C) 1997 Linas Vepstas *
|
||||
* *
|
||||
* This program is free software; you can redistribute it and/or *
|
||||
* modify it under the terms of the GNU General Public License as *
|
||||
* published by the Free Software Foundation; either version 2 of *
|
||||
* the License, or (at your option) any later version. *
|
||||
* *
|
||||
* This program is distributed in the hope that it will be useful, *
|
||||
* but WITHOUT ANY WARRANTY; without even the implied warranty of *
|
||||
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the *
|
||||
* GNU General Public License for more details. *
|
||||
* *
|
||||
* You should have received a copy of the GNU General Public License*
|
||||
* along with this program; if not, write to the Free Software *
|
||||
* Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. *
|
||||
* *
|
||||
\********************************************************************/
|
||||
|
||||
#include <Xm/Xm.h>
|
||||
|
||||
#include "Data.h"
|
||||
#include "PopBox.h"
|
||||
#include "util.h"
|
||||
|
||||
/********************************************************************\
|
||||
* xferBox *
|
||||
* creates the xfer widget *
|
||||
* *
|
||||
* Args: parent - the parent of this window *
|
||||
* Return: PopBox - the xfer GUI structure *
|
||||
\********************************************************************/
|
||||
|
||||
PopBox *
|
||||
xferBox (Widget parent, Data *dayta)
|
||||
{
|
||||
PopBox *popGUI;
|
||||
Account * acc;
|
||||
int n;
|
||||
|
||||
popGUI = popBox (parent);
|
||||
|
||||
/* build the xfer menu out of account names */
|
||||
n = 0;
|
||||
acc = getAccount (dayta, n);
|
||||
while (acc) {
|
||||
AddPopBoxMenuItem (popGUI, acc->accountName);
|
||||
n++;
|
||||
acc = getAccount (dayta, n);
|
||||
}
|
||||
|
||||
return popGUI;
|
||||
}
|
||||
|
||||
/************************* END OF FILE ******************************/
|
||||
Loading…
Reference in new issue