Logo Search packages:      
Sourcecode: nedit version File versions  Download package

grid3.c

/* -*- Mode: C; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 2 -*-
 *
 * ***** BEGIN LICENSE BLOCK *****
 * Version: MPL 1.1/GPL 2.0/LGPL 2.1
 *
 * The contents of this file are subject to the Mozilla Public License Version
 * 1.1 (the "License"); you may not use this file except in compliance with
 * the License. You may obtain a copy of the License at
 * http://www.mozilla.org/MPL/
 *
 * Software distributed under the License is distributed on an "AS IS" basis,
 * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
 * for the specific language governing rights and limitations under the
 * License.
 *
 * The Original Code is the Microline Widget Library, originally made available under the NPL by Neuron Data <http://www.neurondata.com>.
 *
 * The Initial Developer of the Original Code is
 * Netscape Communications Corporation.
 * Portions created by the Initial Developer are Copyright (C) 1998
 * the Initial Developer. All Rights Reserved.
 *
 * Contributor(s):
 *
 * Alternatively, the contents of this file may be used under the terms of
 * either the GNU General Public License Version 2 or later (the "GPL"), or
 * the GNU Lesser General Public License Version 2.1 or later (the "LGPL"),
 * in which case the provisions of the GPL or the LGPL are applicable instead
 * of those above. If you wish to allow use of your version of this file only
 * under the terms of either the GPL or the LGPL, and not to allow others to
 * use your version of this file under the terms of the MPL, indicate your
 * decision by deleting the provisions above and replace them with the notice
 * and other provisions required by the GPL or the LGPL. If you do not delete
 * the provisions above, a recipient may use your version of this file under
 * the terms of any one of the MPL, the GPL or the LGPL.
 *
 * In addition, as a special exception to the GNU GPL, the copyright holders
 * give permission to link the code of this program with the Motif and Open
 * Motif libraries (or with modified versions of these that use the same
 * license), and distribute linked combinations including the two. You
 * must obey the GNU General Public License in all respects for all of
 * the code used other than linking with Motif/Open Motif. If you modify
 * this file, you may extend this exception to your version of the file,
 * but you are not obligated to do so. If you do not wish to do so,
 * delete this exception statement from your version.
 *
 * ***** END LICENSE BLOCK ***** */


#include <Xm/Xm.h>
#include <Xm/Form.h>
#include <Xm/Text.h>
#include <Xm/Label.h>
#include <Xm/PushB.h>
#include <XmL/Grid.h>

Widget label, text, grid, gridText;

static int busy = 0;

void cellFocus();
void textModify();
void copy();
void paste();

