Added table-spreadsheet example.

Various example mods.


git-svn-id: file:///fltk/svn/fltk/branches/branch-1.3@7994 ea41ed52-d2ee-0310-a9c1-e6b18d33e121

1 files changed, 270 insertions, 0 deletions

diff --git a/examples/table-spreadsheet.cxx b/examples/table-spreadsheet.cxx
new file mode 100644
index 000000000..7e58a9e59
--- /dev/null
+++ b/examples/table-spreadsheet.cxx
@@ -0,0 +1,270 @@
+//
+// "$Id$"
+//
+//	Simple example of an interactive spreadsheet using Fl_Table.
+//	Uses Mr. Satan's technique of instancing an Fl_Input around.
+//
+// Copyright 1998-2010 by Bill Spitzak and others.
+//
+// This library is free software; you can redistribute it and/or
+// modify it under the terms of the GNU Library General Public
+// License as published by the Free Software Foundation; either
+// version 2 of the License, or (at your option) any later version.
+//
+// This library 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
+// Library General Public License for more details.
+//
+// You should have received a copy of the GNU Library General Public
+// License along with this library; if not, write to the Free Software
+// Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307
+// USA.
+//
+// Please report all bugs and problems on the following page:
+//
+//     http://www.fltk.org/str.php
+//
+#include <stdio.h>
+#include <stdlib.h>
+#include <FL/Fl.H>
+#include <FL/Fl_Double_Window.H>
+#include <FL/Fl_Int_Input.H>
+#include <FL/Fl_Table.H>
+#include <FL/fl_draw.H>
+
+const int MAX_COLS = 10;
+const int MAX_ROWS = 10;
+
+class Spreadsheet : public Fl_Table {
+  Fl_Int_Input *input;					// single instance of Fl_Int_Input widget
+  int values[MAX_ROWS][MAX_COLS];			// array of data for cells
+  int row_edit, col_edit;				// row/col being modified
+
+protected:
+  void draw_cell(TableContext context, int=0, int=0, int=0, int=0, int=0, int=0);
+  void event_callback2();				// table's event callback (instance)
+  static void event_callback(Fl_Widget*, void *v) {	// table's event callback (static)
+    ((Spreadsheet*)v)->event_callback2();
+  }
+  // Handle input widget's callback
+  static void input_cb(Fl_Widget*, void* v) {
+    ((Spreadsheet*)v)->set_value_hide();
+  }
+
+public:
+  Spreadsheet(int x, int y, int w, int h, const char* l=0) : Fl_Table(x,y,w,h,l) {
+    callback(&event_callback, (void*)this);
+    when(FL_WHEN_NOT_CHANGED|when());
+    // Create input widget that we'll use whenever user clicks on a cell
+    input = new Fl_Int_Input(w/2,h/2,0,0);
+    input->hide();
+    input->callback(input_cb, (void*)this);
+    input->when(FL_WHEN_ENTER_KEY_ALWAYS);		// callback triggered when user hits Enter
+    input->maximum_size(5);
+    for (int c = 0; c < MAX_COLS; c++)
+      for (int r = 0; r < MAX_ROWS; r++)
+	values[r][c] = c + (r*MAX_COLS);		// initialize cells
+    end();
+  }
+  ~Spreadsheet() { }
+
+  // Apply value from input widget to values[row][col] array and hide (done editing)
+  void set_value_hide() {
+    values[row_edit][col_edit] = atoi(input->value());
+    input->hide();
+    window()->cursor(FL_CURSOR_DEFAULT);		// XXX: if we don't do this, cursor can disappear!
+  }
+  // Start editing a new cell: move the Fl_Int_Input widget to specified row/column
+  //    Preload the widget with the cell's current value,
+  //    and make the widget 'appear' at the cell's location.
+  //
+  void start_editing(int R, int C) {
+    row_edit = R;					// Now editing this row/col
+    col_edit = C;
+    int X,Y,W,H;
+    find_cell(CONTEXT_CELL, R,C, X,Y,W,H);		// Find X/Y/W/H of cell
+    input->resize(X,Y,W,H);				// Move Fl_Input widget there
+    char s[30]; sprintf(s, "%d", values[R][C]);		// Load input widget with cell's current value
+    input->value(s);
+    input->position(0,strlen(s));			// Select entire input field
+    input->show();					// Show the input widget, now that we've positioned it
+    input->take_focus();
+  }
+  // Tell the input widget it's done editing, and to 'hide'
+  void done_editing() {
+    if (input->visible()) {				// input widget visible, ie. edit in progress?
+      set_value_hide();					// Transfer its current contents to cell and hide
+    }
+  }
+  // Return the sum of all rows in this column
+  int sum_rows(int C) {
+    int sum = 0;
+    for (int r=0; r<MAX_ROWS; ++r)
+      sum += values[r][C];
+    return(sum);
+  }
+  // Return the sum of all cols in this row
+  int sum_cols(int R) {
+    int sum = 0;
+    for (int c=0; c<MAX_COLS; ++c)
+      sum += values[R][c];
+    return(sum);
+  }
+  // Return the sum of all cells in table
+  int sum_all() {
+    int sum = 0;
+    for (int c=0; c<MAX_COLS; ++c)
+      for (int r=0; r<MAX_ROWS; ++r)
+	sum += values[r][c];
+    return(sum);
+  }
+};
+
+// Handle drawing all cells in table
+void Spreadsheet::draw_cell(TableContext context, int R, int C, int X, int Y, int W, int H) {
+  static char s[30]; 
+  switch ( context ) {
+    case CONTEXT_STARTPAGE:			// table about to redraw
+      break;
+
+    case CONTEXT_COL_HEADER:			// table wants us to draw a column heading (C is column)
+      fl_font(FL_HELVETICA | FL_BOLD, 14);	// set font for heading to bold
+      fl_push_clip(X,Y,W,H);			// clip region for text
+      {
+	fl_draw_box(FL_THIN_UP_BOX, X,Y,W,H, col_header_color());
+	fl_color(FL_BLACK);
+	if (C == cols()-1) {			// Last column? show 'TOTAL'
+	  fl_draw("TOTAL", X,Y,W,H, FL_ALIGN_CENTER);
+	} else {				// Not last column? show column letter
+	  sprintf(s, "%c", 'A' + C);
+	  fl_draw(s, X,Y,W,H, FL_ALIGN_CENTER);
+	}
+      }
+      fl_pop_clip();
+      return;
+
+    case CONTEXT_ROW_HEADER:			// table wants us to draw a row heading (R is row)
+      fl_font(FL_HELVETICA | FL_BOLD, 14);	// set font for row heading to bold
+      fl_push_clip(X,Y,W,H);
+      {
+	fl_draw_box(FL_THIN_UP_BOX, X,Y,W,H, row_header_color());
+	fl_color(FL_BLACK);
+	if (R == rows()-1) {			// Last row? Show 'Total'
+	  fl_draw("TOTAL", X,Y,W,H, FL_ALIGN_CENTER);
+	} else {				// Not last row? show row#
+	  sprintf(s, "%d", R+1);
+	  fl_draw(s, X,Y,W,H, FL_ALIGN_CENTER);
+	}
+      }
+      fl_pop_clip();
+      return;
+
+    case CONTEXT_CELL: {			// table wants us to draw a cell
+      if (R == row_edit && C == col_edit && input->visible()) {
+	return;					// dont draw for cell with input widget over it
+      }
+      // Background
+      if ( C < cols()-1 && R < rows()-1 ) {
+	fl_draw_box(FL_THIN_UP_BOX, X,Y,W,H, FL_WHITE);
+      } else {
+	fl_draw_box(FL_THIN_UP_BOX, X,Y,W,H, 0xbbddbb00);
+      }
+      // Text
+      fl_push_clip(X+3, Y+3, W-6, H-6);
+      {
+	fl_color(FL_BLACK); 
+	if (C == cols()-1 || R == rows()-1) {	// Last row or col? Show total
+	  fl_font(FL_HELVETICA | FL_BOLD, 14);	// ..in bold font
+	  if (C == cols()-1 && R == rows()-1) {	// Last row+col? Total all cells
+	    sprintf(s, "%d", sum_all());
+	  } else if (C == cols()-1) {		// Row subtotal
+	    sprintf(s, "%d", sum_cols(R));
+	  } else if (R == rows()-1) {		// Col subtotal
+	    sprintf(s, "%d", sum_rows(C));
+	  }
+	  fl_draw(s, X+3,Y+3,W-6,H-6, FL_ALIGN_RIGHT);
+	} else {				// Not last row or col? Show cell contents
+	  fl_font(FL_HELVETICA, 14);		// ..in regular font
+	  sprintf(s, "%d", values[R][C]);
+	  fl_draw(s, X+3,Y+3,W-6,H-6, FL_ALIGN_RIGHT);
+	}
+      }
+      fl_pop_clip();
+      return;
+    }
+
+    default:
+      return;
+  }
+}
+
+// Callback whenever someone clicks on different parts of the table
+void Spreadsheet::event_callback2() {
+  int R = callback_row();
+  int C = callback_col();
+  TableContext context = callback_context(); 
+
+  switch ( context ) {
+    case CONTEXT_CELL: {				// A table event occurred on a cell
+      switch (Fl::event()) { 				// see what FLTK event caused it
+	case FL_PUSH:					// mouse click?
+	  if (!Fl::event_clicks()) {			// single click?
+	    done_editing();				// finish editing
+	  } else {
+	    Fl::event_clicks(0);			// double click? zero clicks, fallthrough
+	    if (R != rows()-1 && C != cols()-1 )	// only edit cells not in total's columns
+	      start_editing(R,C);			// start new edit
+	  }
+	  return;
+
+	case FL_KEYBOARD: {
+	  if ( Fl::event_key() == FL_Escape ) exit(0);	// ESC closes app
+	  if (C == cols()-1 || R == rows()-1) return;	// can't edit totals column
+	  done_editing();				// finish any previous editing
+	  start_editing(R,C);				// start new edit
+	  if (Fl::event() == FL_KEYBOARD && Fl::e_text[0] != '\r') {
+	    input->handle(Fl::event());			// pass keypress to input widget
+	  }
+	  return;
+        }
+      }
+      return;
+    }
+
+    case CONTEXT_TABLE:					// A table event occurred on dead zone in table
+    case CONTEXT_ROW_HEADER:				// A table event occurred on row/column header
+    case CONTEXT_COL_HEADER:
+      done_editing();					// done editing, hide
+      return;
+    
+    default:
+      return;
+  }
+}
+
+int main() {
+  Fl_Double_Window *win = new Fl_Double_Window(862, 322, "Fl_Table Spreadsheet");
+  Spreadsheet *table = new Spreadsheet(10, 10, win->w()-20, win->h()-20);
+  // Table rows
+  table->row_header(1);
+  table->row_header_width(70);
+  table->row_resize(1);
+  table->rows(MAX_ROWS+1);		// +1: leaves room for 'total row'
+  table->row_height_all(25);
+  // Table cols
+  table->col_header(1);
+  table->col_header_height(25);
+  table->col_resize(1);
+  table->cols(MAX_COLS+1);		// +1: leaves room for 'total column'
+  table->col_width_all(70);
+  // Show window
+  win->end();
+  win->resizable(table);
+  win->show();
+  return Fl::run();
+}
+
+//
+// End of "$Id$".
+//