fxruby 1.2.2

data/examples/textedit/commands.rb

@@ -0,0 +1,117 @@
+require 'fox12/undolist'
+
+# Undo record for text fragment
+class FXTextCommand < FXCommand
+
+  attr_reader :numCharsInserted
+  attr_reader :numCharsDeleted
+
+  def initialize(txt, p, ni, nd)
+    @text = txt
+    @buffer = nil
+    @pos = p
+    @numCharsDeleted = nd
+    @numCharsInserted = ni
+  end
+
+  def size
+    (@buffer != nil) ? @buffer.size : 0
+  end
+end
+
+# Insert command
+class FXTextInsert < FXTextCommand
+  def initialize(txt, p, ni)
+    super(txt, p, ni, 0)
+  end
+
+  def undoName
+    "Undo insert"
+  end
+
+  def redoName
+    "Redo insert"
+  end
+
+  # Undoing an insert removes the previously inserted text
+  def undo
+    @buffer = @text.extractText(@pos, numCharsInserted)
+    @text.removeText(@pos, numCharsInserted)
+    @text.cursorPos = @pos
+    @text.makePositionVisible(@pos)
+  end
+
+  # Redoing an insert re-inserts the same text
+  def redo
+    @text.insertText(@pos, @buffer)
+    @text.cursorPos = @pos + numCharsInserted
+    @text.makePositionVisible(@pos + numCharsInserted)
+    @buffer = nil
+  end
+end
+
+# Delete command
+class FXTextDelete < FXTextCommand
+  def initialize(txt, p, nd)
+    super(txt, p, 0, nd)
+    @buffer = @text.extractText(@pos, nd)
+  end
+
+  def undoName
+    "Undo delete"
+  end
+
+  def redoName
+    "Redo delete"
+  end
+
+  # Undoing a delete re-inserts the deleted text
+  def undo
+    @text.insertText(@pos, @buffer)
+    @text.cursorPos = @pos + @buffer.length
+    @text.makePositionVisible(@pos + @buffer.length)
+    @buffer = nil
+  end
+
+  # Redoing a delete removes it again
+  def redo
+    @buffer = @text.extractText(@pos, numCharsDeleted)
+    @text.removeText(@pos, @buffer.length)
+    @text.cursorPos = @pos
+    @text.makePositionVisible(@pos)
+  end
+end
+
+# Replace command
+class FXTextReplace < FXTextCommand
+  def initialize(txt, p, ni, nd)
+    super(txt, p, ni, nd)
+    @buffer = @text.extractText(@pos, nd)
+  end
+
+  def undoName
+    "Undo replace"
+  end
+
+  def redoName
+    "Redo replace"
+  end
+
+  # Undoing a replace reinserts the old text
+  def undo
+    tmp = @text.extractText(@pos, numCharsInserted)
+    @text.replaceText(@pos, numCharsInserted, @buffer)
+    @text.cursorPos = @pos + @buffer.length
+    @text.makePositionVisible(@pos + @buffer.length)
+    @buffer = tmp
+  end
+
+  # Redo a replace reinserts the new text
+  def redo
+    tmp = @text.extractText(@pos, numCharsDeleted)
+    @text.replaceText(@pos, numCharsDeleted, @buffer)
+    @text.cursorPos = @pos + numCharsInserted
+    @text.makePositionVisible(@pos + numCharsInserted)
+    @buffer = tmp
+  end
+end

data/examples/textedit/helpwindow.rb

