TIP: Click on subject to list as thread! ANSI
echo: qedit
to: ALL
from: JAMES MOATS
date: 1995-07-13 12:16:00
subject: QEDIT3 GetScrBuff Macro

I need some help to use the QEDIT3 macro command GetScrBuff.
I want to use the GetScrBuff from within a macro  to  select  from
a list of Scratch Buffers, and use  the  stored  string  from  the
selected Scratch Buffer as a search parameter in  a  Find  command
search. A bookmark list is saved in Scratch  Buffers,  as  in  the
SET BOOKMARK macro below, each  buffer  named  for  its  contents,
which produces a picklist menu of Scratch  Buffers  of  all  Named
Bookmarks set. That part works nicely.
It's the Retrieval part which I can't seem to understand.  I  want
to do something like this:
          GetScrBuff DelLine Return      * shows buffer list
          Pause                          * select a named buffer
          Cut Find Paste Return Return   * Cut Name from page
                                         * & Search for it in DOC
But from my tests so far, it appears that the  macro  won't  pause
at the GetScrBuff  dialog  box,  and  although  it  allows  me  to
select a buffer which is copied at the cursor  position,  none  of
the subsequent commands are executed (or rather, it  appears  that
QEDIT3 attempts to execute all of the subsequent  commands  in the
GetScrBuff dialog box, before the selected Scratch Buffer contents
are pasted into the edited document at the cursor).
I'm probably missing something really simple there, but  any  help
and advice would be much appreciated.
* =========== SET BOOKMARK - QEDIT3 Macro ==================
* @(enter) SET BOOKMARK With Named Extension at Current Line
*      & Save Extension Name in Scratch Buffer for Later Search
* ----------------------------------------------------------
@enter     macrobegin SaveSettings AltWordSet
           insertline begline
           GetScrBuff "c" Return EndLine CursorRight
   * Buffer "c" Contains Pre-Loaded Marker Prefix from MAIN macro
   * (eg. for .BAT files "c" == "rem ")
           getscrbuff "e" return
   * Buffer "e" Contains Last Marker Extension Used
   * (which is now edited or replaced)
           DropAnchor SetInsMode ToggleInsert
           pause MarkWord JTrue NEXT
           CursorLeft MarkWord
       NEXT:
   * Store Extension to buff "e" as a prompt to set Next Marker
   * (eg. to keep track of sequential numbers)
           storescrbuff "e" return
   * Then Store Marker Extension in Buffer of Same Name
   * (eg. buffer named "Para1" contains the string "Para1")
           Copy MarkWord StoreScrBuff Paste Return
           unmarkblock EndLine RestoreSettings
* ==========================================================
Thanks in advance,
---
 * OLX 2.1 TD * Regards, Jim. [james.moats@canrem.com]  TORONTO :1/229/15
--- QScan/PCB v1.17b / 01-0348
---------------
* Origin: FidoNet: CRS Online, Toronto, Ontario (1:229/15)

SOURCE: echomail via exec-pc

Email questions or comments to sysop@ipingthereforeiam.com
All parts of this website painstakingly hand-crafted in the U.S.A.!
IPTIA BBS/MUD/Terminal/Game Server List, © 2025 IPTIA Consulting™.