main(argc, argv)
int argc;
char *argv[];
{
      XtAppContext app;
      Widget shell, form, copyButton, pasteButton;
      XmString str;
      char buf[4];
      int i;

      shell =  XtAppInitialize(&app, "Grid3", NULL, 0,
            &argc, argv, NULL, NULL, 0);

      form = XtVaCreateManagedWidget("form",
            xmFormWidgetClass, shell,
            XtVaTypedArg, XmNbackground, XmRString, "#C0C0C0", 8,
            XmNshadowThickness, 0,
            NULL);

      str = XmStringCreateSimple("(A 1)");
      label = XtVaCreateManagedWidget("label",
            xmLabelWidgetClass, form,
            XtVaTypedArg, XmNbackground, XmRString, "#C0C0C0", 8,
            XtVaTypedArg, XmNforeground, XmRString, "black", 6,
            XmNtopAttachment, XmATTACH_FORM,
            XmNmarginHeight, 4,
            XmNleftAttachment, XmATTACH_FORM,
            XmNlabelString, str,
            NULL);
      XmStringFree(str);

      pasteButton = XtVaCreateManagedWidget("Paste To Focus",
            xmPushButtonWidgetClass, form,
            XtVaTypedArg, XmNbackground, XmRString, "#C0C0C0", 8,
            XtVaTypedArg, XmNforeground, XmRString, "black", 6,
            XmNrightAttachment, XmATTACH_FORM,
            XmNmarginHeight, 0,
            NULL);
      XtAddCallback(pasteButton, XmNactivateCallback, paste, NULL);

      copyButton = XtVaCreateManagedWidget("Copy Selected",
            xmPushButtonWidgetClass, form,
            XtVaTypedArg, XmNbackground, XmRString, "#C0C0C0", 8,
            XtVaTypedArg, XmNforeground, XmRString, "black", 6,
            XmNrightAttachment, XmATTACH_WIDGET,
            XmNrightWidget, pasteButton,
            XmNmarginHeight, 0,
            NULL);
      XtAddCallback(copyButton, XmNactivateCallback, copy, NULL);

      text = XtVaCreateManagedWidget("text",
            xmTextWidgetClass, form,
            XtVaTypedArg, XmNbackground, XmRString, "white", 6,
            XtVaTypedArg, XmNforeground, XmRString, "black", 6,
            XmNtopAttachment, XmATTACH_FORM,
            XmNleftAttachment, XmATTACH_WIDGET,
            XmNleftWidget, label,
            XmNrightAttachment, XmATTACH_WIDGET,
            XmNrightWidget, copyButton,
            XmNmarginHeight, 0,
            NULL);

      /* Create a Grid with 1 heading column and 1 heading row */
      grid = XtVaCreateManagedWidget("grid",
            xmlGridWidgetClass, form,
            XtVaTypedArg, XmNbackground, XmRString, "#C0C0C0", 8,
            XtVaTypedArg, XmNforeground, XmRString, "black", 6,
            XmNheadingColumns, 1,
            XmNcolumns, 26,
            XmNvisibleColumns, 8,
            XmNhsbDisplayPolicy, XmSTATIC,
            XmNrows, 100,
            XmNheadingRows, 1,
            XmNvisibleRows, 12,
            XmNvsbDisplayPolicy, XmSTATIC,
            XmNallowDragSelected, True,
            XmNallowDrop, True,
            XmNallowRowResize, True,
            XmNallowColumnResize, True,
            XmNtopAttachment, XmATTACH_WIDGET,
            XmNtopWidget, text,
            XmNtopOffset, 2,
            XmNbottomAttachment, XmATTACH_FORM,
            XmNleftAttachment, XmATTACH_FORM,
            XmNrightAttachment, XmATTACH_FORM,
            XmNshadowThickness, 0,
            XmNselectionPolicy, XmSELECT_CELL,
            NULL);

      /* Make all cells in the content rows and content columns */
      /* (the data cells) editable and set their borders and color */
      XtVaSetValues(grid,
            XmNcellEditable, True,
            XtVaTypedArg, XmNcellBackground, XmRString, "white", 6,
            XmNcellAlignment, XmALIGNMENT_RIGHT,
            XmNcellTopBorderType, XmBORDER_NONE,
            XmNcellLeftBorderType, XmBORDER_NONE,
            XtVaTypedArg, XmNcellRightBorderColor, XmRString, "#606060", 8,
            XtVaTypedArg, XmNcellBottomBorderColor, XmRString, "#606060", 8,
            NULL);

      /* Add callbacks which update the Label and to synchronize */
      /* the Text widget outside the Grid with the one inside the Grid */
      XtAddCallback(grid, XmNcellFocusCallback, cellFocus, NULL);
      XtAddCallback(text, XmNvalueChangedCallback, textModify, NULL);
      XtVaGetValues(grid,
            XmNtextWidget, &gridText,
            NULL);
      XtAddCallback(gridText, XmNvalueChangedCallback, textModify, NULL);

      XtVaSetValues(gridText,
            XtVaTypedArg, XmNbackground, XmRString, "white", 6,
            NULL);

      /* Set the labels on the heading rows and columns */
      for (i = 0; i < 26; i++)
      {
            sprintf(buf, "%c", 'A' + i);
            XmLGridSetStringsPos(grid, XmHEADING, 0, XmCONTENT, i, buf);
      }
      for (i = 0; i < 100; i++)
      {
            sprintf(buf, "%d", i + 1);
            XmLGridSetStringsPos(grid, XmCONTENT, i, XmHEADING, 0, buf);
      }

      XtRealizeWidget(shell);
      XtAppMainLoop(app);
}


