123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342 |
- /* TableEditor.cpp
- *
- * Copyright (C) 2006-2013,2015-2018 Paul Boersma
- *
- * This code 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 code 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 work. If not, see <http://www.gnu.org/licenses/>.
- */
- #include "TableEditor.h"
- #include "machine.h"
- #include "EditorM.h"
- Thing_implement (TableEditor, Editor, 0);
- #include "prefs_define.h"
- #include "TableEditor_prefs.h"
- #include "prefs_install.h"
- #include "TableEditor_prefs.h"
- #include "prefs_copyToInstance.h"
- #include "TableEditor_prefs.h"
- #define SIZE_INCHES 40
- /********** EDITOR METHODS **********/
- void structTableEditor :: v_destroy () noexcept {
- TableEditor_Parent :: v_destroy ();
- }
- void structTableEditor :: v_info () {
- our TableEditor_Parent :: v_info ();
- MelderInfo_writeLine (U"Table uses text styles: ", our p_useTextStyles);
- //MelderInfo_writeLine (U"Table font size: ", our p_fontSize);
- }
- static void updateVerticalScrollBar (TableEditor me) {
- Table table = static_cast<Table> (my data);
- GuiScrollBar_set (my verticalScrollBar, undefined, table -> rows.size + 1, my topRow, undefined, undefined, undefined);
- }
- static void updateHorizontalScrollBar (TableEditor me) {
- Table table = static_cast<Table> (my data);
- GuiScrollBar_set (my horizontalScrollBar, undefined, table -> numberOfColumns + 1, my leftColumn, undefined, undefined, undefined);
- }
- void structTableEditor :: v_dataChanged () {
- Table table = static_cast<Table> (our data);
- if (topRow > table -> rows.size) topRow = table -> rows.size;
- if (leftColumn > table -> numberOfColumns) leftColumn = table -> numberOfColumns;
- updateVerticalScrollBar (this);
- updateHorizontalScrollBar (this);
- Graphics_updateWs (our graphics.get());
- }
- /********** FILE MENU **********/
- static void menu_cb_preferences (TableEditor me, EDITOR_ARGS_FORM) {
- EDITOR_FORM (U"TableEditor preferences", nullptr);
- OPTIONMENU (useTextStyles, U"The symbols %#_^ in labels", my default_useTextStyles () + 1)
- OPTION (U"are shown as typed")
- OPTION (U"mean italic/bold/sub/super")
- EDITOR_OK
- SET_OPTION (useTextStyles, my p_useTextStyles + 1)
- EDITOR_DO
- my pref_useTextStyles () = my p_useTextStyles = useTextStyles - 1;
- Graphics_updateWs (my graphics.get());
- EDITOR_END
- }
- /********** EDIT MENU **********/
- #ifndef macintosh
- /*
- On macOS, Cut/Copy/Paste are already available in the Praat:Edit menu.
- */
- static void menu_cb_CutText (TableEditor me, EDITOR_ARGS_DIRECT) {
- GuiText_cut (my text);
- }
- static void menu_cb_CopyText (TableEditor me, EDITOR_ARGS_DIRECT) {
- GuiText_copy (my text);
- }
- static void menu_cb_PasteText (TableEditor me, EDITOR_ARGS_DIRECT) {
- GuiText_paste (my text);
- }
- static void menu_cb_EraseText (TableEditor me, EDITOR_ARGS_DIRECT) {
- GuiText_remove (my text);
- }
- #endif
- /********** VIEW MENU **********/
- /********** HELP MENU **********/
- static void menu_cb_TableEditorHelp (TableEditor, EDITOR_ARGS_DIRECT) {
- Melder_help (U"TableEditor");
- }
- /********** DRAWING AREA **********/
- void structTableEditor :: v_draw () {
- Table table = static_cast<Table> (data);
- double spacing = 2.0; // millimetres at both edges
- double columnWidth, cellWidth;
- /*
- * We fit 200 rows in 40 inches, which is 14.4 points per row.
- */
- integer rowmin = topRow, rowmax = rowmin + 197;
- integer colmin = leftColumn, colmax = colmin + (kTableEditor_MAXNUM_VISIBLE_COLUMNS - 1);
- if (rowmax > table -> rows.size) rowmax = table -> rows.size;
- if (colmax > table -> numberOfColumns) colmax = table -> numberOfColumns;
- Graphics_clearWs (graphics.get());
- Graphics_setTextAlignment (graphics.get(), Graphics_CENTRE, Graphics_HALF);
- Graphics_setWindow (graphics.get(), 0.0, 1.0, rowmin + 197.5, rowmin - 2.5);
- Graphics_setColour (graphics.get(), Graphics_SILVER);
- Graphics_fillRectangle (graphics.get(), 0.0, 1.0, rowmin - 2.5, rowmin - 0.5);
- Graphics_setColour (graphics.get(), Graphics_BLACK);
- Graphics_line (graphics.get(), 0.0, rowmin - 0.5, 1.0, rowmin - 0.5);
- Graphics_setWindow (graphics.get(), 0.0, Graphics_dxWCtoMM (graphics.get(), 1.0), rowmin + 197.5, rowmin - 2.5);
- /*
- * Determine the width of the column with the row numbers.
- */
- columnWidth = Graphics_textWidth (graphics.get(), U"row");
- for (integer irow = rowmin; irow <= rowmax; irow ++) {
- cellWidth = Graphics_textWidth (graphics.get(), Melder_integer (irow));
- if (cellWidth > columnWidth) columnWidth = cellWidth;
- }
- columnLeft [0] = columnWidth + 2 * spacing;
- Graphics_setColour (graphics.get(), Graphics_SILVER);
- Graphics_fillRectangle (graphics.get(), 0.0, columnLeft [0], rowmin - 0.5, rowmin + 197.5);
- Graphics_setColour (graphics.get(), Graphics_BLACK);
- Graphics_line (graphics.get(), columnLeft [0], rowmin - 0.5, columnLeft [0], rowmin + 197.5);
- /*
- * Determine the width of the columns.
- */
- for (integer icol = colmin; icol <= colmax; icol ++) {
- conststring32 columnLabel = table -> columnHeaders [icol]. label.get();
- columnWidth = Graphics_textWidth (graphics.get(), Melder_integer (icol));
- if (! columnLabel) columnLabel = U"";
- cellWidth = Graphics_textWidth (graphics.get(), columnLabel);
- if (cellWidth > columnWidth) columnWidth = cellWidth;
- for (integer irow = rowmin; irow <= rowmax; irow ++) {
- conststring32 cell = Table_getStringValue_Assert (table, irow, icol);
- Melder_assert (cell);
- if (cell [0] == U'\0') cell = U"?";
- cellWidth = Graphics_textWidth (graphics.get(), cell);
- if (cellWidth > columnWidth) columnWidth = cellWidth;
- }
- columnRight [icol - colmin] = columnLeft [icol - colmin] + columnWidth + 2 * spacing;
- if (icol < colmax) columnLeft [icol - colmin + 1] = columnRight [icol - colmin];
- }
- /*
- Text can be "graphic" or not.
- */
- Graphics_setPercentSignIsItalic (our graphics.get(), our p_useTextStyles);
- Graphics_setNumberSignIsBold (our graphics.get(), our p_useTextStyles);
- Graphics_setCircumflexIsSuperscript (our graphics.get(), our p_useTextStyles);
- Graphics_setUnderscoreIsSubscript (our graphics.get(), our p_useTextStyles);
- /*
- * Show the row numbers.
- */
- Graphics_text (graphics.get(), columnLeft [0] / 2, rowmin - 1, U"row");
- for (integer irow = rowmin; irow <= rowmax; irow ++) {
- Graphics_text (graphics.get(), columnLeft [0] / 2, irow, irow);
- }
- /*
- * Show the column labels.
- */
- for (integer icol = colmin; icol <= colmax; icol ++) {
- double mid = (columnLeft [icol - colmin] + columnRight [icol - colmin]) / 2;
- conststring32 columnLabel = table -> columnHeaders [icol]. label.get();
- if (! columnLabel || columnLabel [0] == U'\0') columnLabel = U"?";
- Graphics_text (graphics.get(), mid, rowmin - 2, icol);
- Graphics_text (graphics.get(), mid, rowmin - 1, columnLabel);
- }
- /*
- * Show the cell contents.
- */
- for (integer irow = rowmin; irow <= rowmax; irow ++) {
- for (integer icol = colmin; icol <= colmax; icol ++) {
- if (irow == selectedRow && icol == selectedColumn) {
- Graphics_setColour (graphics.get(), Graphics_YELLOW);
- double dx = Graphics_dxMMtoWC (graphics.get(), 0.3);
- Graphics_fillRectangle (graphics.get(),
- columnLeft [icol - colmin] + dx, columnRight [icol - colmin] - dx, irow - 0.45, irow + 0.55);
- Graphics_setColour (graphics.get(), Graphics_BLACK);
- }
- double mid = (columnLeft [icol - colmin] + columnRight [icol - colmin]) / 2;
- conststring32 cell = Table_getStringValue_Assert (table, irow, icol);
- Melder_assert (cell);
- if (cell [0] == U'\0') cell = U"?";
- Graphics_text (graphics.get(), mid, irow, cell);
- }
- }
- }
- bool structTableEditor :: v_clickCell (integer row, integer column, bool /* shiftKeyPressed */) {
- Table table = static_cast<Table> (our data);
- our selectedRow = row;
- our selectedColumn = column;
- return true;
- }
- static void gui_text_cb_changed (TableEditor me, GuiTextEvent /* event */) {
- Editor_broadcastDataChanged (me);
- }
- static void gui_drawingarea_cb_expose (TableEditor me, GuiDrawingArea_ExposeEvent /* event */) {
- if (! my graphics) return;
- my v_draw ();
- }
- static void gui_drawingarea_cb_click (TableEditor me, GuiDrawingArea_ClickEvent event) {
- Table table = static_cast<Table> (my data);
- if (! my graphics) return; // could be the case in the very beginning
- integer rowmin = my topRow, rowmax = rowmin + 197;
- integer colmin = my leftColumn, colmax = colmin + (kTableEditor_MAXNUM_VISIBLE_COLUMNS - 1);
- if (rowmax > table -> rows.size) rowmax = table -> rows.size;
- if (colmax > table -> numberOfColumns) colmax = table -> numberOfColumns;
- double xWC, yWC;
- Graphics_DCtoWC (my graphics.get(), event -> x, event -> y, & xWC, & yWC);
- if (yWC < rowmin - 0.45 || yWC > rowmax + 0.55)
- return;
- for (integer icol = colmin; icol <= colmax; icol ++) {
- if (xWC > my columnLeft [icol - colmin] && xWC < my columnRight [icol - colmin]) {
- integer selectedRow = Melder_iround (yWC);
- integer selectedColumn = icol;
- if (my v_clickCell (selectedRow, selectedColumn, event -> shiftKeyPressed))
- Graphics_updateWs (my graphics.get());
- return;
- }
- }
- }
- static void gui_drawingarea_cb_resize (TableEditor me, GuiDrawingArea_ResizeEvent /* event */) {
- if (! my graphics) return;
- Graphics_updateWs (my graphics.get());
- }
- static void gui_cb_scrollHorizontal (TableEditor me, GuiScrollBarEvent event) {
- integer value = GuiScrollBar_getValue (event -> scrollBar);
- if (value != my leftColumn) {
- my leftColumn = value;
- #if cocoa || gtk || motif
- Graphics_updateWs (my graphics.get()); // wait for expose event
- #else
- Graphics_clearWs (my graphics.get());
- my v_draw (); // do not wait for expose event
- #endif
- }
- }
- static void gui_cb_scrollVertical (TableEditor me, GuiScrollBarEvent event) {
- integer value = GuiScrollBar_getValue (event -> scrollBar);
- if (value != my topRow) {
- my topRow = value;
- #if cocoa || gtk || motif
- Graphics_updateWs (my graphics.get()); // wait for expose event
- #else
- Graphics_clearWs (my graphics.get());
- my v_draw (); // do not wait for expose event
- #endif
- }
- }
- void structTableEditor :: v_createChildren () {
- Table table = static_cast<Table> (data);
- int y = Machine_getMenuBarHeight () + 4, scrollWidth = Machine_getScrollBarWidth ();
- our text = GuiText_createShown (our windowForm, 0, 0, y, y + Machine_getTextHeight (), 0);
- GuiText_setChangedCallback (our text, gui_text_cb_changed, this);
- y += Machine_getTextHeight () + 4;
- our drawingArea = GuiDrawingArea_createShown (our windowForm, 0, - scrollWidth, y, - scrollWidth,
- gui_drawingarea_cb_expose, gui_drawingarea_cb_click, NULL, gui_drawingarea_cb_resize, this, 0);
- our verticalScrollBar = GuiScrollBar_createShown (our windowForm, - scrollWidth, 0, y, - scrollWidth,
- 1, table -> rows.size + 1, 1, 1, 1, 10, gui_cb_scrollVertical, this, 0);
- our horizontalScrollBar = GuiScrollBar_createShown (our windowForm, 0, - scrollWidth, - scrollWidth, 0,
- 1, table -> numberOfColumns + 1, 1, 1, 1, 3, gui_cb_scrollHorizontal, this, GuiScrollBar_HORIZONTAL);
- GuiDrawingArea_setSwipable (our drawingArea, our horizontalScrollBar, our verticalScrollBar);
- }
- void structTableEditor :: v_createMenus () {
- TableEditor_Parent :: v_createMenus ();
- Editor_addCommand (this, U"File", U"Preferences...", 0, menu_cb_preferences);
- Editor_addCommand (this, U"File", U"-- before scripting --", 0, nullptr);
- #ifndef macintosh
- Editor_addCommand (this, U"Edit", U"-- cut copy paste text --", 0, nullptr);
- Editor_addCommand (this, U"Edit", U"Cut text", 'X', menu_cb_CutText);
- Editor_addCommand (this, U"Edit", U"Copy text", 'C', menu_cb_CopyText);
- Editor_addCommand (this, U"Edit", U"Paste text", 'V', menu_cb_PasteText);
- Editor_addCommand (this, U"Edit", U"Erase text", 0, menu_cb_EraseText);
- #endif
- }
- void structTableEditor :: v_createHelpMenuItems (EditorMenu menu) {
- TableEditor_Parent :: v_createHelpMenuItems (menu);
- EditorMenu_addCommand (menu, U"TableEditor help", U'?', menu_cb_TableEditorHelp);
- }
- autoTableEditor TableEditor_create (conststring32 title, Table table) {
- try {
- autoTableEditor me = Thing_new (TableEditor);
- Editor_init (me.get(), 0, 0, 700, 500, title, table);
- #if motif
- Melder_assert (XtWindow (my drawingArea -> d_widget));
- #endif
- my topRow = 1;
- my leftColumn = 1;
- my selectedColumn = 1;
- my selectedRow = 1;
- my graphics = Graphics_create_xmdrawingarea (my drawingArea);
- double size_pixels = SIZE_INCHES * Graphics_getResolution (my graphics.get());
- Graphics_setWsViewport (my graphics.get(), 0.0, size_pixels, 0.0, size_pixels);
- Graphics_setWsWindow (my graphics.get(), 0.0, size_pixels, 0.0, size_pixels);
- Graphics_setViewport (my graphics.get(), 0.0, size_pixels, 0.0, size_pixels);
- Graphics_setFont (my graphics.get(), kGraphics_font::COURIER);
- Graphics_setFontSize (my graphics.get(), 12);
- Graphics_setUnderscoreIsSubscript (my graphics.get(), false);
- Graphics_setAtSignIsLink (my graphics.get(), true);
- return me;
- } catch (MelderError) {
- Melder_throw (U"TableEditor not created.");
- }
- }
- /* End of file TableEditor.cpp */
|