@@ -0,0 +1,295 @@
+# Help text
+HELP = <<END_OF_HELP
+
+
+                                FOX Text Editor On-line Help
+
+
+Introduction.
+
+TextEdit is a handy little editor which is fast and easy to use.
+It makes for a great file viewer, as well as a convenient editor for most
+common editing tasks.
+TextEdit supports unlimited undo/redo, X selection, clipboard, XDND drag and drop
+capability, continuous word wrapping, auto-indent capability, brace matching,
+convenient search and replace methods, and statement block selections.
+TextEdit also supports the mouse wheel.
+A nice feature of textedit is the ability to show a File Browser side by
+side with the text.  Switching to another file is as easy as clicking on an
+icon in the File Browser.
+
+
+Starting a New Document.
+
+To start a new document, invoke the New menu, or press on the New button on
+the toolbar.  If the current document has not yet been saved, you will be prompted
+to either save or abandon the current text.
+
+
+Opening and Saving Files the Old Fashioned Way.
+
+To open a file, you can invoke the Open menu, or press on the Open button on
+the toolbar.  This will bring up the standard File Dialog, which allows you
+to select a file.
+To save a file, you can either invoke the Save or the Save As menu option.
+The former saves the file back to the same filename, while the latter prompts
+for an alternative filename.
+You can quickly navigate to the desired file by typing the first few letters of
+the filename and then pressing Enter (Return); use Backspace to move up one directory
+level.  Control-H moves to your home directory, Control-W moves back to the current
+working directory.
+A nice convenience of the File Dialog is the ability to set bookmarks, so once
+bookmarked, you can quickly move back to a previously visited directory.
+
+
+Opening Files Using the File Browser.
+
+An alternative method to open files is the File Browser.
+You can display the File Browser by invoking the File Browser option under
+the View menu.
+To open a file using the File Browser, simply click on the file.
+If there are many files, you may want to limit the number of files displayed
+by specifying a file pattern in the Filter typein field.
+The pattern is can be any regular file wildcard expression such as "*.cpp".
+By default, the File Browser shows all files, i.e. the pattern is "*".
+You can switch patterns by means of the combo box under file File Browser;
+additional patterns for the combo box (and File Dialog) can be specified
+in the Preferences Dialog.
+
+
+Opening Recently Visited Files.
+
+The recent file menu shows files which have been recently visited.
+You can quickly get back to a file you've been editing simply by selecting
+one of these recent files.
+
+
+Opening Files by Drag and Drop.
+
+Using a file browser such as PathFinder or other Konqueror or other XDND
+compatible file browsers, you can simply drop a file into the text pane and
+have TextEdit read this file.
+
+
+Opening a Selected Filename
+
+Selecting any filename, possibly in another application, and invoking the
+"Open Selected" option causes TextEdit to open the selected file.
+When the selected filename is of the form:
+
+   #include "filename.h"
+
+or:
+
+   #include <filename.h>
+
+then TextEdit will search for this file in a sequence of include directories,
+otherwise it will search in the same directory as the currently loaded file.
+You can specify the list of include directories to search with the "Include Path"
+option.
+When the selected filename is of the form:
+
+   filename.cpp:177
+
+then TextEdit will not only load the filename, but also jump to the given line
+number.  If this file has already been loaded, TextEdit will simply jump to the
+given line number in the current file.
+This option is very useful when fixing compiler errors.
+
+
+Mouse Selection.
+
+You can move the cursor by simply clicking on the desired location with the left mouse button.
+To highlight some text, press the mouse and drag the mouse while holding the left button.
+To select text a word at a time, you can double-click and drag;
+to select text a line at a time, you can triple-click and drag.
+Performing a shift-click extends the selection from the last cursor location to the
+current one.
+When selecting words, words are considered to extend from the clicked position up to
+a blank or word-delimiting character.  The latter may depend on the programming language,
+and so TextEdit offers a way to change the set of delimiter characters.
+The default set of delimiters is "!"#\$%&'()*+,-./:;<=>?@[\\]^`{|}~".
+
+
+Scrolling Text.
+
+Using the right mouse button, you can grab the text and scroll it.
+a right mouse drag is a very convenient way to scroll the text buffer by small amount
+as the scrolling is exactly proportional to the mouse movement.
+You can of course also use the scroll bars.  Because scrolling becomes awkward when
+dealing with large amounts of text, you can do a fine scroll or vernier-scroll by
+holding the shift or control keys while moving the scroll bars.
+TextEdit can also take advantage of a wheel mouse; simply point the mouse inside the
+text area and use the wheel to scroll it up and down.  Holding the Control-key while
+operating the wheel makes the scrolling go faster, by smoothly scrolling one page at
+a time.  To scroll horizontally, simply point the mouse at the horizontal scroll bar.
+In fact, any scrollable control (including the File Browser), can be scrolled by
+simply pointing the cursor over it and using the mouse wheel.
+You can adjust the number of lines scrolled for each wheel notch by means of the
+Preferences dialog.
+
+
+The Clipboard.
+
+After selecting some text, you can cut or copy this text to the clipboard.
+A subsequent paste operation will then insert the contents of the clipboard at
+the current cursor location.
+If some text has been selected in another application, then you can paste this
+text by placing the cursor at the right spot in your text and invoking the paste
+command.
+
+
+The X Selection.
+
+When text is selected anywhere (possibly in another application), TextEdit can
+paste this text into the current text buffer by means of the middle mouse button
+or by pressing the wheel-button if you have a wheel mouse.  Note that while holding
+the button, the insertion point can be moved by moving the mouse:- TextEdit will
+only insert the text when you release the button.
+
+
+Text Drag and Drop.
+
+After selecting some text, you can drag this text to another location by pressing the
+middle mouse button; because TextEdit is fully drag and drop enabled, you can not only
+drag a selection from one place to another inside the text buffer, but also between different
+TextEdit applications, or even from TextEdit to another drag and drop enabled application
+or vice-versa.
+Within the same text window, the drag defaults to a text-movement.  You can change this to
+a text copy by holding down the Control key while you're dragging.
+Between one text window and another, the drag defaults to a copy operation
+you can change this to a text movement by holding down the Shift key while dragging.
+
+
+Undo and Redo.
+
+TextEdit support unlimited (well, the limit is large...) undo and redo capability.
+Each time you insert, remove, or replace some text, TextEdit remembers what you did.
+If you make a mistake, you can undo the last command, and the one before that, and so on.
+Having invoked undo many times, it is sometimes desirable to invoke the redo command, i.e.
+to perform the original editing operation again.  Thus, you can move backward or forward in
+time.
+However if, after undoing several commands, you decide edit the buffer in a different way, then
+you will no longer be able to redo the undone commands:- you have now taken a different path.
+When you first load a file, or just after you save it, TextEdit remembers that this version of
+the text was special; while subsequent editing commands can be undone individually, you can always
+quickly return to this special version of the text by means of the revert command.
+
+
+Keyboard Bindings.
+
+The following table lists the keyboard bindings.
+
+Key:\tAction:
+====\t=======
+
+Up\tMove cursor up.
+Shift+Up\tMove cursor up and extend selection.
+Down\tMove cursor down.
+Shift+Down\tMove cursor down and extend selection.
+Left\tMove cursor left.
+Shift+Left\tMove cursor left and extend selection.
+Right\tMove cursor right.
+Shift+Right\tMove cursor right and extend selection.
+Home\tMove cursor to begin of line.
+Shift+Home\tMove cursor to begin of line and extend selection.
+Ctl+Home\tMove cursor to top of text.
+End\tMove cursor to end of line.
+Ctl+End\tMove cursor to bottom of text.
+Shift+End\tMove cursor to end of line and extend selection.
+Page Up\tMove cursor up one page.
+Shift+Page Up\tMove cursor up one page and extend selection.
+Page Down\tMove cursor down one page.
+Shift+Page Down\tMove cursor down one page and extend selection.
+Delete\tDelete character after cursor, or text selection.
+Back Space\tDelete character before cursor, or text selection.
+Ctl+A\tSelect all text.
+Ctl+X\tCut selected text to clipboard.
+Ctl+C\tCopy selected text to clipboard.
+Ctl+V\tPaste text from clipboard.
+Ctl+K\tDelete current line.
+Ctl+H\tScroll current line to top of window.
+Ctl+M\tScroll current line to center of window.
+Ctl+L\tScroll current line to bottom of window.
+
+
+Changing Font.
+
+You can change font by invoking the Font Selection Dialog from the Font menu.
+The Font Dialog displays four list boxes showing the font Family, Weight, Style,
+and Size of each font. 
+You can narrow down the number of fonts displayed by selecting a specific character
+set, setwidth, pitch, and whether or not scalable fonts are to be listed only.
+The All Fonts checkbutton causes all fonts to be listed. Use this feature if you
+need to select old-style X11 bitmap fonts.
+The Preview window shows a sample of text in the selected font.
+
+
+Changing colors.
+
+The four color wells on the status line determine the color of the
+selection background, selection foreground, and normal background and foreground
+respectively.  Double clicking on a colorwell will bring up the Color Selection
+Dialog.
+The Color Selection Dialog sypports several ways to select a color: 
+
+1\tBy means of Red, Green, and Blue mixing.
+2\tBy means of Hue, Saturation, Value mixing.
+3\tBy means of Cyan, Magenta, and Yellow mixing.
+4\tBy name.
+5\tUsing one of the predefined color wells.
+
+You can also drag and drop colors, and change the predefined colorwells
+to hold your own custom color collections.
+
+
+Configuration Issues.
+
+The File Browser keeps an association list in the registry database to associate
+a particular file extension to an icon and other descriptive information. 
+The following is an example of how this could be filled in: 
+
+  [SETTINGS]
+  iconpath = /usr/share/icons:/home/jeroen/icons
+
+  [FILETYPES]
+  cpp = "/usr/local/bin/textedit %s &;C++ Source File;c_src.xpm;mini/c_src.xpm"
+
+
+This example shows how the extension ".cpp" is bound to the program "textedit"
+and is associated with two icons, a big icon "c_src.xpm" and a small icon "mini/c_src.xpm"
+which are to be found in either directory "/usr/share/icons" or "/home/jeroen/icons".
+END_OF_HELP
+
+class HelpWindow < FXDialogBox
+  def initialize(owner)
+    super(owner, "Help on TextEdit", DECOR_TITLE|DECOR_BORDER|DECOR_RESIZE,
+      0, 0, 0, 0, 6, 6, 6, 6, 4, 4)
+  
+    # Bottom part
+    closebox = FXHorizontalFrame.new(self,
+      LAYOUT_SIDE_BOTTOM|LAYOUT_FILL_X|PACK_UNIFORM_WIDTH)
+    closeBtn = FXButton.new(closebox, "&Close", nil, self, FXDialogBox::ID_ACCEPT,
+      LAYOUT_RIGHT|FRAME_RAISED|FRAME_THICK)
+    closeBtn.padLeft = 20
+    closeBtn.padRight = 20
+    closeBtn.padTop = 5
+    closeBtn.padBottom = 5
+
+    # Editor part
+    editbox = FXHorizontalFrame.new(self,
+      LAYOUT_SIDE_TOP|LAYOUT_FILL_X|LAYOUT_FILL_Y|FRAME_SUNKEN|FRAME_THICK)
+    editbox.padLeft = 0
+    editbox.padRight = 0
+    editbox.padTop = 0
+    editbox.padBottom = 0
+    helptext = FXText.new(editbox, nil, 0,
+      TEXT_READONLY|TEXT_WORDWRAP|LAYOUT_FILL_X|LAYOUT_FILL_Y)
+    helptext.visRows = 50
+    helptext.visCols = 60
+  
+    # Fill with help
+    helptext.text = HELP
+    helptext.tabColumns = 35
+  end
+end

