Rebol 编程语言/ctx-edit

CTX-EDIT 是个值对象

   prefs           file!     %/c/documents%20and%20settings/max/dati%20applicazioni/rebol/edit-prefs.r
   dirty-edit      logic!    false
   this-file       none!     none
   this-app        none!     none
   t1              object!   [self type offset size span pane text color image effect data edge font para feel saved-area rate show? options parent-face old-offset old-size line-list changes face-flags action state access style alt-action facets related words colors texts images file var keycode reset styles init multi blinker pane-size dirty? help user-data flags doc]
   s1              object!   [self type offset size span pane text color image effect data edge font para feel saved-area rate show? options parent-face old-offset old-size line-list changes face-flags action state access style alt-action facets related words colors texts images file var keycode reset styles init multi blinker pane-size dirty? help user-data flags doc step ratio page axis clip dragger redrag speed resize]
   h1              pair!     338x0
   f1              object!   [self type offset size span pane text color image effect data edge font para feel saved-area rate show? options parent-face old-offset old-size line-list changes face-flags action state access style alt-action facets related words colors texts images file var keycode reset styles init multi blinker pane-size dirty? help user-data flags doc]
   edit-prefs      object!   [offset size wrap]
   ed-lo           object!   [self type offset size span pane text color image effect data edge font para feel saved-area rate show? options parent-face old-offset old-size line-list changes face-flags action state access style alt-action facets related words colors texts images file var keycode reset styles init multi blinker pane-size dirty? help user-data flags doc parent]
   save-lo         object!   [self type offset size span pane text color image effect data edge font para feel saved-area rate show? options parent-face old-offset old-size line-list changes face-flags action state access style alt-action facets related words colors texts images file var keycode reset styles init multi blinker pane-size dirty? help user-data flags doc parent]
   ff              object!   [self type offset size span pane text color image effect data edge font para feel saved-area rate show? options parent-face old-offset old-size line-list changes face-flags action state access style alt-action facets related words colors texts images file var keycode reset styles init multi blinker pane-size dirty? help user-data flags doc]
   fb              object!   [self type offset size span pane text color image effect data edge font para feel saved-area rate show? options parent-face old-offset old-size line-list changes face-flags action state access style alt-action facets related words colors texts images file var keycode reset styles init multi blinker pane-size dirty? help user-data flags doc effects depth]
   fc              object!   [self type offset size span pane text color image effect data edge font para feel saved-area rate show? options parent-face old-offset old-size line-list changes face-flags action state access style alt-action facets related words colors texts images file var keycode reset styles init multi blinker pane-size dirty? help user-data flags doc effects depth]
   fp              none!     none
   find-lo         object!   [self type offset size span pane text color image effect data edge font para feel saved-area rate show? options parent-face old-offset old-size line-list changes face-flags action state access style alt-action facets related words colors texts images file var keycode reset styles init multi blinker pane-size dirty? help user-data flags doc parent]
   resize          function! [size]
   refresh         function! []
   save-prefs      function! [/local str]
   open-as         function! [/local file]
   new-file        function! []
   save-as         function! [/local file]
   save-file       function! [/local file]
   up-file         function! []
   open-file       function! [file /local txt]
   result          none!     none
   ask-save        function! []
   save-edit       function! []
   do-file         function! []
   quit-edit       function! []
   quit-now        function! []
   caret           none!     none
   start           none!     none
   last-str        none!     none
   last-case       none!     none
   last-pat        none!     none
   find-text       function! []
   search          function! [str case pat]
   find-str        function! [str case pat]
   find-again      function! []
   find-next       function! [str case pat /local txt]
   find'           function! [txt str case pat tal /local code p]
   scroll-to       function! [txt /local xy]
   show-help       function! []
   help-text       string!   {Ctrl-A - select all text
 Ctrl-C - copy text
 Ctrl-X - cut text / cut all
 Ctrl-V - paste text
 Ctrl-Q - to quit
 Ctrl-S - to save changes
 Ctrl-O - to open a file
 Ctrl-N - to create a new file
 Ctrl-T - Trim line to end
 Ctrl-E (F5) - to execute (do)
 Ctrl-F (F3) - to find text
 Ctrl-G - to find next text}
   keymap          block!    length: 24
   scroll-edit     function! [page n]
   init            function! []
   form-title      function! [val]
   view-file       function! [file /app app-word]