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
**********************************************************************

Reply via email to