Hello Morten!
Saturday May 27 1995, Morten Christensen writes to All:
MC> while not isEmptyLine()
MC> BegLine()
MC> InsertText("string")
MC> endwhile
MC> Having not yet found the fine QEdit3-command isEmptyLine in the
MC> TSEpro-manuals, I came up with this:
Hmm, it is indeed not as simple as in QEdit, but than again not as
difficult as you might think after having read this....
What you need is: CurrLineLen() That returns a 0 if the current line is
0 characters long....
proc main()
set(Break,on)
BegFile()
repeat
if CurrLineLen() == 0
InsertText("string")
endif
Down(1)
until CurrLine() == NumLines()
end
MC> 11 lines to replace, what I expected to do on 4 lines. Can anyone give
MC> me the TSEpro-word for isEmptyLine or a more simple way, than these 11
MC> lines.
That is the characteristic of a lower programming language.... You need
to write more code so you can do exactly that what you wanna do....
Henk
---
---------------
* Origin: (2:283/4.6)
|