void cellFocus(w, clientData, callData)
Widget w;
XtPointer clientData;
XtPointer callData;
{
      XmLGridCallbackStruct *cbs;
      XmLGridRow row;
      XmLGridColumn column;
      Widget sharedText;
      XmString str;
      char buf[10], *c;

      cbs = (XmLGridCallbackStruct *)callData;
      if (cbs->reason != XmCR_CELL_FOCUS_IN)
            return;

      /* Update the Label to reflect the new focus position */
      sprintf(buf, "(%c %d)", 'A' + cbs->column, cbs->row + 1);
      str = XmStringCreateSimple(buf);
      XtVaSetValues(label,
            XmNlabelString, str,
            NULL);
      XmStringFree(str);

      /* Set the Text widget outside the Grid to the string contained */
      /* in the new focus cell.  We set busy here because this change will */
      /* generate a valueChanged callback and we want to notify our */
      /* valueChanged callback not to do any processing because of */
      /* this change */
      if (busy)
            return;
      busy = 1;
      row = XmLGridGetRow(w, cbs->rowType, cbs->row);
      column = XmLGridGetColumn(w, cbs->columnType, cbs->column);
      XtVaGetValues(w,
            XmNrowPtr, row,
            XmNcolumnPtr, column,
            XmNcellString, &str,
            NULL);
      c = 0;
      if (str)
            XmStringGetLtoR(str, XmSTRING_DEFAULT_CHARSET, &c);
      if (c)
      {
            XmTextSetString(text, c);
            XtFree(c);
            XmTextSetSelection(text, 0, XmTextGetLastPosition(text),
                  CurrentTime);
      }
      else
            XmTextSetString(text, "");
      if (str)
            XmStringFree(str);
      busy = 0;
}

void textModify(w, clientData, callData)
Widget w;
XtPointer clientData;
XtPointer callData;
{
      int row, column;
      Boolean focusIn;
      XmString str;
      char *c;

      /* If either Text widget changes (the Grid's Text widget or */
      /* the Text widget outside of the Grid), update the other one */
      /* to reflect to change and update the Grid itself if the */
      /* Text widget outside the Grid changes.  We set busy in this */
      /* function to keep the XmTextSetString() from causing this */
      /* callback to be called while inside the callback. */
      if (busy)
            return;
      busy = 1;
      c = XmTextGetString(w);
      if (w == gridText)
            XmTextSetString(text, c);
      else
      {
            XmLGridGetFocus(grid, &row, &column, &focusIn);
            if (row != -1 && column != -1)
            {
                  str = XmStringCreateSimple(c);
                  XtVaSetValues(grid,
                        XmNrow, row,
                        XmNcolumn, column,
                        XmNcellString, str,
                        NULL);
                  XmStringFree(str);
                  XmTextSetString(gridText, c);
            }
      }
      XtFree(c);
      busy = 0;
}

void copy(w, clientData, callData)
Widget w;
XtPointer clientData;
XtPointer callData;
{
      XmLGridCopySelected(grid, CurrentTime);
}

void paste(w, clientData, callData)
Widget w;
XtPointer clientData;
XtPointer callData;
{
      /* This pastes starting at the current focus cell, an alternative */
      /* method of pasting would be to have the user select an area */
      /* to paste into. To perform this, we could get the selected area */
      /* and use XmLGridPastePos() to paste into that area */
      XmLGridPaste(grid);
}

Generated by  Doxygen 1.6.0   Back to index