data/examples/textedit/prefdialog.rb

@@ -0,0 +1,235 @@
+class PrefDialog < FXDialogBox
+  # Load the named icon from a file
+  def loadIcon(filename)
+    begin
+      filename = File.join("..", "icons", filename)
+      icon = nil
+      File.open(filename, "rb") { |f|
+        icon = FXPNGIcon.new(getApp(), f.read)
+      }
+      icon
+    rescue
+      raise RuntimeError, "Couldn't load icon: #{filename}"
+    end
+  end
+
+  def initialize(owner)
+    super(owner, "TextEdit Preferences", DECOR_TITLE|DECOR_BORDER|DECOR_RESIZE,
+      0, 0, 0, 0, 0, 0, 0, 0, 4, 4)
+
+    vertical = FXVerticalFrame.new(self,
+      LAYOUT_SIDE_TOP|LAYOUT_FILL_X|LAYOUT_FILL_Y)
+    horizontal = FXHorizontalFrame.new(vertical, LAYOUT_FILL_X|LAYOUT_FILL_Y)
+    buttons = FXVerticalFrame.new(horizontal, (LAYOUT_LEFT|LAYOUT_FILL_Y|
+      FRAME_SUNKEN|PACK_UNIFORM_WIDTH|PACK_UNIFORM_HEIGHT))
+    buttons.padLeft = 0
+    buttons.padRight = 0
+    buttons.padTop = 0
+    buttons.padBottom = 0
+    switcher = FXSwitcher.new(horizontal, LAYOUT_FILL_X|LAYOUT_FILL_Y)
+
+    # Icons
+    pal = loadIcon("palette.png")
+    ind = loadIcon("indent.png")
+    pat = loadIcon("pattern.png")
+    del = loadIcon("delimit.png")
+
+    # Pane 1
+    pane1 = FXVerticalFrame.new(switcher, LAYOUT_FILL_X|LAYOUT_FILL_Y)
+    FXLabel.new(pane1, "Color settings", nil, LAYOUT_LEFT)
+    FXHorizontalSeparator.new(pane1, SEPARATOR_LINE|LAYOUT_FILL_X)
+    matrix1 = FXMatrix.new(pane1, 5,
+      MATRIX_BY_ROWS|PACK_UNIFORM_HEIGHT|LAYOUT_FILL_X|LAYOUT_FILL_Y)
+
+    FXLabel.new(matrix1, "Background:", nil,
+      JUSTIFY_LEFT|LAYOUT_CENTER_Y|LAYOUT_FILL_X|LAYOUT_FILL_ROW)
+    FXLabel.new(matrix1, "Text:", nil,
+      JUSTIFY_LEFT|LAYOUT_CENTER_Y|LAYOUT_FILL_X|LAYOUT_FILL_ROW)
+    FXLabel.new(matrix1, "Sel. text background:", nil,
+      JUSTIFY_LEFT|LAYOUT_CENTER_Y|LAYOUT_FILL_X|LAYOUT_FILL_ROW)
+    FXLabel.new(matrix1, "Sel. text:", nil,
+      JUSTIFY_LEFT|LAYOUT_CENTER_Y|LAYOUT_FILL_X|LAYOUT_FILL_ROW)
+    FXLabel.new(matrix1, "Cursor:", nil,
+      JUSTIFY_LEFT|LAYOUT_CENTER_Y|LAYOUT_FILL_X|LAYOUT_FILL_ROW)
+
+    FXColorWell.new(matrix1, FXRGB(0, 0, 0), owner, TextWindow::ID_TEXT_BACK,
+      (COLORWELL_OPAQUEONLY|FRAME_SUNKEN|FRAME_THICK|LAYOUT_LEFT|
+       LAYOUT_CENTER_Y|LAYOUT_FIX_WIDTH|LAYOUT_FIX_HEIGHT|LAYOUT_FILL_COLUMN|
+       LAYOUT_FILL_ROW), 0, 0, 40, 24)
+    FXColorWell.new(matrix1, FXRGB(0, 0, 0), owner, TextWindow::ID_TEXT_FORE,
+      (COLORWELL_OPAQUEONLY|FRAME_SUNKEN|FRAME_THICK|LAYOUT_LEFT|
+       LAYOUT_CENTER_Y|LAYOUT_FIX_WIDTH|LAYOUT_FIX_HEIGHT|LAYOUT_FILL_COLUMN|
+       LAYOUT_FILL_ROW), 0, 0, 40, 24)
+    FXColorWell.new(matrix1, FXRGB(0, 0, 0), owner, TextWindow::ID_TEXT_SELBACK,
+      (COLORWELL_OPAQUEONLY|FRAME_SUNKEN|FRAME_THICK|LAYOUT_LEFT|
+       LAYOUT_CENTER_Y|LAYOUT_FIX_WIDTH|LAYOUT_FIX_HEIGHT|LAYOUT_FILL_COLUMN|
+       LAYOUT_FILL_ROW), 0, 0, 40, 24)
+    FXColorWell.new(matrix1, FXRGB(0, 0, 0), owner, TextWindow::ID_TEXT_SELFORE,
+      (COLORWELL_OPAQUEONLY|FRAME_SUNKEN|FRAME_THICK|LAYOUT_LEFT|
+       LAYOUT_CENTER_Y|LAYOUT_FIX_WIDTH|LAYOUT_FIX_HEIGHT|LAYOUT_FILL_COLUMN|
+       LAYOUT_FILL_ROW), 0, 0, 40, 24)
+    FXColorWell.new(matrix1, FXRGB(0, 0, 0), owner, TextWindow::ID_TEXT_CURSOR,
+      (COLORWELL_OPAQUEONLY|FRAME_SUNKEN|FRAME_THICK|LAYOUT_LEFT|
+       LAYOUT_CENTER_Y|LAYOUT_FIX_WIDTH|LAYOUT_FIX_HEIGHT|LAYOUT_FILL_COLUMN|
+       LAYOUT_FILL_ROW), 0, 0, 40, 24)
+
+    FXLabel.new(matrix1, "Files background:", nil,
+      JUSTIFY_LEFT|LAYOUT_CENTER_Y|LAYOUT_FILL_X|LAYOUT_FILL_ROW)
+    FXLabel.new(matrix1, "Files:", nil,
+      JUSTIFY_LEFT|LAYOUT_CENTER_Y|LAYOUT_FILL_X|LAYOUT_FILL_ROW)
+    FXLabel.new(matrix1, "Sel. files background:", nil,
+      JUSTIFY_LEFT|LAYOUT_CENTER_Y|LAYOUT_FILL_X|LAYOUT_FILL_ROW)
+    FXLabel.new(matrix1, "Sel. files:", nil,
+      JUSTIFY_LEFT|LAYOUT_CENTER_Y|LAYOUT_FILL_X|LAYOUT_FILL_ROW)
+    FXLabel.new(matrix1, "Lines:", nil,
+      JUSTIFY_LEFT|LAYOUT_CENTER_Y|LAYOUT_FILL_X|LAYOUT_FILL_ROW)
+
+    FXColorWell.new(matrix1, FXRGB(0, 0, 0), owner, TextWindow::ID_DIR_BACK,
+      (COLORWELL_OPAQUEONLY|FRAME_SUNKEN|FRAME_THICK|LAYOUT_LEFT|
+       LAYOUT_CENTER_Y|LAYOUT_FIX_WIDTH|LAYOUT_FIX_HEIGHT|LAYOUT_FILL_COLUMN|
+       LAYOUT_FILL_ROW), 0, 0, 40, 24)
+    FXColorWell.new(matrix1, FXRGB(0, 0, 0), owner, TextWindow::ID_DIR_FORE,
+      (COLORWELL_OPAQUEONLY|FRAME_SUNKEN|FRAME_THICK|LAYOUT_LEFT|
+       LAYOUT_CENTER_Y|LAYOUT_FIX_WIDTH|LAYOUT_FIX_HEIGHT|LAYOUT_FILL_COLUMN|
+       LAYOUT_FILL_ROW), 0, 0, 40, 24)
+    FXColorWell.new(matrix1, FXRGB(0, 0, 0), owner, TextWindow::ID_DIR_SELBACK,
+      (COLORWELL_OPAQUEONLY|FRAME_SUNKEN|FRAME_THICK|LAYOUT_LEFT|
+       LAYOUT_CENTER_Y|LAYOUT_FIX_WIDTH|LAYOUT_FIX_HEIGHT|LAYOUT_FILL_COLUMN|
+       LAYOUT_FILL_ROW), 0, 0, 40, 24)
+    FXColorWell.new(matrix1, FXRGB(0, 0, 0), owner, TextWindow::ID_DIR_SELFORE,
+      (COLORWELL_OPAQUEONLY|FRAME_SUNKEN|FRAME_THICK|LAYOUT_LEFT|
+       LAYOUT_CENTER_Y|LAYOUT_FIX_WIDTH|LAYOUT_FIX_HEIGHT|LAYOUT_FILL_COLUMN|
+       LAYOUT_FILL_ROW), 0, 0, 40, 24)
+    FXColorWell.new(matrix1, FXRGB(0, 0, 0), owner, TextWindow::ID_DIR_LINES,
+      (COLORWELL_OPAQUEONLY|FRAME_SUNKEN|FRAME_THICK|LAYOUT_LEFT|
+       LAYOUT_CENTER_Y|LAYOUT_FIX_WIDTH|LAYOUT_FIX_HEIGHT|LAYOUT_FILL_COLUMN|
+       LAYOUT_FILL_ROW), 0, 0, 40, 24)
+
+    # Button 1
+    FXButton.new(buttons, "Colors\tChange Colors\tChange text colors.", pal,
+      switcher, FXSwitcher::ID_OPEN_FIRST, (FRAME_RAISED|ICON_ABOVE_TEXT|
+      LAYOUT_FILL_Y))
+
+    # Pane 2
+    pane2 = FXVerticalFrame.new(switcher, LAYOUT_FILL_X|LAYOUT_FILL_Y)
+    FXLabel.new(pane2, "Editor settings", nil, LAYOUT_LEFT)
+    FXHorizontalSeparator.new(pane2, SEPARATOR_LINE|LAYOUT_FILL_X)
+    matrix2 = FXMatrix.new(pane2, 5, (MATRIX_BY_ROWS|PACK_UNIFORM_HEIGHT|
+      LAYOUT_FILL_X|LAYOUT_FILL_Y))
+
+    FXLabel.new(matrix2, "Word wrapping:", nil,
+      JUSTIFY_LEFT|LAYOUT_CENTER_Y|LAYOUT_FILL_X|LAYOUT_FILL_ROW)
+    FXLabel.new(matrix2, "Auto indent:", nil,
+      JUSTIFY_LEFT|LAYOUT_CENTER_Y|LAYOUT_FILL_X|LAYOUT_FILL_ROW)
+    FXLabel.new(matrix2, "Fixed wrap margin:", nil,
+      JUSTIFY_LEFT|LAYOUT_CENTER_Y|LAYOUT_FILL_X|LAYOUT_FILL_ROW)
+    FXLabel.new(matrix2, "Strip carriage returns:", nil,
+      JUSTIFY_LEFT|LAYOUT_CENTER_Y|LAYOUT_FILL_X|LAYOUT_FILL_ROW)
+    FXLabel.new(matrix2, "Insert tab characters:", nil, (JUSTIFY_LEFT|
+      LAYOUT_CENTER_Y|LAYOUT_FILL_X|LAYOUT_FILL_COLUMN|LAYOUT_FILL_ROW))
+
+    FXCheckButton.new(matrix2, nil, owner, TextWindow::ID_TOGGLE_WRAP,
+      LAYOUT_LEFT|LAYOUT_CENTER_Y|LAYOUT_FILL_COLUMN|LAYOUT_FILL_ROW,
+      0, 0, 0, 0, 0, 0, 0, 0)
+    FXCheckButton.new(matrix2, nil, owner, TextWindow::ID_AUTOINDENT,
+      LAYOUT_LEFT|LAYOUT_CENTER_Y|LAYOUT_FILL_COLUMN|LAYOUT_FILL_ROW,
+      0, 0, 0, 0, 0, 0, 0, 0)
+    FXCheckButton.new(matrix2, nil, owner, TextWindow::ID_FIXED_WRAP,
+      LAYOUT_LEFT|LAYOUT_CENTER_Y|LAYOUT_FILL_COLUMN|LAYOUT_FILL_ROW,
+      0, 0, 0, 0, 0, 0, 0, 0)
+    FXCheckButton.new(matrix2, nil, owner, TextWindow::ID_STRIP_CR,
+      LAYOUT_LEFT|LAYOUT_CENTER_Y|LAYOUT_FILL_COLUMN|LAYOUT_FILL_ROW,
+      0, 0, 0, 0, 0, 0, 0, 0)
+    FXCheckButton.new(matrix2, nil, owner, TextWindow::ID_INSERTTABS,
+      LAYOUT_LEFT|LAYOUT_CENTER_Y|LAYOUT_FILL_COLUMN|LAYOUT_FILL_ROW,
+      0, 0, 0, 0, 0, 0, 0, 0)
+
+    FXLabel.new(matrix2, "Wrap margin:", nil,
+      JUSTIFY_LEFT|LAYOUT_CENTER_Y|LAYOUT_FILL_X|LAYOUT_FILL_ROW)
+    FXLabel.new(matrix2, "Tab columns:", nil,
+      JUSTIFY_LEFT|LAYOUT_CENTER_Y|LAYOUT_FILL_X|LAYOUT_FILL_ROW)
+    FXLabel.new(matrix2, "Brace match time (us):", nil,
+      JUSTIFY_LEFT|LAYOUT_CENTER_Y|LAYOUT_FILL_X|LAYOUT_FILL_ROW)
+    FXLabel.new(matrix2, "Strip trailing spaces:", nil,
+      JUSTIFY_LEFT|LAYOUT_CENTER_Y|LAYOUT_FILL_X|LAYOUT_FILL_ROW)
+    FXLabel.new(matrix2, "Mouse wheel lines:", nil,
+      JUSTIFY_LEFT|LAYOUT_CENTER_Y|LAYOUT_FILL_X|LAYOUT_FILL_ROW)
+
+    FXTextField.new(matrix2, 4, owner, TextWindow::ID_WRAPCOLUMNS,
+      (JUSTIFY_RIGHT|FRAME_SUNKEN|FRAME_THICK|LAYOUT_CENTER_Y|LAYOUT_LEFT|
+       LAYOUT_FILL_COLUMN|LAYOUT_FILL_ROW))
+    FXTextField.new(matrix2, 4, owner, TextWindow::ID_TABCOLUMNS,
+      (JUSTIFY_RIGHT|FRAME_SUNKEN|FRAME_THICK|LAYOUT_CENTER_Y|LAYOUT_LEFT|
+       LAYOUT_FILL_COLUMN|LAYOUT_FILL_ROW))
+    FXTextField.new(matrix2, 4, owner, TextWindow::ID_BRACEMATCH,
+      (JUSTIFY_RIGHT|FRAME_SUNKEN|FRAME_THICK|LAYOUT_CENTER_Y|LAYOUT_LEFT|
+       LAYOUT_FILL_COLUMN|LAYOUT_FILL_ROW))
+    FXCheckButton.new(matrix2, nil, owner, TextWindow::ID_STRIP_SP,
+      LAYOUT_LEFT|LAYOUT_CENTER_Y|LAYOUT_FILL_COLUMN|LAYOUT_FILL_ROW,
+      0, 0, 0, 0, 0, 0, 0, 0)
+    spinner = FXSpinner.new(matrix2, 2, owner, TextWindow::ID_WHEELADJUST,
+      (JUSTIFY_RIGHT|FRAME_SUNKEN|FRAME_THICK|LAYOUT_CENTER_Y|LAYOUT_LEFT|
+       LAYOUT_FILL_COLUMN|LAYOUT_FILL_ROW))
+    spinner.range = 1..100
+
+    # Button 2
+    FXButton.new(buttons,
+      "Editor\tEditor settings\tChange editor settings and other things.", ind,
+      switcher, FXSwitcher::ID_OPEN_SECOND,
+      FRAME_RAISED|ICON_ABOVE_TEXT|LAYOUT_FILL_Y)
+
+    # Pane 3
+    pane3 = FXVerticalFrame.new(switcher, LAYOUT_FILL_X|LAYOUT_FILL_Y)
+    FXLabel.new(pane3, "File Patterns", nil, LAYOUT_LEFT)
+    FXHorizontalSeparator.new(pane3, SEPARATOR_LINE|LAYOUT_FILL_X)
+    sub3 = FXVerticalFrame.new(pane3, LAYOUT_FILL_Y|LAYOUT_FILL_X)
+    FXLabel.new(sub3,
+      'Filename patterns, for example "Source Files (*.c,*.h)", one per line:',
+      nil, JUSTIFY_LEFT)
+    textwell = FXVerticalFrame.new(sub3,
+      LAYOUT_FILL_X|LAYOUT_FILL_Y|FRAME_SUNKEN|FRAME_THICK,
+      0, 0, 0, 0, 0, 0, 0, 0)
+    @text = FXText.new(textwell, nil, 0, LAYOUT_FILL_X|LAYOUT_FILL_Y)
+
+    # Button 3
+    FXButton.new(buttons,
+      "Patterns\tFilename patterns\tChange wildcard patterns for filenames.",
+      pat, switcher, FXSwitcher::ID_OPEN_THIRD,
+      FRAME_RAISED|ICON_ABOVE_TEXT|LAYOUT_FILL_Y)
+
+    # Pane 4
+    pane4 = FXVerticalFrame.new(switcher, LAYOUT_FILL_X|LAYOUT_FILL_Y)
+    FXLabel.new(pane4, "Word Delimiters", nil, LAYOUT_LEFT)
+    FXHorizontalSeparator.new(pane4, SEPARATOR_LINE|LAYOUT_FILL_X)
+    sub4 = FXVerticalFrame.new(pane4, LAYOUT_FILL_Y|LAYOUT_FILL_X)
+    FXLabel.new(sub4, "Characters delimiting words:", nil, JUSTIFY_LEFT)
+    FXTextField.new(sub4, 20, owner, TextWindow::ID_DELIMITERS,
+      FRAME_SUNKEN|FRAME_THICK|LAYOUT_FILL_X)
+
+    # Button 4
+    FXButton.new(buttons,
+      "Delimiters\tWord delimiters\tChange delimiters for word selections.",
+      del, switcher, FXSwitcher::ID_OPEN_FOURTH,
+      FRAME_RAISED|ICON_ABOVE_TEXT|LAYOUT_FILL_Y)
+
+    # Bottom part
+    FXHorizontalSeparator.new(vertical, SEPARATOR_RIDGE|LAYOUT_FILL_X)
+    closebox = FXHorizontalFrame.new(vertical,
+      LAYOUT_BOTTOM|LAYOUT_FILL_X|PACK_UNIFORM_WIDTH)
+    FXButton.new(closebox, "&Accept", nil, self, FXDialogBox::ID_ACCEPT,
+      LAYOUT_RIGHT|FRAME_RAISED|FRAME_THICK, 0, 0, 0, 0, 20, 20)
+    FXButton.new(closebox, "&Cancel", nil, self, FXDialogBox::ID_CANCEL,
+      LAYOUT_RIGHT|FRAME_RAISED|FRAME_THICK, 0, 0, 0, 0, 20, 20)
+  end
+
+
+  # Change patterns, each pattern separated by newline
+  def setPatterns(patterns)
+    @text.text = patterns.join("\n")
+  end
+
+  # Return array of patterns
+  def getPatterns
+    @text.text.split("\n")
+  end
+end