Re: v13 (+?) - Replace String [warning]

2017-06-29 Thread John DeSoi via 4D_Tech
> On Jun 29, 2017, at 3:33 PM, Chip Scheide via 4D_Tech <4d_tech@lists.4d.com> > wrote: > > I have a question.. what does RVLB (at the end of the blob) do? It is at the start of the blob and identifies the byte order. If it was a blob from an old PPC Mac, it would be BLVR. Next byte is the typ

Re: v13 (+?) - Replace String [warning]

2017-06-29 Thread Douglas von Roeder via 4D_Tech
Chip: AFAIK, that's the marker that 4D added "way back when" when 4D started to support BLOB's. It's used to differentiate between a picture and a BLOB. -- Douglas von Roeder 949-336-2902 On Thu, Jun 29, 2017 at 1:33 PM, Chip Scheide via 4D_Tech < 4d_tech@lists.4d.com> wrote: > I have a questio

Re: v13 (+?) - Replace String [warning]

2017-06-29 Thread Chip Scheide via 4D_Tech
I have a question.. what does RVLB (at the end of the blob) do? On Wed, 28 Jun 2017 06:09:43 +0800, Alan Chan via 4D_Tech wrote: > Hi Chip, > > Try the following and it should be done in a second or 2 (compiled). > > //ES_ReplaceStr_Shrink($source;$oldString;$newString;{$count > pointer})->R

Re: v13 (+?) - Replace String [warning]

2017-06-27 Thread Alan Chan via 4D_Tech
Hi Chip, Try the following and it should be done in a second or 2 (compiled). //ES_ReplaceStr_Shrink($source;$oldString;$newString;{$count pointer})->Resulted text C_TEXT($0;$1;$2;$3;$source;$oldStr;$newStr;$result;$tempTxt) C_POINTER($4) C_LONGINT($oldLen;$newLen;$oldStrLen;$NewStrLen;$count;

Re: v13 (+?) - Replace String [warning]

2017-06-27 Thread Chip Scheide via 4D_Tech
It was lunch time any way :) On Tue, 27 Jun 2017 22:59:01 +0200, Arnaud de Montard via 4D_Tech wrote: >> >> [...] >> I have a 4.8 meg text, I am using for testing. >> I accidentally ran the following line of code against it. >> >> $Source:=Replace String($Source;Char(9);"";*) >> >> [...] it t

Re: v13 (+?) - Replace String [warning]

2017-06-27 Thread Arnaud de Montard via 4D_Tech
> Le 27 juin 2017 à 20:16, Chip Scheide via 4D_Tech <4d_tech@lists.4d.com> a > écrit : > > [...] > I have a 4.8 meg text, I am using for testing. > I accidentally ran the following line of code against it. > > $Source:=Replace String($Source;Char(9);"";*) > > [...] it took about 30 minutes.

v13 (+?) - Replace String [warning]

2017-06-27 Thread Chip Scheide via 4D_Tech
I was playing around with the code StringOmit from Keith Culotta. I made some changes, which should make it faster... still testing. but in the process I found a 'problem' with Replace String. I have a 4.8 meg text, I am using for testing. I accidentally ran the following line of code against it.