Chip:
Refer to my posting re. Workspace in the "favorite tricks" thread.
--
Douglas von Roeder
949-336-2902
On Tue, May 30, 2017 at 9:48 AM, Chip Scheide via 4D_Tech <
4d_tech@lists.4d.com> wrote:
> Keith & Bob
> Thanks!
>
> On Tue, 30 May 2017 11:01:11 -0500, Keith Culotta via 4D_Tech wrote:
> > This gets the text from and to the clipboard
> >
> >
> > $text:=Get text from pasteboard
> >
> > ARRAY TEXT($array;0)
> > $delim:=Char(Carriage return)
> > $len:=Length($text)
> > $lenDel:=Length($delim)-1
> > $pos1:=1
> > $pos2:=Position($delim;$text;*)
> >
> > While ($pos2>0)
> > $SS:=Substring($text;$pos1;$pos2-1)
> > APPEND TO ARRAY($array;$SS)
> > $pos1:=$pos2+$pos1+$lenDel
> > $pos2:=Position($delim;Substring($text;$pos1;$len);*)
> > End while
> > APPEND TO ARRAY($array;$SS)
> >
> > SORT ARRAY($array)
> > $text:=""
> > $size:=Size of array($array)
> > For ($i;1;$size)
> > $text:=$text+$array{$i}+$delim
> > End for
> > SET TEXT TO PASTEBOARD($text)
> >
> > Keith - CDI
> >
> >> On May 30, 2017, at 10:04 AM, Chip Scheide via 4D_Tech
> >> <4d_tech@lists.4d.com> wrote:
> >>
> >> Anyone have a macro (or anything else)
> >> which will sort method editor text?
> >>
> >> I have a method which I am using to keep track of other methods I have
> >> worked on.
> >> I would like to sort this list. Currently I am copy/pasting in excel
> >> and sorting and copy/pasting back
> >>
> >> Would prefer not to do this.
> >>
> >> Thanks
> >> Chip
> >> ---------------
> >> Gas is for washing parts
> >> Alcohol is for drinkin'
> >> Nitromethane is for racing
> >> **********************************************************************
> >> 4D Internet Users Group (4D iNUG)
> >> FAQ: http://lists.4d.com/faqnug.html
> >> Archive: http://lists.4d.com/archives.html
> >> Options: http://lists.4d.com/mailman/options/4d_tech
> >> Unsub: mailto:4d_tech-unsubscr...@lists.4d.com
> >> **********************************************************************
> >
> > **********************************************************************
> > 4D Internet Users Group (4D iNUG)
> > FAQ: http://lists.4d.com/faqnug.html
> > Archive: http://lists.4d.com/archives.html
> > Options: http://lists.4d.com/mailman/options/4d_tech
> > Unsub: mailto:4d_tech-unsubscr...@lists.4d.com
> > **********************************************************************
> ---------------
> Gas is for washing parts
> Alcohol is for drinkin'
> Nitromethane is for racing
> **********************************************************************
> 4D Internet Users Group (4D iNUG)
> FAQ: http://lists.4d.com/faqnug.html
> Archive: http://lists.4d.com/archives.html
> Options: http://lists.4d.com/mailman/options/4d_tech
> Unsub: mailto:4d_tech-unsubscr...@lists.4d.com
> **********************************************************************
>
**********************************************************************
4D Internet Users Group (4D iNUG)
FAQ: http://lists.4d.com/faqnug.html
Archive: http://lists.4d.com/archives.html
Options: http://lists.4d.com/mailman/options/4d_tech
Unsub: mailto:4d_tech-unsubscr...@lists.4d.com
**********************************************************************
