Paradox Community

Items in pnews.paradox-programming

Subject:Re: ascii characters
Date:Tue, 25 Dec 2018 12:24:01 -0700
From:Liz McGuire <liz@paradoxcommunity.com>
Newsgroups:pnews.paradox-programming
Not sure, but maybe:

var
   ts TextStream
   siChar SmallInt
   liStart, liEnd LongInt
endVar

ts.open("c:\\file.txt","r")
for siChar from 128 to 255
   while ts.advMatch(liStart,liEnd,chr(siChar))
     ts.setPosition(liStart)
     ts.writeString(" ")
   endWhile
endFor
ts.close()

Liz


On 23 Dec 2018 19:15, Kevin Zawicki wrote:
> Anyone have some quick code to scan a text file or string for high ascii chars
> and change them to spaces?
>


Copyright © 2004 thedbcommunity.com